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Dosplus shifts into overdrive for business. 

And shifts your sales into high gear 



DOSPLUS MEANS INCREASED BUSINESS 

We pioneered the first Model I double density system that was 
written from the ground up as a double density system. We 
pioneered Automatic Density Recognition and Automatic Track 
Count support. We pioneered the first after-market Model II! 
system. We pioneered the first Model III hard disk system written 
from the ground up to operate the Winchester technology hard 
drives. We have been, and intend to remain, at the very fore-front 
of the industry. And along the way we've earned a reputation for 
quality, dependable software 

What this all means to you can best be summed up with 

one word . . . PROFIT. 

Become a DOSPLUS distributor or dealer now and get a 

piece of the action. 

DOSPLUS means increased business. High demand. 

Solid profit. When you're dealing DOSPLUS you're doing 

business with a dependable supplier with a quality product 

to sell. Our bad apple rate is less than 1% of our total 

shipments and our ability to meet delivery dates is just as 

impressive. 

As a DOSPLUS dealer or distributor you'll also enjoy 

complete marketing support through our multi-publication 

advertising campaign. 

DOSPLUS. A PROVEN PROFIT MAKER. 

Current DOSPLUS operating systems: 

Dosplus 3.4— The flagship of the Micro-Systems line Our 
current "end-user" DOS. Contains all of the new advanced DOS 
features and the expanded Disk BASIC. Comes with 200+ page 
user's manual that includes technical reference section. ,. 



Dosplus 4.0 — Our hard disk operating system. An operat- 
ing system designed from the ground up for hard disk opera- 
tion. Contains all of the powerful Dosplus 3.4 features plus 
the power of hard disk operation. Has the ability to use the 
hard disk as the system drive. Also includes 200+ page 
manual with technical reference section. 

Dosplus 3.3 — Our OEM DOS. Limited features and 
documentation but maximum value. Dependable and easy to 
use. Pricing according to quantity. Significant discounts are 
available. Comes with easy reading 50 page users guide without 
technical reference section. 

T DOS — Our "kernel'" system. For software publishers who 
need to distribute on a Disk Operating System but don't need the 
inflated cost. Royalty payments of only $2 per copy. System 
functions such as Dosplus 3.3 does. Includes a Backup, Format, 
and single drive copy utility. Supplied with TBASIC 1.4 Call or 
write for information on licensing your program for distribution on 
T DOS. Already used by many of the major publishing houses and 
popular authors. 

Soon to be released business software: 

MICRO CASH RETAIL BUSINESS PACKAGE 

ACCOUNTS RECEIVABLE 2.0 WITH 

MANUFACTURING INVENTORY 

For further information on these two business 

software packages, contact 

Micro Systems Software. 
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So Far, So Good... 




Your Model III is a fine computer. 

So why settle for less than 

a fine disk storage system? 

A fast, reliable disk storage system — no other 
device is so vital to the satisfactory performance of 
your computer. At Percom we build quality, high- 
performance disk drive systems. From gold-plated 
connector contacts to goldcad metal chassis 
structures. From proven design through 100% 
reliability testing. Percom disk systems are the 
standard by which others are judged — the industry's 
"gold standard," in a sense. And since Percom is the 
largest independent manufacturer of disk systems 
for microcomputers, you get Percom quality 
at very competitive prices. Add-on drives for 
TRS-80* computers start as low as $399. 
Complete first-drive systems for the Model III 
start at only $599. Put a quality Percom mini-disk 
storage system in your Model III. And save. 



#1 For Your Model III 

Percom TFD drives for your TRS-80* Model III computer are available in 
40- and 80-track versions with single or dual heads. Single-head 40-track 
drives store 180 Kbytes; dual-head 40-track drives store 360 Kbytes. 
Eighty-track drives store slightly over twice these amounts. Of course 
these are formatted capacities. The Percom Model III controller handles 
up to four drives so it's possible to access almost three million bytes of 
on-line program and data files. You get Percom's OS-80/III Basic 
language DOS with each first-drive system, and your first drive may be 
either internal (add-in) or external (add-on). Percom TFD drives work with 
Model III TRSDOS and other Model III disk-operating systems. First-drive 
systems are pre-assembled. Installation is accomplished with simple tools. 

#1 For Your Model I, Too 

Percom TFD add-on drives for the TRS-80* Model I computer are 
available with the same features and the same quality control measures 
as TFD Model III drives. As for Model III drives, all Percom Model I drives 
are double-density rated. Install Percom's popular DOUBLER II in your 
Model I Expansion Interface and upgrade your Model I to provide the 
same storage capacity as the Model III. 

Watch for Announcement of Percom's Low-Cost 
Hard Disk System for the Model III! 

To order, or for the name of your authorized Percom retailer, 
call toll free 1-800-527-1222. 



The Drive People 
You get more out of 
Percom disk systems. 
Expect it! 





PERCOM DATA COMPANY. INC. 

1 1 220 Pagemill Road • Dallas. Texas 75243 
(214)340-7081 



PRICES AND SPECIFICATIONS SUBJECT TO CHANGE WITHOUT NOTICE. 

'TRS-80 is a trademark of Tandy Radio Shack Corporation which has no relationship to 

Percom Data Company, Inc. 

PERCOM, DOUBLER II and OS-80TII are trademarks of Percom Data Company, Inc. 



Yes... I'd like to know more about 
the best for my TRS-80 computer. 
Send me free literature about 
quality Percom products. 

□ MODEL I LI MODEL III 

Send to 

PERCOM DATA COMPANY, INC Dept. 8-M 

1 1220 Pagemill Road, Dallas, TX, 75243 
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Data Communications-— TRS-80 Style 
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by Frank J. Derfler, Jr. 

In a muddle over giving your 80 telecommunications capability? Author Derfler 
will tell you why you might want data communications for your micro and how 
you go about doing it. 



Breaker 19 



96 



by David D. Busch 

After getting an eyeful of "Hi there, I'm new! How do you work this, anyway?" on 
CompuServe's CB simulator, 80 Micro's KTI Inc. expert thought it was time to 
explain a few things to a few people. 



For the Novice— Part I 



148 



by Jay Chidsey 

If you're new at computing or have been beeping for six months or so, author 
Chidsey has prepared a six-part series to help you over the rough spots. In this 
installment, he talks about memory— high and low. 
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Spiromania— Partll 

by Jake Commander 

In May's 80 Micro, Jake showed you some eye- 
catching color graphics. Now in a reprise, he'll 
tell you how to firm up your graphics tech- 
nique and do some wowing of your own. 

Ohio Electronic News Experiment 

100 

by Jay Chidsey 

In the Ohio hamlet of Tiffiny, a small-town paper 
has entered the micro age. Learn how the staff 
puts out the video equivalent of a 150-page 
newspaper every day. 
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by Wayne Green 



"The Model 16 looks as 

if it is going to be a 

good system." 



The Model 16. . . 
A Debacle 

The coming "dump" of the Mode! II at 
$3,000 may unsettle Shackies a bit. It 
certainly will hammer home the idea that 
the Shack is going to make the Model 16 
stick, whether you like it or not. 

It's my understanding that the initial 
bugs in the 16 have been repaired and that 
production is proceeding. The 16 will run 
the Mil. But for Mil owners, the future ap- 
pears to be more ominous . . . and perhaps 
even the lower price for the system during 
bargain month is not enough. 

Think about it. With the Mil out of 
business, even the tiny amount of support 
that system got from the Shack seems 
destined to shrivel up. Thus, Mil owners 
are faced with owning an orphan. The 
small base of systems that have been sold 
is not large enough to encourage software 
and accessory firms to go out of their way 
to support it. The Shack isn't known for 
openness with its sales figures, so it's 
anyone's guess as to Mil sales. I'd esti- 
mate maybe 50,000 systems sold to date. 

The MM would have done a lot better if 
the Shack hadn't had to turn most of their 
efforts toward keeping the Model III 
afloat. With the Federal Communications 
Commission putting the Model I out of 
business, they had to get the Model III run- 
ning and supported. This seems to have 
put such a strain on the Shack that they 
were unable to do much for any other of 
their products, such as the Pocket 
Computer and Color Computer (Coco). 

Now I'm told that the M16 will have a lit- 
tle software support for the 16-bit function 
for perhaps a year. It'll run the Mil stuff, 
and there will be a Cobol compiler and an 
assembler, but Basic is still not even in 
sight. That's a kick in the head. The Model 
II was supposed to be designed for busi- 
ness applications. Most of the software 
written for it is for business. Writers of ver- 
tical programs have often chosen the Mil 
since it does support 8-inch disks, which 
are needed for even a small business. But 
this brings up some serious problems, 
now that the M16 is in view. 

A good accounting package that sells 
for $1,500 to $2,000 and runs on the Mil 



will usually sell a computer and the soft- 
ware at the same time. Few businesses 
are sitting around with a MM on a desk 
waiting for software to be written, so it's 
natural to expect to sell both the com- 
puter and the software at the same time: a 
turnkey system. 

But with the prospects of a much faster 
computer system once system and appli- 
cations software for the M16 is available, I 
wonder how many firms will go for a M16 
with Mil software. . .even though it runs 
well? And without Basic and other needed 
systems software for the M16, will we see 
much activity from outside support firms 
for the M16? The Shack may be able to 
pull this one off, but I think they are going 
to have to invest a lot of time and money 
to do it. 

Of course this slowness on the part of 
Shack with the M16 support may be an- 
other golden opportunity for entrepren- 
eurs. With the help of this magazine to 
reach the customers, we may see another 
multi-million dollar support industry build- 
ing up around the M16. . .with none of the 
products being sold by Shack, as usual. 

The M16 looks as if it is going to be a 
good system. The price is not out of line 
with the Mil when you consider that the 
M16 comes with more memory, double- 
density disks and so on. The price is posi- 
tively cheap for businesses when you con- 
sider what a workhorse it may become. 

One hopes that Shack has done a bit 
more engineering on this latest entry. The 
failure record for the Mil has been sad 
with service a major problem. Indeed, any 
business should consider buying two sys- 
tems when they computerize so that they 
will be reasonably sure that one will al- 
ways be on hand and working. Repairs 
that go on into weeks can bring a busi- 
ness to a halt fast if a spare system isn't 
available. 

One possibility comes to mind. With the 
uncertainty over the M16, will we see a 
shift toward Mill sales and the use of hard 
disk systems for them? The hard disk cer- 
tainly overcomes the drawbacks of the 
smaller floppy disks, though we're still 
hung up waiting for the invention of an in- 
expensive back-up system. 

Smaller businesses seldom have the 



need for the extra speed of the M16. And 
there is no good reason to throw away the 
program base of thousands of programs 
written for the Ml and Mill systems. Re- 
member that one of the main problems 
with the Mil was its incompatibility with 
Ml and Mill software. One wonders what 
went through the corporate minds at 
Shack when they decided not to make the 
Mil upward compatible. Will a Model II pull 
a big price 10 years from now as a 
museum piece? It may turn into a totally 
forgotten computer. . .sort of like a DC-2 
airplane. ■ 

Asian Tour 

Every fall there is a tour of Asia that is 
designed to coincide with a series of 
electronics shows in Tokyo, Seoul, Taipei 
and Hong Kong. These shows focus on 
consumer electronics, so they have a 
good deal of microcomputer exhibits. 

Hundreds upon hundreds of Asian 
firms— small ones— would like to import 
American products. . .or would like to 
make assemblies for our products. . .or 
sell their equipment to use. These firms 
have few other ways to make contact with 
smaller American firms than through 
shows such as these. They are looking for 
you. 

I've been on two of these tours already 
and found each one invaluable in making 
contacts. They were also a lot of fun. I en- 
joy eating Japanese, Chinese, and even 
Chinese Chinese. You do get a lot of fan- 
tastic food on these trips. You also stay in 
the best hotels. 

With the American dollar improving, 
there are some travel bargains to be had. 
The whole trip to Asia for about three 
weeks costs only around $2,500. This year 
one part of the group will be going on to a 
visit to Peking and then around the world 
to an electronics show in Munich. . .cost 
is only around $3,500. 

Sherry and I missed the 1981 tour be- 
cause we were getting Desktop Comput- 
ing started and couldn't get away at the 
critical time. We made the 1979 and 1980 
tours and are planning on the 1982 tour. 

Continues on page 8 
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A GALAXY of features jnakes the LH\ 
remarkable, computer. As you explore the 
LNW80, you will find the most complete, 
powerful, ready to run, feature-packed per- 
sonal and business computer ever made intp 
one compact solid unit. 




-,.' CONSTRUCTION - Instrumenta- 
tion quality construction sets LNW80 com; 
puters apart from all the rest. Integrated into 
the sleek solid steel case of the LNW80 is a 
professional 74-key expanded keyboard that 
includes a twelve key numeric keypad. 

HIG.H RESOLUTION GRAPHICS* COLOR- 

The stunning 480 X 1 92 resolution gives you 
"/ total display control - in color or black and 
white. The choice of display formats is yours; 
80, 64, 40 and 32 columns by 24 or 1 6 lines in - 
any* combination of eight colors. 

. PERFORMANCE - Lift-off with- a 4M Hz Z80A 
CPU for twice the performance. The LNW80 
'""'♦performs all computers in its class. 



MODEL I COMPATIBILITY - The LNW8 

fully hardware and software compatible wi... 
the Model I. Select from a universe.of hardware 
accessories and software - from VisiCalc® to 
space games, your LNW80 will launch you 
into a new world of computing. 

FULLY LOAQED - A full payload includes 
on-board singfe and double density disk 
controller for 5 W' and 8" single or double 
sided disk drives. RS232C communications 
port, cassette and parallel printer interfaces 
are standard features and ready to go. All 
memory is fully installed - 48K RAM, ? 16K 
graphics RAM and 12K ROM complete with 
Microsoft BASIC. 




price won't send you into 



LNW Research Corp. 



...2620 WALNUT Tustin. CA. $680 
(714). 641-8850 (714) 



Monitor and 
TM Personal £ 



MANAGING EDITOR 

Eric Maloney 

SENIOR COPY EDITOR 

Michael Nadeau 

NEWS EDITOR 

John P. Mello Jr. 

REVIEW EDITOR 

Janet Fiderio 

NEW PRODUCTS EDITOR 

Steven Frann 

EDITORS 

Lynn Rognsvoog, Carolyn Nolan, 

Kerry Leichtman, Caron Taylor 

TECHNICAL CONSULTANT 
Jake Commander 

TECHNICAL EDITORS 

Dennis Kitsz (Contributing Editor) 

G. Michael Vose (Features, Editor) 

Art Huston (Editor) 

PRODUCTION EDITOR 

Susan Gross 

LAYOUT EDITORS 

Joan Ahern, Bob Dukette, 

Sue Hays, Anne Vadeboncoeur 

PROOFREADERS 

Peter Bjornsen, Patrice Laughner, 

Louis Marini 

EDITORIAL ADMINISTRATION 

Pat Graham, Nancy Noyd 



Subscriptions: 

Problems with Subscriptions: Send a 
description of the problem and your 
current and/or most recent address to: 
80 Micro, Subscription Department, 
PO Box 981, Farmingdale, NY 11737. 
Change of Address: Send old label or 
copy of old address and new address 
to 80 Micro, PO Box 981, Farmingdale, 
NY 11737. Please give eight weeks ad- 
vance notice. 

Microfilm: This publication is available 
in microform from University Micro- 
films International. United States ad- 
dress: 300 North Zeeb Road, Dept. P.R., 
Ann Arbor, Ml 48106. Foreign address: 
18 Bedford Row, Dept. P.R., London, 
WC1R4EJ, England. 
Dealers: Contact Ginny Boudrieau, 
Bulk Sales Manager, 80 Micro, Pine St., 
Peterborough, NH 03458. (800)258-5473. 



Proof Notes 

the editors 

look at the issues 



Hello; I'm Joe's modem. 
Before I came along, Joe's TRS-80 was 
a boring machine. He would sit for long 
hours entering programs from 80 Micro, and 
what did he have in the end? Another way to 
balance his checkbook or perhaps a patch 
for Scripsit. That is not the type of stuff that 
gets MY transistors hot. 

Oh; I suppose those programs have a pur- 
pose, and Joe is happy with them. But Joe 
didn't know what he was missing until his 
buddies in the computer club told him 
about me. 

"Get a modem, Joe. It will add a new di- 
mension to personal computing," they said. 
Joe was skeptical at first, but when he saw 
how inexpensive I was, he decided to check 
me out. 

I've served Joe well since then, and he 
will be the first to tell you that. I give Joe ac- 
cess to information he might otherwise 
never be able to get. The other night he was 
"talking" to some fellow computerists on 
CompuServe (using me of course), and one 
of them had the answer to a tough interfac- 
ing problem Joe had. He also learned of a 
great buy on a used printer when he ac- 
cessed the local bulletin board last week. 

Joe is an up-and-coming businessman as 
well; so he appreciates the stock reports 
and business news, often updated by the 
hour, that I allow him to see. Sure, he pays 
for this information, but it's a worthwhile 
investment. 

I also provide computing power Joe 
thought was beyond his reach. Through 
some commercial data bases, Joe can write 
programs larger than his TRS-80 allows and 
often in something other than Basic or ma- 
chine language. He downloads programs 
from bulletin boards, some of which have 
saved him from buying commercial soft- 
ware. He has also up-loaded some of his 
own programming creations in the spirit of 
hobbyist cooperation. 



Yep, I think I've done Joe a lot of good. He 
sleeps better at night and he has more 
friends. I've brought Joe closer to his com- 
puter than ever before. He still insists on 
typing in those long programs, though. 
Maybe someday 80 Micro will put those 
long listings on a bulletin board where I can 
help Joe with this problem, too.B 



Continued from page 6 

We'd love to have you along too. The tour 
starts about the end of October and goes 

about two weeks for Asia and three 

if you go to China, Munich, and London. 
Or you can come back however you like. 

In 1979 we went back and spent several 
days in Tokyo, meeting more of the people 
wanting to do business with us. The next 
year we went on to Hawaii, where I gave 
talks to local groups, and we lazed about 
the Waikiki Beach for an hour or two. On 
the last trip we also made side trips to 
Macao and up to Canton, China. I guaran- 
tee you this: you will never forget one 
minute of a trip to China. Not a minute. 

Are there Big Macs in Hong Kong as 
good as at home? You'll never know until 
you've been there and had 'em. 

The electronics shows are scheduled 
so that you have a couple days to see 
them, a day of travel, two more days 
of show, another day to travel, and so 
on. That allows you to visit four elec- 
tronic shows in four countries in two 
weeks. Not bad. 

For details— and you'd better get 
started with this now if you are going to 
have your visas all set in time (China can 
take a long time) — drop a note to Sherry, 
Commerce Tours, Wayne Green, Inc., 
Peterborough, NH 03458. ■ 



The left bracket, [, replaces the up arrow used by Radio Shack to indicate exponentiation on our printouts. When 
entering programs published in 80 Micro, you should make ihis change. 

80 formats its program listings to run 64-characters wide, the way they look on your video screen. This accounts for 
the occasional wrap-around you will notice in our program listings. Don't let it throw you, particularly when entering 
assembly listings. 



Article submissions from our readers are welcomed and encouraged. Inquiries should be addressed to: Sub- 
missions Editor, 80 Pine Street. Peterborough, NH 03458. Include an SASE for a copy of our writers' guidelines. 
Payment for accepted articles is made on publication, at a rate of approximately $50 per printed page; all rights 
are purchased. Authors of reviews should contact the Review Editor, 80 Pine Street, Peterborough, NH 03458. 



8 • 80 Microcomputing, June/July 1982 







Systems avertable for Altos, 'Apple,™ Atari,™ Heath,™ North Star,™ S-100, 
(Models 1, 11, 111, Color), Zenith. 
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CMD Performance 

Windsor. C l (203)688-3862 

Digital Data Communications, Inc. 

Richmond, Me. (207)737-4447 

MIDVV 
Cottage Software 

Wichita, Ks (316)683-4813 

Web Products, Inc. Software Division 
Carol Stream, II (312) 653-5229 




Meta Technologies 

1-800-321-3552 



Insync Systems Corp. 

Alvin.Tx (713)331-2024 

Central Kansas Computers 

Herrington, Ks (913)258-2575 

Dataflow Systems 

Indianapolis. In (317)888-3640 



WEST 
Everett Computer Center 

Everett. Wa (206)259-0024 

Connection 80 

Vancouver, Wa (206)573-0319 

H & S Microsystems 

Burnaby, BC Canada (604 ) 430-4 1 45 
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We here at 80 Micro 

ha ve no sentiments 

against Tandy." 



Missing Address 

We were very pleased to hear that 80 Mi- 
cro published an article by one of our 
users on our M-80 microcomputer ("Build- 
ing an M-80," March 1982). A customer 
subsequently called us and beat us merci- 
lessly about the head and shoulders be- 
cause the article failed to mention either 
our address or our distributor's address: 
Quest Electronics, 2322 Walsh Ave., San- 
ta Clara, CA 95051. 

Eric M. Miller, President 

Miller Technology 

647 N. Santa Cruz Ave. 

Los Gatos, CA 95030 



Tandy Defender 

I am opposed to your sentiments 
against Tandy Corporation that have ap- 
peared in recent issues of 80 Micro. Re- 
member, if they weren't around, you 
wouldn't be either. 

Philip Herbst 

Staten Island Labs 

Staten Island, NY 



We here at 80 Micro have no sentiments 
against Tandy. Indeed, you will not find 
anywhere a group more dedicated to the 
permanent success of the TRS-80. 

We are in the information business. Our 
job is to keep our readers informed. They 
feel that the best thing that has happened 
to their TRS-80 has been 80 Micro. 

Wayne Green Inc. has been around 

years longer than Tandy and will continue 

to survive no matter what course Tandy 

takes with their TRS-80.— Matthew Smith, 

Assistant to the President 



Right Decision 

Just as I was wondering if I had sub- 
scribed to the right magazine two things 
happened. You finally said a good word 
about Radio Shack. Your magazine devot- 
ed a large number of pages to the Color 



Computer. Thank you. 

I have had my Color Computer since 
January 1981 and I have enjoyed it very 
much. I have converted many Model I and 

III programs to fit the Color Computer. 
This has helped me to learn programming. 
I enjoy 80 Micro, most of all Dennis 
Kitsz's articles. 

B.L. Mott 
Bristow, OK 



Archbold Speed-up Kit 

In his Exclusive Oracle column {80 
Micro, February 1982) Mr. Kitsz gave ad- 
vice about the speed-up kit by Archbold 
Electronics. The information he gave was 
misleading. On page 42, he provides four 
points that you should consider before 
buying the mod. Each needs some clarifi- 
cation. 

First, switching between speeds is an 
option provided by the kit under program 
or manual control. By asking "How?" Mr. 
Kitsz implies that the user has to design 
the option himself. 

Second, true, the XRX-II mod will re- 
strict the cassette baud rate to 500. How- 
ever, the clock mod provides an option 
(take it or leave it) to automatically slow 
down the CPU during tape operation. 
Without XRX-II, the baud rate could be 
doubled or tripled depending on clock 
speed selected. But is being forced to use 
500 baud cassette I/O a good reason not 
to increase the speed of everything else? 

Third, using disks with the mod is no 
problem. You can wire the clock to slow 
back down while disks are in use. But 
patching TRSDOS or NEWDOS for high 
speed (normal is unaffected) is very easy 
(see 80 Micro, April 1981, p. 240). (Or send 
an SASE to me for even better patches. 
TRSDOS only.) You'll find a surprising in- 
crease in disk speeds, especially from 
Basic. 

Fourth, RAM access time is not as criti- 
cal as Mr. Kitsz indicates. He says you 
must "install a completely new memory 
refresh/select circuit." This is totally in- 
correct! You actually bypass some exist- 
ing circuits to speed access. At triple 



speed the instructions suggest having 
RAMs with, at most, 200 ns. access time. 
But I have some with 250 ns. and have had 
no problems. 

The nebulous reference to a "digital de- 
lay line" as a new select circuit sounds 
very costly and complicated. It is nothing 
more than a 74LS04 inverter with all six 
gates wired in series to produce a slight 
delay. It sells for less than $1 and goes in 
the interface (if you have one). 

The current mod from Archbold is an 
upgraded version (see 80 Micro, July 1981, 
p. 236 for a review of the original). Perhaps 
this is the cause of the confusion. This 
clock mod is reliable, does not entail 
many expensive extras (only $19, Z80B for 
triple speed), and is worth serious consid- 
eration. 

Michael Cash well 

7603 Comanche Drive 

Richmond, VA 23225 



Dennis Kitsz Replies 

/ had to turn back to that February arti- 
cle, because I didn't remember maligning 
the Archbold board at all. Sure enough, I 
didn't. 

I was talking about homebrew installa- 
tions, although the passing mention of 
the Archbold unit in the same phrase 
might have confused Mr. Cashwell. The 
Archbold unit is well designed and has all 
the options Mr. Cashwell mentions. The 
digital delay unit, however, is not just a 
bunch of gates tied together, but rather an 
actual commercial DDU costing $18. The 
gate version sometimes works and some- 
times doesn't (mostly does, but therein 
lies the homebrew problem). I reiterate: If 
you are speeding up, the Archbold speed- 
up is the best thing to consider. 

Dennis Kitsz 
Roxbury, VT 



Model III Banner 

Nelson Ford's change for the prompt 
and banner in NEWDOS80 2.0 (80 Input, 
November 1981) is fine for those still on 
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META TECHNOLOGIES 

26111 Brush Avenue, Euclid Ohio 44132 

CALL TOLL FREE 1-800-321-3552 TO ORDER 
IN OHIO, call (216) 289-7500 (COLLECT) 



marketing 
services 



EPSON 

MX-80, MX-80FT, MX-100 

PRINTERS 

NEW LOWER PRICES! 

CABLES, INTERFACES, ETC. 

TRS-80 KEYBOARD INTER- 
FACES CABLE $69.95 

APPLE INTERFACE 

&CABLE $99.95 

IEEE-488 (PET) INTERFACE 
&CABLE $79.95 

SERIAL (RS-232) 

INTERFACE $74.95 

GRAFTRAX OPTION 
(MX-80 &MX-80/FT) ..$34.95 




EXTRA-LONG 10 ft. RIBBON 

CABLE $24 95 

CONNECTS EPSON PRINTER 
& TRS-80 MICROCOMPUTER 



WE SERVICE WHAT WE SELL! 



complete 

DISK DRIVES 

Includes Case, Power Supply 
and External Drive Connector 



from 



$289 



95 



WE ALSO SELL THE 
INCOMPARABLE 





ADDON DISK DRIVES 

ONE-YEAR LIMITED WARRANTY 

(Parts and Labor, write for complete details) 

TRAXX Add-On Disk Drives are Individually Tested, Burned 

In, Ready to Plug In and Run, and Include Technical 

Documentation and a Static-Free Dust Cover. 

CALL FOR PRICE 



PARAGON 



^^ 



magnetics" 



DISKETTES 



MTC's 

premium Single-Sided, Soft-Sectored 

DOUBLE-DENSITY. 5 'A -inch diskettes with 
reinforcing HUB-RINGS. Individually 100% 
ERROR-FREE certified. Invest in GOLD! 

PARAGON MAGNETICS GOLD $23.95 



Scotch 

Soft-Sectored Diskettes 

5-1/4" 1S/SDen (744-0) $28.95 

5-1/4" 1S/DDen(744D-0) $31.95 

5-1/4" 2S/DDen (745-0) .$39.95 

8" 1S/SDen (740-0) $29.95 

8" 1S/DDen (741-0) $37.95 

8" 2S/DDen (743-0) $49.95 

Hard-Sectored Diskettes 

5-1/4" 1S/D DenlO-sector (744-10) $28.95 

5-1/4" 1S/DDen10-sector(744D-10) $32.95 

5-1/4" 2S/DDen 10-sector(745-10) . . S39.95 

5-1/4" 1S/SDen16-sector(744-16) $28.95 

5-1/4" 1S/DDen16-sector(744D-16) S32.95 

5-1/4" 2S/DDen16-sector(745-16) $39.95 

8" 1S/S Den 32-sector (740-32) $33.95 

8" 1S/D Den 32-sector (741 -32) $39.95 

8" 2S/D Den 32-sector (743-32) $49.95 

Supplies 

5-1/4" Head cleaning kit $29.95 

8" Head cleaning kit $29.95 



Authorized Distributor 
Information Processing Products 



VERBATIM 

Soft-Sectored Diskettes 

5-1/4" 1S/DDen(MD525-01) $26.95 

5-1/4" 2S/DDen(MD550-01) S39.95 

5-1/4"2S/4Den(MD55701) $51.50 

8" 1S/DDen(FD34-8000) $43.95 

Hard-Sectored Diskettes 

5-1/4" 1S/DDen10-sector (MD525-10) $26.95 

5-1/4" 2S/DDen10-sector(MD550-10) $39.95 

5-1/4" 2S/4Den10-sector(MD557-10) $51.50 

'RINGS' & THINGS 

HUB RING KIT for 5'/i" disks $10.95 

HUB RING KIT for 8" disks $12.95 

REFILLS (50 Hub Rings) $ 5.95 

CLEANING KIT for 5V4" drives S24.95 

5'/4-inch diskette case $3.50 

8-inch diskette case $3.95 

5% -inch File Box for 

50 diskettes $24.95 

8-inch File Box for 

50 diskettes $29.95 



TRS-80 is a trademark ol the 

Radio Shack Division of Tandy 

Corporation DATALIFE is a 

trademark ot VERBATIM PLAIN 

JANE, PARAGON MAGNETICS. 

are trademarks of MTC 

© 1982 by Meta Technologies 
Corporation 



MOST ORDERS 

SHIPPED WITHIN 

ONE BUSINESS DAY 

24 Hr. Bulletin Board 
(216)289-8689 



PRICES IN EFFECT 

THRU 

June 30, 1982 

Prices, Specifications, 

and Offerings subject to 

change without notice 

8206 



WE ACCEPT 
•VISA 

• MASTER CHARGE 

•CHECKS 

• MONEY ORDERS 
•C.O.D. 



• Add $3.00 for shipping 
8i handling. 

• $2.00 EXTRA for U.S. 
Mail delivery. 

• $3.00 EXTRA for C.O.D. 

• Ohio residents add 6.5% 
sales tax. 



SQ INPUT 



the Model I but the locations for the Model 
III are different. 

The Ready prompt is located at relative 
sector 164, relative byte EO-EE inclusive. 
The "Mini" prefix for Mini-DOS is in front 
of this at DB-DF inclusive, should you 
also wish to change it. 

The first line of the banner is at relative 
sector 17, 88-98 inclusive and then 9C-C5 
inclusive; the second line at relative sec- 
tor 17, C8-FF inclusive and then relative 
sector 18, 00-01 inclusive; finally, the third 
line is at relative sector 18, 03-3B inclu- 
sive. 

On another subject, does anyone have 
a patch to make TRSDOS 2.3B and 1.3 
(Models I and III) run 80-track drives? 

Allan F. Hawkins 

P.O. Box 38-542 

Howick, New Zealand 



Invalid Complaint 

I just read Dick McKenna's request 
("Access Time," 80 Aid, February 1982) for 
a patch to cause his foreign disk control- 
ler board to properly operate his Radio 
Shack TRS-80 Model III computer. 

He says everything works but TRSDOS. 
I disagree with that and say that every- 
thing works but the non-Radio Shack con- 
troller and drives. McKenna then com- 
plains that Radio Shack's customer ser- 
vice (free computer hotline) wouldn't or 
couldn't tell him how to correct the incom- 
patibility of his drives with the Model III. 
Funny, he didn't even mention calling the 
people who manufactured his drives and 
controller board for help. Did he call them 
for help; if not, why? If so, why didn't they 
provide the help? 

If you are going to buy non-Radio Shack 
peripherals do not expect Radio Shack 
to correct the incompatibilities or defects 
in another manufacturer's hardware or 
software. 

Leigh L. Klotz 

McComb, MS 



Bravo! 

Three colorful cheers for your March is- 
sue on the Color Computer. Those graphic 
programs are super! I find this machine 
better than my Apple to teach program- 
ming. It's time to give this inexpensive but 
powerful machine some credit! 

Marmo Soemarmo 

Ohio University 

Athens, OH 



Faster Basic 
Word Processor 

I have developed a compiled version of 
Delmer D. Hinrichs' Basic Word Processor 
(80 Micro, May 1980). I used the Accel 2 
Compiler. 

To use the compiler I had to modify the 
For. . . Next loops so that their indices are 
set to the final value if a test within the 
loop requires a jump out of the loop. Often 
I had to rewrite the test to use the comple- 
ment condition to obtain valid results. 
With these changes the program com- 
piles using Accel 2. The program takes 
about 1 min 45 sec to compile and the re- 
sultant code is slightly more than double 
the original value. Although it requires a 
machine with 32K of memory, it does not 
require use of a disk. 

The compiled version of the Basic Word 
Processor speeds up typing in words and 
the blanking and compile commands. 

Ronald H. Chapman 
Wheaton, IL 



Don't Forget an SASE 

At the end of my article "Two-Way 
ANOVA" (80 Micro, March 1982) I included 
the offer of all my statistics programs to 
anyone who would send a disk and an 

SASE. 

I was surprised at the high response 
and I appreciate the interesting letters. I 
filled each request almost immediately, 
even though I received requests at about 
five per day for a month after the article 
was published. 

Some readers neglected to send the 
SASE and as a result I have a collection of 
extra disks waiting for use. Obviously, I 
cannot pay postage for the items. If you 



did not send the SASE you will not get the 
programs or the disk back until you do. 
Please send the self-addressed, stamped 
envelope— or appropriate postage— and I 
will return your disks with the programs 
you requested. 

Thanks to all of you for your interest 
and your comments. 

Richard C. McGarvey 

221 Hirsch field Drive 

Williamsville, NY 14221 



Tasmon Update 

Thank you for your Kind review of our 
Tasmon program {80 Microcomputing, 
January 1982). Here are some additions to 
Rowland Archer's review which will be of 
interest to many of your readers: 

Current versions of Tasmon are 1.12 for 
the Model I and D.5 for the Model III. If 
anyone has an earlier version, please 
notify us and we will ship out a new 
tape ASAP. 

All commands are implemented in the 
above versions of Tasmon, including all 
disk I/O. 

If purchasers of the Tasmon source 
code wish a copy of the source code on 
disk, they may include a disk with their 
order. The source code is available only 
from the author. Please specify whether 
you wish Model I or III. 

Mr. Archer wishes more information on 
how to interface user routines with 
Tasmon. Bruce Hansen (author of 
Tasmon) has provided me with the routine 
which further documents this process 
(see Program Listing 1). Hopefully this will 
encourage more users to experiment with 
the (U)ser command. 

In addition, I would like to encourage 
purchasers to return their registration. We 
have already mailed a list of important ad- 
dresses within Tasmon to registered 
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00110 


; 


TASMON 


USER PATCH - 


DISK DIRECTORY 






00120 
















00130 


; 


by Bruce G. Hansen 


- 


01/25/82 09:55:00 






00110 


• 














00150 


• 










5P00 




00160 




ORG 


5F0CH 






'jFOO 


CD5C69 


00170 


JSER 


CALL 


WL 




;DISPLAY THE "U" AND A SPACE 


5P03 


CDE360 


00180 


JSE10 


CALL 


KYINP 




;GET A KEY 


5P06 


PE30 


00190 




CP 


'0' 




; LEGAL DRIVE f ? 


5F08 


38P9 


00200 




JR 


C.USE10 




;GET ANOTHER IF NOT 


5P0A 


FE31 


00210 




CP 


.2)1 






5F0C 


30F5 


002P0 




JR 


NC.USE10 




;GET ANOTHER IF NOT 


5 FOE 


D630 


00230 




SUB 


•0' 




;MAKE IT BINARY 


5F10 


328A5F 


00210 




LD 


(DCB+6),A 




;SAVE DRIVE # 


5P13 


C DAB 69 


00250 




CALL 


CL3 




; CLEAR SCREEN 


5F16 


AP 


00260 




XOR 


A 






5F17 


325B7E 


00270 




LD 


(WRKSTR).A 






5F1A 


DD215B7E 


00280 




I.D 


IX,WRKSTR 






5F1E 


06 08 


00200 




LD 


B,8 




; NUMBER OP DIRECTORY SECTORS 






00 300 


; 


SHOULD 


BE 16 FOR MODEL 


III TRSDOS 1.3. 
















Program Listing 1 Continues 
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META TECHNOLOGIES^^ 

26111 Brush Avenue, Euclid Ohio 44132 WSS 

CALL TOLL FREE 1-800-321 -3552 TO ORDER ^2 

IN OHIO, call <216) 289-7500 (COLLECT) 



MTCAIDS- 



MODELS I & III . . .$69.95 MODEL II . . .$99.95 

Introducing the latest addition to MTC's family of data management systems, AIDS-III. NO 
PROGRAMMING, easy to use. COMPLETE PACKAGE including demonstration application, 
documentation and MAPS-III (see below). 

• Up to 20 USER-DEFINED FIELDS of either numeric- or character-type. 

• CHARACTER-type fields may be any length (total: up to 254 characters). 

• NUMERIC-type fields feature automatic formatting, rounding, decimal alignment and 
validation. 

• Full feature EDITING when adding or changing records: 

- ENTER FIELD (can't type-in more characters than specified). 

■ BACKSPACE (delete last character typed). - RIGHT-JUSTIFY FIELD contents. 

- DELETE FIELD contents - SKIP FIELD (to next or previous field). 

- RESTORE FIELD contents. - SKIP RECORD (to next or previous record). 

• SORTING of records is MACHINE CODE assisted. 

- 200 RECORDS (40 characters) in about 5 SECONDS. 

- ANY COMBINATION of fields (including numerics) with each field in ascending or 

descending order. 

• SELECTION of records for Loading, Updating, Deleting, Printing and Saving is 
MACHINE CODE assisted. 

• Specify up to 4 CRITERIA, each using one of 6 RELATIONAL COMPARISONS. 

- LOAD or SAVE selected records using MULTIPLE FILES. 

- Example: Select records representing those people who live in the state of Col- 

orado, but not in the city of Denver, whose last names begin with "F" 
and whose incomes exceed $9000.00. 

- Example: Select records representing those sales made to XYZ COMPANY that 

exceed $25.00, between the dates 03/15 and 04/10. 

MAPS-III (MTC AIDS PRINT SUBSYSTEM), included at no charge, has the following features: 

• Full AIDS-III SELECTION capabilities. 

• Prints user-specified fields DOWN THE PAGE. 

• Prints user-specified fields in titled, columnar REPORT FORMAT, automatically 
generating column headings, paging and (optionally) indentation. 

• Can create a single report from MULTIPLE FILES. 

• Prints user-defined formats for CUSTOM LABELS, custom forms, etc. 

BELOW ARE TESTIMONIALS from owners of AIDS systems. These are absolutely authentic 
statements and are typical of the comments we receive. 

"This program will do more for my business than all the other programs I 
have, combined." 

David Wareham, Vice President (EDP), National Hospital and Health Care Services Inc. 

"We have 32 different Data Base Management packages for the TRS-80. AIDS-III is easily 

the best. It also makes it easier for us to step up to our Model II since the package is 

available for both computers." . . „.., ,.._,-_, 

Jack Bilinski, President, 80 Microcomputer Services 

"Your AIDS program is far and away the finest information management system that I've 
ever seen. I am currently using it to maintain a clear picture of the demographic data on all 
the kids in our residential treatment program and it is working for me superbly." 

Frank Boehm, Director, Front Door Residential Treatment Program 



MTC CALCS-III™ 

Models I & III $24.95 

Modelll $39.95 

MTC's most popular AIDS subsystem. Use 
for report generation involving basic 
manipulation of numeric data. Features are: 

• Columnar Headings 

• Optional Indentation 

• User-specified Columnar Totals 

• Columnar values computed using con- 
stants and/or column values 

• Balance forward calculations 

• Use for accounting, inventory, financial 
and other numeric-based systems. 



EPSON PRINTERS 

DISK DRIVES 

DISKETTES 

BOOKS 
and more!! 



AIDS OWNERS! 

WE HAVE WHAT 

YOU'VE BEEN 

WAITING IV. . . 

MTC CALCS-IV™, that is. 

• More Computations 

• Save Report Formats on Disk 

• Faster, and more! 

MTC CALCS-IV™ $39.95 

For Models I & III $39.95 

For Model II $59.95 



MTC AIDS MERGE-III™ 

This subsystem will combine up to 14 AIDS- 
created data files into a single, large file. An op- 
tional purge capability removes duplicate entries 
while performing the merge operation (can even 
be used to eliminate duplicates in a single file). 
Machine-code assisted for high-speed perfor- 
mance, MERGE-IIITM properly handles files sorted 
by any combination of fields, including numerics, 
with each field in ascending or descending order. 

MTC AIDS MERGE-III™ $19.95 

For Models I & III $19.95 

For Model II $29.95) 



THE COMPLETE 

MTC AIDS-III 

PACKAGE 



TM 



SAVE $$$$ 



Includes MTC AIDS- 
CALCS-III™ and MERGE- 



TM 



|TM 



A comprehensive system 
at a competitive price! 

MODELI&III $99.95 

MODELII .$149.95 

Add $25 for CALCS-IVTM 



AIDS/P is 
HERE* 



TRS-80 is a trademark of the 

Radio Shack Division of Tandy 

Corporation. DATALIFE is a 

trademark of VERBATIM. PLAIN 

JANE, AIDS-I. AIDS-III. CALCS-III. 

CALCS-IV. MERGE-III are 

trademarks of MTC. 

1982 by Meta Technologies 

Corporation 



MOST ORDERS 
SHIPPED WITHIN 

ONE BUSINESS DAY 

24 Hr. Bulletin Board 
(216)289-8689 



PRICES IN EFFECT 

THRU 

June 30, 1982 

Prices, Specifications, 

and Offerings subject to 

change without notice 

8206 



WE ACCEPT 

• VISA 

• MASTER CHARGE 
•CHECKS 

• MONEY ORDERS 
•C.O.D. 



Add $3.00 for shipping 
& handling. 
•$2.00 EXTRA for U.S. 
Mail delivery. 

• $3.00 EXTRA for C.O.D. 

• Ohio residents add 6.5% 
sales tax. 



We will meet or 
beat any price 
in the U.S.A. on 




MICROCOMPUTERS 

In fact, no matter what price you see 

advertised by Texas Computer Systems, 
Micro Management, Computer Plus, 
Pan American, or any authorized Radio 
Shack dealer for TRS-80 Computers with 
pure factory installed memory and full 
warranty, we'll beat it! , ; -. -***—**— 




We have consistently offered the best 
prices on 

APPLE • COMMODORE VIC-20 

OKIDATA • MICROLINE 
EPSON • WABASH • MAXELL 

- plus a complete line of Diskettes, 
Monitors, Modems and other 
accessories — all at the best delivery 
from the largest inventory in the 
Northeast. 

If you're looking for the best prices in 
the U.S.A., check the others, but call 
Computer Discount of America. 

TRS-80 and Radio Shack are trademarks of Tandy Co. 



Write or call for FREE Computer Catalog 
with pictures, specs, accessories and prices. 

CALL TOLL FREE: 
800-526-53 1 3 



Computer 



of America 



COMPUTER DISCOUNT OF AMERICA. INC. 
15 Marshall Hill Road. West Milford Mall 
West Milford. New Jersey 07480-2198 
In New Jersey Call 201-728-8080 
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«j 5F20 


210200 


00310 




LD 


HL.0002H 






*', 5F23 


228E5F 


00320 




LD 


(DCB+OAH) 


HL 


SET FIRST SECTOR TO TWO 


4 5F26 


0E08 


00330 USE20 


LD 


C,8 




NUMBER OF ENTRIES PER SECTOR. 






00310 




SHOULD 


BE 5 EC!' MODEL III TRSDOS. 


V > 5P28 


118'I5F 


00350 USE30 


LD 


DE.DCD 






J 5F2B 


CD 36 11 


00360 




CALL 


1136H 




READ A SECTOR 


T\ 5F2E 


FE06 


00370 




CP 


6 




ZERO FOR MOD IIP TRSDOS 


"i 5F30 


20'! 2 
217B7E 


00380 
00390 




JR 


NZ, ERROR 
HL,FLBUF 




JUMP ON ERROR 


« 5F32 


| 5F35 


7E 


00100 


;seio 


LD 


a,(hl; 






1 5F36 


B7 


00 110 




on 


A 






5F37 


282F 


00120 




J R 


Z.USE60 






5F39 


FE18 


00130 




CP 


18H 




7FH FOR ALL FILES - 






00135 




INVISIBLE AND SYSTEM 




; ;F3B 


302B 


00110 




JR 


NC.USE60 






5F3D 


110500 


00150 




LD 


DE,5 






5 F10 


19 


00160 




ADD 


HL.DE 






Sr'ili 


160B 


0017 c 




LD 


D.ll 




DO 11 CHARACTERS 


5F13 


7E 


00180 


ISE50 


LD 


A, 'HE) 




GET A FILE NAME CHARACTER 


| 5F11 


CDBA79 


00190 




CALL 


WR 




DISPLAY IT 


H 5F17 


23 


00500 




INC 


HE 






•! 5F18 


15 


00510 




DEC 


D 






A 5 El 9 


20F8 


00520 




JR 


NZ.USE50 




GO DO ANOTHER 


|. 5F1B 


DD3100 


00530 




INC 


(IX+O) 




INCREMENT COLUMN COUNT 


1 5F1E 


DD7E00 


00510 




LD 


A,(IX+0) 




GET COLUMN COUNT 


5F51 


IP 


00550 




RRA 






CARRIAGE RETURN OR TAB? 


5F52 


300A 


00560 




JR 


NC.USE55 






5F51 


3E20 


00570 




LD 


A.20H 




WRITE SOME SPACES 


5F56 


CD5C69 


00580 




CALL 


WL 






5F59 


CD5C69 


00590 




CALL 


WL 






5F5C 


1805 


00600 




JR 


USE57 






5F5E 


3E0D 


00610 


JSE55 


LD 


A.ODH 




WRITE A CARRIAGE RETURN 


5F60 


CDBA79 


00620 




CALL 


WR 






5P63 


111000 


00630 USE57 


LD 


DE.10H 




SKIP REST OF DIRECTORY STUFF. 






00610 




SHOULD 


BE 20H FOR 


MODEL 


II TRSDOS 


5F66 


1803 


00650 




JR 


USE70 






5F68 


112000 


00660 


JSE60 


LD 


DE,20H 




SKIP REST OF DIRECTORY STUFF. 






00670 




SHOULD 


BE 30H FOR 


MODEL 


II TRSDOS 


5F6B 


19 


00680 


JSE70 


ADD 


HL,DE 






5P6C 


OP 


00690 




DEC 


C 






5F6D 


20C6 


00700 




JR 


NZ.USElO 




GO DO ANOTHER ON THIS SECTOR 


5F6F 


10B5 


00710 




DJNZ 


USE20 




DO ANOTHER SECTOR 


5P71 


C3EE60 


00720 




JP 


BREAK 




GO BACK TO TASMON 


5F71 


217D5F 


00730 


;rror 


LD 


HL, BDMSG 




POINT TO ERROR MESSAGE 


5F77 


CDC96F 


00710 




CALL 


WRITE 




DISPLAY IT 


5P7A 


C3EE60 


00750 




JP 


BREAK 




RETURN TO TASMON 


5P7D 


OA 


00760 BDMSG 


DEFB 


OAH 






5P7E 


15 


00770 




DEFM 


'ERROR' 






5P83 


OD 


00780 
00790 
00800 




DEFB 


ODH 










00810 




THE FOLLOWING IS 


4 "FAKE 


FILE CONTROL BLOCK USED TO 






00820 




READ SECTORS. IN 


THIS CASE, DIRECTORY SECTORS ARE 






00830 




TO BE 


READ. 




" 






00810 












5F81 


8028 


00850 


XB 


DEFW 


2880H 




2080H FOR MOD III TRSDOS 


5P86 


20 


00860 




DEFB 


20H 




00 FOR MOD III TRSDOS 


5P87 


7B7E 


00870 




DEPW 


PLBUF 






5P89 


0000 


00880 




DEFW 









5F8B 


Al 


00890 




DEFB 


0A1H 




15H FOR MOD III TRSDOS 


5P8C 


FFOO 


00900 




DEFW 


OOFFH 






5F8E 


0000 


00910 




DEFW 









5F90 


FFOO 


00920 




DEFW 


OOFFH 






5F92 


nop 


00930 




DEFW 


0F11H 




0000 FOR MOD III TRSDOS 


5F9I 


FFFF 


00910 




DEFW 


OPFFFH 




0F11H FOR MOD III TRSDOS 


5P96 


FFFF 


00950 
00960 
00970 




DEFW 


OFPFFII 










00980 




THE FOLLOWING ARE 


EQUATES FOR ROUTINES IN TASMON. 






00990 




THE ADDRESSES LISTED ARE 


FOR THE MODEL I VERSION, 






01000 




THE MODEL III ADDRESSES ARE GIVEN IN THE COMMENT LINE. 






01010 
















01020 












695C 




01030 V 


L 


EQU 


695CH 




695BH 


60E3 




01010 


CYINP 


eqi; 


60E3H 




60E1H 


7E7B 




01050 


n,BUF 


ECE 


7E7BH 




7EE5H 


69AB 




01060 


LS 


KQU 


69ABH 




69AAH 


79BA 




01070 V 


ffi 


EQU 


79BAH 




7A1CH 


60EE 




01080 


REAK 


EQU 


60EEH 




60ECH 


6FC9 




01090 V 


RITE 


EQU 


6FC9H 




6FCCH 


7E5B 




01100 V 


RKSTR EQU 


7E5BH 




7EC5H 






OHIO 
01120 
















01130 




PATCH 


NTO USER POUT. o .':■•■■> .'.;.D o ' 






OHIO 












6 ODE 




01150 




ORG 


60DEH 




60DCH 


2 6 ODE 


00 5 F 


01160 

01170 




DEFW 


5F00H 




5F00H 


* 0000 




01180 




END 








" ooooc 


TOTAL 


ERRORS 












i 32221 


TEXT 


AREA BYTE 
00760 


S LEFT 








f\ BDMSI 


5F7D 


0730 










| BREAK 


60EE 


01080 ( 


0720 


00750 








I CLS 


69AB 


01060 


0250 










$ DCB 


5F81 


00850 


0210 


00320 00350 






■i ERROf 


5F71 


00730 ( 


0380 










J PLBUI 


7E7B 


01050 ( 


0390 


00870 








3 KYIN1 


60E3 


01010 < 


0180 










*j USE1C 


5F03 


00180 < 


0200 


00220 








j USE2( 


5P26 


00330 ( 


0710 










i USE3C 


5F28 


00350 












i USE1C 


5F35 


00 100 


0700 










» USE5C 


5F13 


00180 


0520 










\ U5E5! 


5F5E 


0061C 


0560 










Si USES' 


5F63 


00630 c 


0600 










1 USE6C 


5F68 


00660 1 


0120 


00110 








? : USE70 


5F6B 


00680 


0650 










*> USER 


5 FOG 
695C 


00170 
01030 c 


0'.70 


00580 00 








i WL 


90 






WR 


79BA 


01070 c 


0190 


00620 








i WRITE 


6FC9 


01090 c 


0710 










5| WRKSTR 7E5B 


01100 c 


0270 


00280 
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META TECHNOLOGIES 



1001 



26111 Brush Avenue, Euclid Ohio 44132 
CALL TOLL FREE 1-800-321-3552 TO ORDER 

IN OHIO, call (216) 289-7500 (COLLECT) 



participating 
organization; 



marketing 
services 



THINGS TO 
DO WITH YOUR 
PERSONAL COMPUTER 

BY MARK SAWUSCH 

333 pages $10.95 

333 pages, written in simple terms, of 
"what-to-do" and "how- to-do-it". Suitable 
not only for microcomputers, but for pro- 
grammable calculators as well. Includes 
program listings, formulas, a glossary of 
computer terms and more! Definitely a 
MUST BUY! 



"TRS-80™ DISK AND 
OTHER MYSTERIES" 

by Harvard C. Pennington 

132 pages written in PLAIN ENGLISH packed 
with HOW TO information with details, examples 
and in-depth explanations. Recover tost files and 
directories, remove file protection, make BASIC 
programs unlistable. How to use SUPERZAP, 
recover from DOS errors and MORE! 

TRS-80™ DISK $19.95 

"OTHER MYSTERIES" 
VOLUME II 

by James Farvour 

"MICROSOFT™ BASIC DECODED & OTHER 

MYSTERIES for the TRS-80™" is a primer for 

the internal workings of cassette and disk 

BASIC. More than 300 pages of explanations, 

examples and comments about the Level II 

ROM. 

MICROSOFT™BASIC DECODED $26.95 

'OTHER MYSTERIES" 
VOLUME III 

by Dennis Kitsz 

More than 300 pages of practical hardware and 
software modifications and projects. Discover 
the mysteries of "THE CUSTOM TRS-80™' 
THE CUSTOM TRS-80™ $28.95 

"OTHER MYSTERIES' 
VOLUME IV 

BASIC FASTER 
AND BETTER 

Time-tested and proven techniques and 
routines that can be used in hundreds of ways 
to make your programs smaller, faster and 
better. 

BASIC FASTER & BETTER $26.95 

BFBLIB subroutines diskette .... $19.95 
BFBDEM demonstration diskette $19.95 



MICRO SYSTEM 

DOSPl 

Fast. Smooth. Easy. Maximum 

• Multi-key, multi-array BASIC sort 
•Controlled screen entry 

(INPUT @) 
•TOTAL device routing supported 

in DOS and BASIC 
•Last DOS command is repeatable 

• DISKDUMP utility and more! 

Specify MODEL I or MODEL III 


S SOFTWARE'S 1 

.US 3.4 

features and powerful options: 

•Tape-to-Disk/Disk-to-Tape utility 
•More reliable, much improved 

BACKUP 
•Can read 40-track disks in 

80-track drives 
•200 + page user's guide (includes 

technical reference section) 

$149.95 




ArrAHAI O includes 

NEWDOS/80 Version 2.0 mtc que card™ 

Enhanced version of NEWDOS/80 featuring: 

• Model I double density support 'Enhanced Model I/Model III 

• Directory size is tripled compatability 
•Dynamic merge of BASIC •Selective clearing of variables 

programs »Page by page listings of BASIC 
•Peripheral handling routing programs 

• Enhanced DISASSEMBLER •Command chaining 
•Includes SUPERZAP and more! 

Soecifv MODEL I or MODEL III $149.00 I 






Michael Shrayer's 

ELECTRIC PENCIL 
VERSION II 

for 
Model I and Model III 

An expanded version of the critically ac- 
claimed original word processing system! 
Includes all features of Version I plus many 
new extensions. Runs under most disk 
operating systems, has improved video 
text handling, loads any ASCII file for 
editing (including BASIC files), single sheet 
mode for printing on letterhead and more! 
Simple to use, features 2-key commands. 
An incredible package at an incredible 
price! 

SPECIFY MODEL I OR III 


Let your TRS-80™ Test Itself With 

THE FLOPPY DOCTOR & 
MEMORY DIAGNOSTIC 

by David Stambaugh 

A complete checkup for your MODEL I or 
MODEL III. THE FLOPPY DOCTOR-Version 3 
completely checks every sector of single or 
double density 35-, 40-, 77-, or 80-track disk 
drives. Tests motor speed, head positioning, 
controller functions, status bits and provides 
complete error logging. THE MEMORY 
DIAGNOSTIC checks for proper write/read, 
refresh, executability and exclusivity of all ad- J 
dress locations. Includes both diagnostics and 
complete instruction manual. 

SYSTEM DIAGNOSTICS $24.95 
For MODEL III $29.95 




.«_ MORE 

PRODUCTS 


Tape Version $69.95 





TRS-80 is a trademark ol the 

Radio Shack Division of Tandy 

Corporation. DATALIFE is a 

trademark of VERBATIM. PLAIN 

JANE, AIDS-I. AIDS-HI. CALCSIII. 

CALCS-IV. MERGEIII are 

trademarks of MTC. 

: 1982 by Mala Technologies 

Corporation 



MOST ORDERS 

SHIPPED WITHIN 

ONE BUSINESS DAY 

24 Hr. Bulletin Board 
(216)289-8689 



PRICES IN EFFECT 

THRU 

June 30, 1982 

Prices, Specifications, 

and Offerings subject to 

change without notice 

8206 



WE ACCEPT 
•VISA 

• MASTER CHARGE 
•CHECKS 

• MONEY ORDERS 
•C.O.D. 



II 



• Add $3.00 for shipping 
& handling. 

• $2.00 EXTRA for U.S. 
Mail delivery. 

•$3.00 EXTRA for C.O.D. 

• Ohio residents add 6.5% 
sales tax. 



'NORPAK offers full 

keyboard 

capabilities. . . " 



users. This included the address of the 
Tasmon printer driver so users may inter- 
face their own driver (one of author 
Archer's complaints), and a user routine 
that permits ASCII display of disassem- 
bled mnemonics. We are planning at least 
one other mailing to registered users. 

Charley Butler 

The Alternate Source 

Lansing, Ml 



Tabbing 

An article entitled "Tab Extender" (80 
Micro, February 1982) has prompted me to 
write this letter. 

I own one of the least expensive print- 
ers on the market today, and I have never 
had any problem with tabbing anywhere 
from 1 to 80, and without the use of any 
additional lines or subroutines. 

My method is simple and straight- 
forward. If I want to LPRINT something at 
TAB(72) I type: 

10 LPRINT" here I hit the right arrow 9 times (9X8 = 72) 
and then type whatever I want at TAB<72) 

I never even knew a problem existed un- 
til I read that article! 

Raymond T. Schreiner 
Tuckerton, NJ 



Videotext Update 

I would like to clarify a few apparent 
misunderstandings in Michael E. 
Nadeau's article "Videotext for the 
Masses" (80 Micro, January 1982). 

The usual term by which the systems 
discussed by Mr. Nadeau are known gen- 
erically is videotex (no final t). Videotex 
systems allow the user to access text and 
color graphics from a central computer 
host, and to create and store such infor- 
mation. Videotex systems currently in use 
or under development include Prestel in 
England, Teletel (Antiope) in France, Cap- 
tain in Japan, and Telidon in Canada. 

Strictly speaking, The Source and Com- 
puServe, or any on-line ASCII data provid- 
er and access system, would not be 



termed videotex. 

On page 62 Mr. Nadeau twice states 
(once in the glossary and once in the body 
of the article) that Telidon, sponsored by 
the Canadian government, is "run by Bell 
Canada." This is simply not so, and does a 
disservice to all of the other companies 
which are currently using the Telidon sys- 
tem. Full Telidon systems, including data 
bases, information provision and user in- 
teraction and access, are now being run 
by the federal Department of Communica- 
tions, Infomart of Toronto, TVOntario (in 
broadcast mode), Sasktel (which is not 
Bell Canada), New Brunswick Telephone, 
and many other firms. The Bell Canada 
Telidon field trial— which is known as 
VISTA— has recently begun to be co-man- 
aged by Infomart and Bell Canada. It is a 
large system with many participants, but 
is certainly not the only Telidon system 
running, nor does Bell Canada have exclu- 
sive rights to Telidon systems. 

Our final clarification is in reference to 
Mr. Nadeau's statement that Telidon 
"does not use a full keyboard, and there- 
fore cannot access data bases such as 
CompuServe without modification." NOR- 
PAK offers full keyboard capabilities with 
several of its Telidon products. Our Inte- 
grated Videotex Terminal in particular can 
access both Telidon data bases and any 
ASCII on-line data base such as The 
Source or CompuServe and uses a full 
ASCII keyboard. 

Herb G. Bown, 

Vice-President Corporate Development 

NORPAK Ltd. 

Konata, Ontario 

Canada 



Yes, I erred in the January article. It is 
our editorial policy, though, to spell video- 
text with a "t" because, as best as we can 
tell, that is how the term was originally 
spelled. 

You have my apologies.— M.N. 



Cheers for 80 Micro 

Bravo! on your latest issue featuring 
the Color Computer (March 1982). You 
have restored my faith in you, and I must 
admit I was faltering! After Wayne's re- 
cent comments, I was afraid you had writ- 
ten Color Computer users off the family 
tree. I was glad to see some discussion of 
the true potential of this machine. I hope 
the issue will spark some interest among 
the readership and inspire some shy Color 
Computer programmers to surface. 

Mark S. Mosty 
Kerrville, TX 



Neatlist for Disk 

D.N. Ewart's program Neatlist (80 Mi- 
cro, January 1982) is a welcome addition 
to my program library. I have a 48K system 
with one disk drive but many of my pro- 
grams go beyond the 16K limit of this pro- 
gram. The location of a program in Disk 
Basic is different from Level II. 

This program will run in Disk Basic with 
minor modifications (see Program Listing 
2). I also added a small amount of coding 
to page the printer past the perforations. I 
have a Microline-80 printer and so the 
LPRINT STRING$(S,138) command does 
not work; I substituted an LPRINT" ". The 
top-of-form command on my printer is 
LPRINTCHR$(11). 

I shortened the Data statements by one 
number to keep from losing the last digit 
during disk operations. Because I save the 
program on disk in ASCII, the Data state- 
ments cannot be as long as shown in the 
article. 

To run the program in Disk Basic: 

• Save the Neatlist program in ASCII 
as "NEATLIST",A. 

• Load the program to be listed in the 
normal manner. 



65504 CLS:CLEAR600:DEFINTA-Z:DIMK1(125) : LM=5 : RM=78: S=0 : Tl=5 : POKE 
16424, 67 :POKE16425,l:KK=l:I=PEEK( 16548) +256*PEEK( 16549) -2 :GOSOB6 
5510 : PRINT@520 , "" ; : INPOT"TITLE" ; A$ :GOSUB65524 

65505 IFI=32767THENI=-3276 8ELSEI=I+1:D=PEEK(I) : IFD=0THENP=0:GOSD 
B65524:GOSUB65515:LN!=PEEK(13)+256*PEEK(14) : IFLN! =6 5500THENSTOPE 
LSEGOSUB65520:I=14:GOTO65505ELSEIFD=58THENIFP=1THEN 65506ELSEGOS 
UB65524:GOTO65505ELSE65506 

65515 IFK32765ORI<0THENI3 = I+3ELSEI3=-1* (65533-1) 

65516 IFK32764ORK0THENI4=I+4ELSEI4=-1* (65532-1) 

65517 RETURN 

65520 IFS=0THEN65522ELSEFORJJ=1TOS:LPRINT" " :KK=KK+1 :NEXT 
65522 LPRINTTAB(LM)USING ,1 #####";LNI ;:RETURN 

65527 IFKK>58THEN65528ELSERETURN 

65528 LPRINTCHR$(11) :KK=0:RETURN 

Program Listing 2 
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• Execute the program with MERGE 
"NEATLIST" and RUN65500. 

In line 65504 I changed the definition of 
I to PEEK at 16548,16549 which points to 
the beginning of the Basic program in Lev- 
el II and Disk Basic. 

In line 65505 I added a test to see if the 
index counter goes beyond the 16K limit 
(32767), and if so changes it to minus. 

In lines 65515-65517 I added a short 
subroutine to compute the variables I + 3 
and I + 4 around the 16K limit. 

Lines 65520-65522 and 65527-65528 
are the revisions for my printer and for 
paging. 

James H. Gates 
Fair Oaks, CA 



Make a Fortune 

Many people are investing in Individual 
Retirement Accounts to relieve the social 
security burden in the future. The short 
program (see Program Listing 3) enables 
you to see the value an IRA can have in 
your future. It's amazing how a little per 
month set aside can amount to a fortune 
after 20 or more years. 

Howard D. Ryder Jr. 
St. Petersburg, FL 



Scripsit vs. WordStar 

We must disagree with a statement 
made by Richard Harkness in his review of 
Model 1 1 Scripsit (80 Micro, February 1 982). 

In comparing other word processing 
programs, near the end of the article he 
states "these other programs do not sup- 
port Radio Shack's Daisy Wheel Printer II" 
(with reference to Electric Pencil II, Magic 
Wand and WordStar). We have had excel- 
lent results with our TRS-80 Model II, 
WordStar and Daisy Wheel Printer II, in- 
cluding use of features such as boldface 
printing, underscoring, superscript, sub- 
script, and so on. 

We have used both Scripsit and Word- 
Star in our office and have found Word- 
Star superior to Scripsit for our purposes. 
The print controls are much easier to use 
in WordStar. It is easier to advance 
through a document, add, delete or move 
pages or portions (even columns) of text 
and access the help functions. You may 
set the help function to one of four levels 
—depending on the current user skill— so 
that all, part or none of the help prompts 
are displayed on the screen. You may 
change the help level at any time— even 
during editing— so if you wish to have the 



complete screen for editing a document 
you can still call up the help menu without 
leaving the document or looking for the 
manual. 

The MailMerge feature greatly en- 
hances WordStar's already powerful qual- 
ities. We have found several uses for Mail- 
Merge other than the obvious form letter 
utility. With a little imagination it expands 
WordStar's capabilities by leaps and 
bounds. 

You can even use WordStar for writing 
programs (such as in C-Basic) so that you 
can take advantage of already familiar 
editing features instead of trying to learn 
several sets of editing commands. 

If you really want to know how well 
something works ask someone who has 
used it. After using both programs, the 
few minor modifications necessary to en- 
able WordStar to use the Daisy Wheel 
Printer ll's features were well worth the ef- 
fort. The WordStar user manual contains 
a printer patch area with all the necessary 
information. 

Kathy Morris 

Joe M. Ben net, D.O. & Associates Inc. 

Sedalia, MO 



Faster March 

I was sufficiently impressed with Mr. 
Boothe's program "Save All Humans" (80 
Micro, March 1982) that I had to write in 
appreciation. While the general program 
is just another Space Invaders type pro- 
gram, its true value lies in the delightful 
human characters which march on and off 
the screen at the beginning and end of the 
battle. I would not have believed that the 
animation in the program was so simple 
to execute had I not typed it in myself. 

Unfortunately, and as Mr. Boothe ad- 
mits in his article, the graphics action is 
painfully slow. This is not completely due 
to inherent limitations of Basic as Mr. 



Boothe implies. I am including a small, but 
important, addition to the program. The 
addition of the following line results in a 
significant increase in speed: 165 DIM 
ES,F3,F,Q,T2,SL,P,B,A,K,SW,Z,X,G(5), 
TT,TE,C(6),S,E,QL,A,W,BN,SH,HX,M, 

TH,L,FL,R,E,TS. In addition, delete the 
DIM statements in lines 600 and 1770. 

By placing all variables in a single DIM 
statement, from most to least frequently 
used, the Basic interpreter spends consid- 
erably less time searching the variable 
table for a variable encountered in a pro- 
gram. Hence, the program takes less time 
to execute. 

Peter W. Snyder 
Chicago, IL 



Graphic Codes Revisited 

I read with interest B.L. Howdeshell's 
letter "Graphic Codes" (80 Micro, Decem- 
ber 1981) relating to Epson MX-80 graph- 
ics codes from NEWDOS80 V2.0. 1 have a 
Model III, 48K with disks. 

I called up SYS3/SYS with Superzap and 
installed the 22-byte patch. I pressed the 
JKL keys (in NEWDOS80 this activates a 
screen dump); no graphics were printed. 

The last used byte in SYS3/SYS is File 
Relative Sector (FRS) 4, Relative Byte (RB) 
A2. All of Mr. Howdeshell's code is at and 
beyond FRS 4, RB B9. Therein lies the 
problem! There is no link from SYS3/SYS 
to his code. 

The desired linkage point is at FRS 4, 
RB 9C. I coded my own process of convert- 
ing TRS-80 to MX-80 graphics. The result 
is the following 12 bytes of code, which 
should be appended starting at FRS 4, 
RB A3: 

FE CO 3B 04 3E 2E 18 F3 C6 20 18 EF 

To link this code to SYS3/SYS follow this 
procedure. SYS3/SYS FRS 4, RB 9C 



10 CLS:FORI=0TO127:SET(I,1) : NEXTI 

20 PRINT@10," IRA/ SAVINGS/INVESTMENT ACCOUNT CALCULATOR ": PRINT: 

PRINT: PRINT 

30 POKE16916,4'REM THIS LINE FOR MODEL III ONLY 

40 CLS:L=0: INPUT "MONTLY INVESTMENT $";A 

50 INPUT "ANNUAL INTEREST RATE PERCENTAGE" ; B 

60 INPUT "NUMBER OF YEARS TO BE CALCULATED" ; C 

70 E=A*12:F=B/100+1:FORX=1TOC 

80 L=(E*F+(L*F) ) :NEXTX:PRINT 

90 PRINT "YOUR ACCOUNT BALANCE WILL BE $";L: PRINT 

100 P=E*C:K=L-P: PRINT" YOUR TOTAL INVESTMENT WAS $";P 

110 PRINT "INTEREST YOU EARNED WAS $" ;K : PRINT: PRINT 

120 INPUT"HIT 'ENTER' FOR ANOTHER CALCULATION" ; A$ 

130 IFA$=""THENGOTO40ELSECLS:END 

Program Listing 3 
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Forbidden Planet 




Forbidden Planet 

The First Talking Adventure 

This adventure talks through 
the cassette port. You no 
longer need to have a voice 
synthesizer. This adventure 
takes you to a desolate pla- 
net where only your skill and 
your talking computer will 
help you survive. This is Part 
1 of a multipart talkingadven- 
ture. Like no other ad ven- 
ture you have ever played. 
The first five people to solve 
Forbidden Planet will get the 
next adventure FREE. 

* Split Screen 

* Machine Language 

• Talks through Cassette Port 
■*■ Supports Lower Case 

• Written by William Demas 

Price $39.95 

48K Disk Model I & III 



Forbidden City 

A Talking Adventure 

This adventure talks through 
the cassette port. This is a 
continuation of Forbidden 
Planet Adventure, but you do 
not have to have or play it to 
play Forbidden City. 

Once you enter, there is no 
turning back. Only with the 
help of yourtalking computer 
will you be able to defeat the 
city's master computer and 
the robot guards. 

• Talks through Cassette Port 

• Three Different Voices 

• Machine Language 



Price $39.95 
48K Disk Model I & III 



See Your Local Dealer 

— Dealers Inquires Invited— 

FANTASTIC 
SOFTWARE 

P.O. Box 27734 *x 
Las Vegas, Nevada 891 26 

(702) 362-1457 

1 VISA | 



I^Q ?J 



BO INPUT 



should show a 3E 2E byte sequence. Us- 
ing Superzap zap these two bytes to 18 05. 

When I use T-Bug to get some graphics 
into video RAM, JKL will now send graph- 
ics to the printer. 

The bytes used for this patch are in 
Apparat's reserved zap area for this mod- 
ule. Document your change carefully in 
the event that Apparat comes out with a 
zap for SYS3/SYS. You may have to unzap 
this file. 

William S. Collins 
San Diego, CA 



Do you still plan to support the Model I 
when the Expansion Interface is gone? Or 
should I just sell my computer and buy a 
Model III or an Apple? 

Craig Stein 
Bloomfield, NJ 



The following is an open letter to Ed 
Juge of Radio Shack. 

Expansion 
Interface Worries 

I have a TRS-80 and have generally been 
happy with it. I have stuck up for my ma- 
chine when it's called a Trash-80 and 
when it has been compared to the Apple 



Ed Juge Replies 

Craig Stein's letter points up the confu- 
sion that existed (and maybe still does) 
over the F.C.C. rulings. That's what 
prompted Jon Shirley's February Newslet- 
ter item. 

Jon said that the January 1, 1981 ban 
was on the manufacture (not sale) of 
non-approved equipment. Of our E.I. s, he 
said. . . "We obtained permission to make 
Model I Expansion Interfaces for one addi- 
tional year and, as of December 30, 1981, 
we are not making any more E.l.'s, al- 
though they should be available from our 
stores until around the end of June." 

Craig, we share your disappointment in 



"Does Radio Shack still plan to 
support the Model I when the 
Expansion Interface is gone?" 



and Atari. However, I just received some 
news that upsets and angers me. 

In the December 1981 issue of 80 Micro 
Mr. Green said that the Expansion Inter- 
face may not be saleable. In the February 
1982 issue of Microcomputer News Jon 
Shirley in his column "View from the 7th 
Floor" denied that rumor. I called the toll- 
free number and asked what the truth 
was. The answer was after June 1982 the 
Expansion Interface would not be sold in 
Radio Shack stores. 

I was one of the last to buy a Model I (I 
bought the second last in the store). Your 
catalog says "We still support the revolu- 
tion ... we still provide full support for the 
systems in use. . ." I don't call that sup- 
port. If I could afford to buy an Expansion 
Interface I would. I will not be able to save 
enough money to buy the interface by 
June. Your catalog also says that the in- 
terface is the hub of the system. I have al- 
ready used one port with the printer. How 
am I supposed to expand my system and 
spend my money on disk drives and mo- 
dems without an interface to hook them 
up to? 



having to discontinue the Model I equip- 
ment, but the choice was not ours. 

And yes, we do intend to continue sup- 
port for the Model I by keeping future 
hardware and software compatible when- 
ever possible, as long as there is a de- 
mand. Consider, for example, our new 
Model I (only) double-density conversion 
kit, listed in catalog RSC-7. Of course 
there will be soft and hardware for Model 
III only. 

Craig, we appreciate your choice of and 
enthusiasm for our TRS-80. We like to 
think you chose the best. By the time you 
read this, if rumors are correct, you should 
see that the Apple II is being replaced by a 
newer, more powerful, and cheaper mod- 
el. Nobody is immune to the onward 
march of time and technology. 

Ed Juge, Director 

Computer Merchandising 

Radio Shack 

Fort Worth, TX 

Even after June used Model I Expansion 
Interfaces will still be available for some 
time. — Eds. 
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DISCOUNT & BONUS 
COUPONS 

for 

PRINTERS, DISK DRIVES, DISKETTES, 

SOFTWARE, BOOKS 

and MORE! 



(g> 



just circle 
on your Reader Service 
Card and mail it today. 

or write to: 

FREE COUPONS 

P.O. Box 32010 

Cleveland, Ohio 44132 



just good business///^. . 

Xx^mofketino, 
" u ^--services 



Here's proof that you don't have to 
sacrifice on service to save money; 

Our customers 



gave 



We're proud of our service but 
continually search for ways to 
improve it. 

That's why we include this 
Report Card in every order we 
ship. (We even offer a $5.00 dis- 
count to customers who fill out 
the card and return it.) 

We want to know what you 
think: what you like, what you 
don't. How can we serve you 
better? 

So far, we have received over 
5,000 Report Cards. You've told 
us you think our salespeople are 
knowledgeable and friendly. You 
appreciate that we carry a full 
line of products at the lowest 
possible prices. And, you enjoy 
the economy and convenience of 
mail-order shopping. 

Overall, we got an A-minus. 
Thank you. 

We'll continue to ask for your 
opinion about ways to improve 
— our goal is an A-plus. 



16K RAM SPECIAL 



13.95 

Sel of 8 NEC 4116 ns with instructions. Guaranteed one lull year. 

MODEL I, III SOFTWARE 

LAZY WRITER MOD I 169.00 

LAZY WRITER MOO III 169.00 

MICR0PR00F SPELLING CHECK 84.95 

PR0S0FT NEWSCRIPT MOO I. Ill 99.00 

PROSOFT MAILING LABELS MOD I, III 29.95 

PR0S0FT NEWSCRIPT/LABELS MOO I, III 1 15.00 

SPECIAL DELIVERY MOD I. Ill 1 19.00 

X-TRA SPECIAL DELIVERY MOD I. Ill 179.00 

TRAKCESS MOD 1 24.95 

0MNITERM SMART TERMINAL MOD I, III 89.95 

MAXI-MANAGER MOD I, III 89.95 

DOS PLUS 3 4 MOD 1 89.00 

DOS PLUS 3.4 MOD III 89.00 

DOS PLUS 4,0 MOD 1 129.00 

DOS PLUS 4.0 MOD III 129.00 

LD0S5.1 MODI, III 119,00 



^See List ol Advertisers on page 386 



SUPP 

AVER 

1.000 3 Vj 
3,000 
5,000 ? 




DISKETTES 

ALPHA DISKS 

Single sided, certified Double Density 40 
Hub-Ring. Box ol 10. Guaranteed one full year. 

VERBATIM 

M0 525-01, 10, 16 26.50 

MD 550-01. 10, 16 44.50 

MD 557-01. 10. 16 54.95 

FD 32 or 34-9000 36.00 

FD 32 or 34-8000 '. 45.60 

F0 34-4001 48.60 

DYSAN 

5'/4, SS/DD, BOX OF 10 45.00 



310.00 
249.00 
109.00 

SPECIALS 

SPECIAL NO. 1 

TRS-80 DISK AND OTHER MYSTERIES, BOX OF VERBATIM 
DISKS, PLASTIC LIBRARY CASE 44.50 



DISKETTE STORAGE 

5ft" PLASTIC LIBRARY CASE 2.50 

8" PLASTIC LIBRARY CASE 3.50 

PLASTIC STORAGE BINDER WITH INSERTS 9.95 

PROTECTOR 5'/i" 23.95 

PR0TECT0R8" 29.95 

TRS-80 MOD I HARDWARE 

PERC0M DATA SEPARATOR 27.00 

PERC0M D0U8LER II 159.00 

TAND0N 80 TRACK DISK DRIVE 429.00 

TAND0N 40 TRACK DISK DRIVE 289.00 

LNW D0UBLER WITH DOSPLUS 3.4 159.00 

LNWDOUBLER 5/8 WITH DOS PLUS 209.00 



MODEMS 

NOVATION CAT ACOUSTIC. 



.145.00 



SPECIAL NO. 3 

NEWDOS/80 2.0, BOX OF VERBATIM DISKS, PLASTIC LIBRARY 
CASE 149.00 

SPECIAL NO. 4 

MICROSOFT BASIC COMPILER, BOX OF VERBATIM DISKS, 
PLASTIC LIBRARY CASE 179.00 

SPECIAL NO. 5 

MICROSOFT BASIC DECODED AND OTHER MYSTERIES, BOX OF 
VERBATIM DISKS, PLASTIC LIBRARY CASE 49.95 

DOUBLE DENSITY SPECIAL 

PERC0M D0UBLER II. NEWDOS/80, BOX OF VERBATIM DISKS, 
PLASTIC LIBRARY CASE 279.00 

COMMUNICATION SPECIAL MOD I & III 

NOVATION MODEM, OMNITFRM TERMINAL SOFTWARE 

ACOUSTIC SPECIAL (CAT) 219.00 

DIRECT CONNECT SPECIAL (D-CAT) 239.00 

SERIAL CABLE. 25.00 

DISK LIBRARY SPECIAL 

RACET OISKCAT CATALOGING PROGRAM, FLIP SORT (50 DISK 
CAPACITY), 50 STICK-ON DISK LABELS 59,95 
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CP/M® SOFTWARE FOR MOD II 

MICROSOFT 

MICROSOFT BASIC-80 . . 299.00 

MICROSOFT BASIC COMPILER 319.00 

MICROSOFT FORTRAN-80 . 369.00 

COBOL 80 599.00 

MICRO PRO 

WORDSTAR* 310.00 

MAILMERGE (REQUIRES WORDSTAR)' 110.00 

SPELLSTAR (REQUIRES WORDSTAR)' 199.00 

SUPERSORT* 195.00 

DATASTAR* 245.00 

CALCSTAR' 239.00 

OTHER CP/M® SOFTWARE 

SPELLGUARD 239.00 

SUPERCALC 229.00 

COMMX TERMINAL SOFTWARE 82.00 

dBASE II 599.00 

P&T CP/M* MOD II TRS-80 175.00 

C BASIC 2 115.00 

PASCAL Z. 349.00 

PASCAL MT+ 439.00 

PASCAL/M 205.00 

SYSTEMS PLUS - 

G/L, A/R, A/P. P/R 1799.00 

CONDOR I 579.00 

CONDOR II 849.00 

SUPPLIES 

AVERY TABULABLES 

1.000 3% x 15/16 8.49 

3,000 3% x 15/16 14.95 

5,000 3% x 15/16 19.95 

FAN FOLD PAPER (Pricw fob. s.P.) 

9Vj x 1 1 181b WHITE 3,000 ct 29.00 

14 7/8x11 181b WHITE 3.000 cl 39.00 

CORVUS 

TRS-80 MOD I, II, III 

Controller, Case/P.S., Operating System. A&T 

5 MEGABYTES 3245.00 

10 MEGABYTES 4645.00 

20 MEGABYTES 5545.00 

MIRROR BACK-UP 725.00 

TWO NEW 'OTHER MYSTERIES' 
BOOKS 

THE CUSTOM TRS-80 24.95 

MICROSOFT BASIC FASTER ANO BETTER 24.95 

TRS-80 GAMES 

All games are disk versions. Cassette versions may not be 
available. 

TEMPLE OF APSHAI 34.95 

HELLFIRE WARRIOR 34.95 

STAR WARRIOR 34.95 

RESCUE AT RIGEL 24.95 

CRUSH, CRUMBLE & CHOMP 24.95 

INVADERS FROM SPACE : 17.95 

PINBALL 17.95 

STAR TREK 3.5 17.95 

MISSILE ATTACK 18.95 

STAR FIGHTER 24.95 

Z-CHESS III 24.95 

ADVENTURE NO. 1, 2, & 3. 34.95 

ADVENTURE NO. 4, 5, & 6 34.95 

ADVENTURE NO. 7, 8, & 9 34.95 

DUEL-N-DROIOS 17.95 

STARFLEET ORION 21.95 

INVASION ORION 21.95 

OLYMPIC DECATHLON 24.95 

MONTY PLAYS MONOPOLY 31.95 

SARGONII 31.95 

BLACKJACK MASTER 27.95 

ROBOT ATTACK 17.95 

GALAXY INVASION 17.95 

SUPER NOVA 17.95 

TUESDAY MORNING QUARTERBACK 26.95 

LUNAR LANDER 18.95 

THE MEAN CHECKER MACHINE 21.95 

GAMMON CHALLENGER 18.95 

SPACE ROCKS 18.95 

PIGSKIN 17.95 

ZOSSED IN SPACE 18.95 

ARCADE-80 21.95 

COMBAT 18.95 

SPACE INTRUDERS 17.95 

SILVER FLASH 17.95 

MORTON'S FORK 26.95 

PROJECT OMEGA 21.95 



PRINTERS 

ANADEX DP 9500 1295.00 

ANADEX DP 9501 1295.00 

C-ITOH F-10 40 CPS PARALLEL 1595.00 

C-ITOH 45 CPS PARALLEL 1770.00 

C-ITOH 40 CPS SERIAL 1870.00 

EPSON MX-80 $CALL 

EPSON MX-80 F/T $CALL 

EPSON MX-100 GRAPHIC $CALL 

EPSON GRAFTRAX 90.00 

IDS-445G PAPER TIGER. 779.00 

IDS-460G PAPER TIGER 945.00 



IDS-560G PAPER TIGER 1195.00 

IDS PRISM 80 W/0 COLOR 1099.00 

IDS PRISM 132 W/COLOR 1799.00 

MALIBU 200 DUAL MODE 2695.00 

NEC SPINWRITER 3510 S. RO 1995.00 

NEC SPINWRITER 3530 P. RO 1995.00 

NEC SPINWRITER 7710 S. RO 2595.00 

NEC SPINWRITER 7730 P. RO 2595.00 

NEC SPINWRITER 3500 SELLUM 2295.00 

OKIDATA MICROLINE 80 389.00 

OKIDATA MICROLINE 82A 549.00 

OKIDATA MICROLINE 83A 799.00 

OKIDATA MICROLINE 84 1199.00 



Now you can use your Epson printer 
without wasting computer time. 

Alpha Byte is proud to 
introduce the Microbuffer! 



Improve efficiency by adding a 
Microbuffer to your Epson printer. 

Your computer is capable of 
sending data much faster than 
your Epson is capable of printing 
it. Because of this you and your 
computer spend a lot of time just 
waiting for the Epson to finish 
printing one line before the next 
can be sent. 

You can recover this wasted 
time by installing the Microbuffer 
buffered Centronics-compatible 
parallel interface, from Practical 
Peripherals, Inc. It will allow you to 
print and process simultaneously 
by storing computer output in an 
external RAM buffer until the 
printer is ready for it. You regain 
control of the computer and may 
continue processing while the 
Epson is still printing. 

MBP-16K PARALLEL 
INTERFACE - 16,394 BYTE 

BUFFER 159.00 

The MBP-16K Centronics-com- 



patible parallel interface features a 
16,394 byte buffer for data storage 
and is compatible with standard 
Epson cables. The MBP-16K sup- 
ports all Epson printer commands 
and GRAFTRAX-80. 

MBS-8K RS-232C SERIAL 
INTERFACE • 8,192 BYTE 

BUFFERING 159.00 

The MBS-8K is an RS-232 serial in- 
terface with an 8,192 byte buffer. 
The MBS-8K supports seven baud 
rates (300 to 19,200), hardware and 
X-On/X-Off handshaking, and user 
selectable UART settings. The MBS- 
8K supports all Epson printer com- 
mands and GRAFTRAX-80. 



Both the Microbuffer MBP-16K and 
MBS-8K are easy to install, they 
simply plug into the existing aux- 
iliary interface connector inside 
the Epson MX-80, MX-80 F/T, and 
MX-100 printers. No special user 
software is required for control. 




We guarantee everything tor 30 days. If 
anything is wrong, return the item and we'll make 
it right. And we'll pay the shipping charges. 

We accept Visa and Master Card on all orders; 
COD orders, up to $300.00. 

Add $2.00 for standard UPS shipping and 
handling on orders under 50 lbs. delivered in con- 
tinental U.S. Call for shipping charges over 50 
lbs. Foreign, FP0 and AP0 orders, add 15% for 
shipping. Californians add 6% sales tax. 

Prices quoted are for stock on hand and are 
I £■%■ IT TT ^ subject to change without notice. 

Ir^l 1 tn lb order or for information call 

PRODUCT? (213)7060333 

rnvUVV I W Modern order line: (213)883-8976 

31245 LA BAYA DRIVE, WESTLAKE VILLAGE, CALIFORNIA 91362 
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CP/M is a registered trademark of Digital Research. *Reg. trademark of Micro Pro International Corp. 



SO AID 



"Disabling the Break 

key will increase your 

program's execution speed." 



Disabling Break for 
the Color Computer 

I am writing programs for the TRS-80 
Color Computer in Extended Basic. I 
would like some tips on how to protect 
these programs from being easily copied. 
I understand it is possible to command 
the computer to ignore the Break key, thus 
preventing it from listing a loaded pro- 
gram. How is this accomplished? 

Robert E. Meyers 

52 Botsford St. 

Poland, OH 44514 



Because the Extended Color Basic in- 
terpreter scans the keyboard after the 
execution of every Basic keyword looking 
for the Break and Shift® keys, there is no 
simple location to POKE to disable the 
Break key. 

In the February issue of Color Com- 
puter News, Charles J. Roslund offers the 
Basic routine shown in Program Listing 1 
which will disable Break and Shift @ when 
appended to an existing Extended Color 
Basic program (16K). 

Disabling the Break key is not only a 
way to protect your programs from 
tampering but will increase their execu- 
tion speed, as well. 

Two words of warning: this Break 
disable method will not work during the 
execution of an Input command and, once 
enabled, cannot be overcome; the only 
way to interrupt program execution is to 
press the Reset button! — Eds. 



APL Character 
Generator Wanted 

We are a small engineering consulting 
firm and are very interested in running 
APL (A Programming Language) on our 
TRS-80 Model II. Currently we are running 
Vanguard's APLV80 with Pickles & Trout's 
CP/M using the Model II as the computer 
and an Anderson-Jacobson terminal as 
the console. We want to be able to use the 
TRS-80 CRT to input data, edit programs, 
and so on, but we need to be able to 
generate the APL characters on the 



screen. During the past year we have tried 
to purchase an APL character generator 
for our Model II, but thus far we have been 
unsuccessful. 

Can any readers help us find and pur- 
chase the APL prom? 

Shelly D. Leith 

Administrative Assistant 

Texas Consultants Inc. 

525 North Belt 

Suite 250 

Houston, TX 77060 



LNW-80 
Software Exchange 

I would like to contact other LNW-80 
microcomputer owners who would be 
interested in exchanging high resolution 
software and technical ideas. If there is 
enough interest I would be willing to start 
an LNW-80 user newsletter. 

Jay J. Hokanson 

4345 Manchester Rd. 

Grand Island, NE 68801 



Carbon Film Ribbons 

I am using a TRS-80 microcomputer 
with a Daisy Wheel Printer II as a word pro- 
cessing system. One of my projects is pre- 
paring original articles for printing com- 
mercially as individual pamphlets, using 
AB Dick Offset Masters. My printer tells 
me that I need to print the pages on the 
masters with my printer using a non- 
correctable carbon film ribbon. 

I have been unable to find a cartridge of 
non-correctable carbon film ribbon any- 
where. A local office supply company has 



checked with its suppliers and finds that 
the appropriate carbon film ribbon is not 
available to them. They have also checked 
with appropriate business machine com- 
panies locally, with the same result. I have 
checked with the local Radio Shack com- 
puter store manager and he has not been 
able to locate anything for me. A call to 
Tandy Company— Radio Shack Customer 
Services in Fort Worth— yielded only the 
reply that they do not supply non-cor- 
rectable carbon film ribbons for the Daisy 
Wheel Printer II. i would appreciate any 
help you can give me regarding this 
matter. 

Joyce Babcock 

1711 E. Miller 

Jefferson City, MO 65101 



Faster General Ledger 

Has anyone transferred the Radio 
Shack General Ledger I program from 
Basic to machine language so that it runs 
faster for the Model III? 

A. J. Beall, Jr. PE 

Beall Associates 

3901 Monroe Road 

Charlotte, NC 28205 



Model I 
Equipment Wanted 

I represent a non-profit, charitable cor- 
poration which, over the past year, has 
been relying more and more on microcom- 
puter equipment to conduct its daily af- 
fairs: for word processing, accounting, 
fund raising, mailings, correspondence, 



1 IF PEEK(&H3EB9) OS.H32 THEN CLEAR200 ,&H3EB0:FOR I=&H82B9 TO &H831E 
:POKEI-&H4400,PEEK(I) :NEXT ELSE 5 

2 FORI=0 TO 2:P0KE&H3EBD+I,18,NEXT:I=&H3F1E 

3 POKEI,&H26:P0KEI+1,&H3:POKEI+2,4H7E:POKEI+3,&H83:POKEI+4,&H22:POK 
EI+5,&H7E 

4 POKEI+6,&HA4:POKEI+7,&H4C 

5 POKE&H19B,SH3E:RUN10 

10 REM ** YOUR PROGRAM BEGINS HERE ** 
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and so on. We have received some con- 
tributions of TRS-80 Model I equipment 
which, so far, is serving us well. We would 
be grateful if your readers might consider 
making a tax-deductible contribution of 
additional Model I equipment. Drives, 
printers, and expansion interfaces would 
be especially welcome. 

If you can make such a contribution or 
would like more information, please write 
or call me (collect, if you like) at (617) 
495-9020. 

Robert Epstein, Ph.D. 

Executive Director 

Cambridge Center for 

Behavioral Studies Inc. 

1 1 Ware Si. 

Cambridge, MA 02138 



Special Education Aid 

I recently attended a workshop on 
microcomputers. I see a potential for their 
use in my organization. As Director of 
Education at two community-based facili- 
ties for the mentally retarded, I am investi- 



gating hardware and software that are 
available in this area. I am interested in in- 
struction, programming, and accounting. 
Please send me any information you feel 
would be appropriate for this application. 
Michael R. Fonger 
Director of Education 
Opelousas Developmental Center 
Post Office Drawer 1638 
Opelousas, LA 70570 



Automatic Troubles 

I am experiencing a problem with my 
Epson MX-100 printer. When should I 
enable the automatic carriage return? 

If I enable the switch, I can LPRINT my 
Basic programs and need not worry about 
carriage returns when outputting a line to 
the printer; however, all output from Elec- 
tric Pencil is now double-spaced (in- 
cluding spacing for pagination). 

If I disable the switch to utilize the full 
features of Electric Pencil (including 
pagination, automatic line adjustment, 



and the like) I cannot LLIST my Basic pro- 
grams—the lines overprint each other! 

A I Peponis 

435 Monaco Ave. 

Union City, CA 94587 



Video Signal Info Needed 

We are currently offering an applica- 
tions software package for the Model III. 
We are often asked to give presentations 
before large groups of people. In order to 
demonstrate to such groups, we would 
like to transfer the screen image onto a 
larger monitor or wide-screen tv. Although 
we have a tv rf interface, we have been 
unable to determine precisely how to ob- 
tain the video signal from the Model III. 
Have any of your readers tackled this 
problem? 

Earl B. Beutler, 

Manager, Computer Sales Division 

Trade Service Publications Inc. 

P.O. Box 85007 

San Diego, CA 92138 



PRODUCTS FOR YOUR RADIO SHACK 





MICROTEXT COMMUNICATIONS VIA YOUR MODEM! 



Now you can use your printer with your modem! Your computer can be an 
intelligent printing terminal. Talk to timeshare services or to other personal 
computers; print simultaneously through a second printer port; and re-display 
text stored in memory. Download text to Basic programs; dump to a cassette 
tape, or printer, or both. Microtext can be used with any printer or no printer at 
all. It features user-configurable duplex/parity for special applications, and can 
send any ASCII character. You'll find many uses for this general purpose 
module! Available in ROMPACK, ready-to-use, for $59.95. 



SOFTWARE DEVELOPMENT SYSTEM 

The Micro Works Software Development System (SDS80C) is a complete 6809 
editor, assembler and monitor package contained in one Color Computer program 
pack! Vastly superior to RAM-based assemblers/editors, the SDS80C is non- 
volatile, meaning that if your application program bombs, it can't destroy your 
editor/assembler. Plus it leaves almost all of 16K or 32K RAM free for your 
program. Since all three programs, editor, assembler and monitor are co-resident, 
we eliminate tedious program loading when going back and forth from editing to 
assembly and debugging! 

The powerful screen-oriented Editor features finds, changes, moves, copys and 
much more. All keys have convenient auto repeat (typamatic), and since no line 
numbers are required, the full width of the screen may be used to generate well 
commented code. 

The Assembler features all of the following: complete 6809 instruction set; 
complete 6800 set supported for cross-assembly; conditional assembly; local 
labels; assembly to cassette tape or to memory; listing to screen or printer: and 
mnemonic error codes instead of numbers. 

The versatile ABUG monitor is a compact version of CBUG, tailored for debugging 
programs generated by the Assembler and Editor. It features examine/change of 
memory or registers, cassette load and save, breakpoints and more. SDS80C 
Price: $89.95 



GAMES 



* ^ 



Star Blaster — Blast your way through an asteroid field in this action-packed 
Hi-Res graphics game! Available in ROMPACK; requires 16K. Price: $39.95 
Pac Attack — Try your hand at this challenging game by Computerware, with 
fantastic graphics, sound and action! Cassette requires 16K. Price: $24.95 
Berserk — Have fun zapping robots with this Hi-Res game by Mark Data 
Products. Cassette requires 16K. Price: $24.95 

Adventure — Black Sanctum and Calixto Island by Mark Data Products. Each 
cassette requires 16K. Price: $19.95 each. 



R0MLESS PAK I — is an empty program pack capable of holding two 2716 or 

2732 EPROMs. allowing you up to 8K of program! The PC board inside comes 

with sockets installed, ready to go with the addition of your custom EPROMs. 

Price: $24.95 

2-PASS DISASSEMBLER — with documentation package. 16K; cassette. 80C 

Disassembler Price: $49.95 

CBUG — Machine language monitor. CBUG Cassette Price: $29.95 

CBUG ON 2716 EPR0M: Can plug into Romless Pak I. CBUG ROM Price: 

$39.95 

PARALLEL PRINTER INTERFACE — serial to parallel converter allows use of all 

standard parallel printers. PI80C Price: $69.95 

Assembly Language Programming, by Lance Leventhal. Price: $16.95 

MEMORY UPGRADE KITS: 4-16K Kit Price $39.95. 16-32K (requires soldering 

experience) Price: $39.95 

PARTS & SERVICES: SAMs, 6809Es, RAMs. PIAs. Call for prices. 



THE 



WE SHIP FROM STOCK! 

: /\^D©[^3) •"» l£&& GOOD STUFF! Master Charge/Visa and COD Accepted 

M®[Mrs^ P.O. BOX 1110 DEL MAR, CA 92014 714-942-2400 



See List of Advertisers on page 386 
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WHY 



THE LATEST BLAST 
FROM BIG FIVE... 



DEFENSE 
COMMAND 



IS THE ALPHA JOYSTICK 
SUCH A SUCCESS ? 



Because of games like these. 





WMAAAAA.y^ 



I i i i i * it 



Actual unretouched photos 



DEFENSE 
COMMAND 



Big Five has done it again! Now the most popular 
arcade game of all time has a fascinating new twist. 
The Invaders are back! You are alone, valiantly 
defending the all important nuclear fuel cannister 
stockpile from a convoy of thieving aliens who 
repeatedly break off and attack in precision forma- 
tions. An alien passes your guard, swiftly snatching 
up a cannister and flying straight off. Quick! you 
have one last chance to blast him out of the sky. 
Great action and sound! 




BEST 
^SELLER, 



SCARFMAN 

THE LATEST ARCADE CRAZE now runs on your 

TRS-80. 

It's eat or be eaten. You control Scarfman around 

the maze, gobbing up everything in your path. You 

attempt to eat it all before the monsters devour you. 

Difficulty increases as game progresses. Excellent 

high speed machine language action game. From 

The Cornsoft Group. With sound. 

CAUTION: Played with the Alpha Joystick, Scarfman 

may become addictive. 



SUPER NOVA 



Asteroids float ominously around the 
screen. You must destroy the asteroids 
before they destroy you 1 (Big asteroids 
break into little ones ) Your ship will 
respond to thrust, rotate, hyperspace 
and fire Watch out for that saucer with 
the laser 1 As reviewed in May 1981 Byte 
Magazine 



LUNAR LANDER 



As a vast panorama moonscape scrolls 
by select one of many landing sights. 
The more perilous the spot, the more 
points scored —if you can land safely 
You control LEM mam engines and side 
thrusters Absolutely the best use of 
TRS-80 graphics we have ever seen 1 
From Adventure International. With 
sound 



ATTACK FORC^ 



As your ship appears on the bottom of 
the maze, eight alien ships appear on the 
top. all traveling directly at you! You 
move toward them and tire missiles. But 
the more aliens you destroy, the faster 
the remaining ones become. It you get 
too good you must endure the "Flag- 
ship "... With sound effects! 




COSMIC FIGHTER 



Your ship comes out of hyperspace 
under a convoy of aliens. You destroy 
every one. But another set appears. 
These seem more intelligent. You 
eliminate them. too. Your fuel supply is 
diminishing. You must destroy two more 
sets before you can dock The space 
station is now on your scanner... With 
sound! 



METEOR MISSION II' 



As you look down on your view, 
astronauts cry out for rescue. You must 
maneuver through the asteroids & 
meteors. (Can you get back to the space 
station') Fire lasers to destroy the 
asteroids, but watch out, there could be 
an alien FLAGSHIP lurking Includes 
sound effects! 



TALKING ROBOT ATTACK 



INCREDIBLE! This amazing game actually TALKS 
without a speech synthesizer, through the cassette 
AUXplug 

You are armed with just a hand held laser In a 
remote section of the space station you encounter 
armed robots, some march towards you. some wait 
around corners Watch out. the walls are electrified 
Zap as many robots as you dare before escaping 
into a new section where more robots await you 
The struggle continues With Joystick action and 
VOICE OUTPUT, this game will amaze you 

VOICE OUTPUT! 




Mb ALPHA Products 



79-04 Jamaica Ave., Wood haven. NY. 11421 



(212)296-5916 



GAME PRICES 

16K Level 2, Mod 1 + Mod 3 Cassette: $15.95 
32K Level 2, Mod 1 + Mod 3 Diskette: $19.95 
All games on this page are "Alpha Joystick 
Compatible." They may be played with or 
without joystick (using arrow keys). 



Toll Free 
Order Line 

(BOO) 
221-0916 



ADD $2.00 PER ORDER FOR SHIPPING AND HANDLING 
WE ACCEPT VISA, MASTERCARD, CHECKS, M.O. 
C.0.0. ADD $3 00 EXTRA. 

NY RESIDENTS ADD SALES TAX. MHJB 
OVERSEAS, FPO.APO: ADD 10%. l,„*y 
DEALER DISCOUNTS AVAILABLE 



X. 




rt Swvet 'Deal ; 

l/Vften you buy 
an A/p/ia Joystick 
and games together, 
deduct up to $14.00 
from your order. 




THE 

ALPHA 

JOYSTICK 



MODEL 1 OR 3 

ONLY 

$39.95 

MODEL I OR III. SPECIFY WHEN ORDER- 
ING. PRICE INCLUDES ATARI JOYSTICK + 
ALPHA INTERFACE + INSTRUCTIONS + 
DEMO PROGRAM LISTING. 



Joystick + 1 game : Deduct $ 6.00 
Joystick + 2 games: Deduct $12.00 
Joystick +3 games: Deduct $14.00 



The Alpha Joystick gives you 
real arcade action. Game pro- 
ducers know that it makes 
great games better. That's why 
each month more games from 
more producers are "Alpha 
Joystick Compatible." 

There has never been a 
better time to get your Alpha 
Joystick. With so many 
excellent action games to 
choose from it's time to step 
up to joystick power. 

You will find the Alpha Joy- 
stick simple to use. Just plug it 
in. No modification, wiring or 
batteries are required, and it's 
fully compatible with any other 
TRS-80 accessories. The 
instructions are clear and com- 
plete, we even show you how 
easy it is to experiment in 



BASIC (A = INP(O) reads stick) 
and to convert BASIC pro- 
grams for joystick control. 

MODEL I - Plugs into any Level 
II keyboard (40 pin card edge in 
the back) or expansion inter- 
face (left side, next to printer 
port). Our latest design has a 
"mode" switch for compatibil- 
ity with the many different 
producers of joystick com- 
patible games. 

MODEL III — Works with any 
Model III BASICsystem.lt 
plugs into the 50 pin I/O bus 
(largest edge connector under- 
neath, centered toward the 
rear). It will work with "Joystick 
Compatible" Model III games 
from any producer. 



"If you purchase Alpha's Joy- 
stick you get the exquisite 
pleasure of enjoying (action 
games) to the limit of arcade- 
style realism." 

- 80 Microcomputing 
80 Reviews, Jan '82 



M3 ALPHA Products 

79-04 Jamaica Ave., Woodhaven. NY 11421 ^17 (212)296-5916 



14 DAY MONEY BACK 
GUARANTEE: If you are not 
delighted, return it within 14 
days for a prompt and 
courteous refund. 

Toll Free 
Order Line 

ORDERS ONLY. HOURS: 9 AM - 5:30 PM, E.S.T. 
FOR INFO CALL: (212) 296-5916 

800-221-0916 



ADD $2.00 PER ORDER FOR SHIPPING AND HANDLING 

WE ACCEPT VISA. MASTERCARD, CHECKS. M.O. 

C.O.D. ADD $3.00 EXTRA. 

NY RESIDENTS ADD SALES TAX. 

OVERSEAS, FPO, APO: ADD 10%. 

DEALER DISCOUNTS AVAILABLE 



npn 



8D DEBUg 



"A wrong fix is 
more frustrating than 
the original problem. " 



Screen Scroll Fix 

Mr. Keller's article "As the Screen 
Scrolls" (80 Micro, February 1982) is very 
interesting and useful. 

I have a 16K Model I, Level II, but not the 
Editor/Assembler package. After typing 
Program Listing 3 (pg. 266), I found my 
screen scrolling and saving only the bot- 
tom line. 

Program Listing 1, the source code, was 
written for the top of a 32K machine. List- 
ing 3 POKEs this code to the top of a 16K 



"That last 
digit was lost." 



machine. This works fine until line 210 of 
Listing 1 tries to LD BC with the value 
stored at BB81H by line 190. BB81H is 
above the 16K boundary, 7FFFH. If you 
change this location to 7FD4H, (32724), 
just below the beginning of the program, 
things will work fine. Listing 3 should be 
as shown in Fig. 1 (changes are under- 
scored). Be sure to set the memory size to 
32720 or below. 

The number of top lines to be protected 
is passed to the subroutine at line 65010, 
Listing 3, in PF. To change the size of the 
bottom field, simply increase or decrease 
the test value (16256) in line 65030 by mul- 
tiples of 64. This subroutine can be made 
to do many things by using whatever test 
or directive you wish at line 65050. This 
line determines when the machine lan- 
guage routine is called. 

Daryl Kraft 

1301 Hughitt Ave. 

Superior, W I 54880 



Wrong Fix 

A wrong fix is more frustrating than the 
original problem! In my letter on the 
ULCBAS bug (80 Micro, February 
1982, page 28). there was a missing 
digit. Line 10 should read: Y = PEEK 
(16561) + 256-PEEK(16562) + 1. Somehow 



that last digit was lost on the printing 
room floor. 

Nate Salsbury 

608 Madam Moore's Lane 

New Bern, NC 28560 



A New Exhibition 

There are two bugs in Program Listing 1 
that accompanied my article "Pictures at 
a Model II Exhibition" (80 Micro, March 
1982). 

Line 30 should read GOSUB 280. Line 80 
should read FOR X1 = 1 TO 121. 

To turn off the compressed mode 
change line 270 to read CLS:PRINT@ 
910,CHR$(26)"END OF PROGRAM" 
CHR$(25);CHR$(27);CHR$(15):END 

Jesse W. Baker 

P.O. Box 145 

Fort Kent, ME 04743 



I Can't Get Out! 

Roy Green's Supermaze for the Color 
Computer (80 Micro, March 1982, page 
148) is fun, but I had to change some lines 
to run the program. 

In line 310 delete the apostrophe that 
appears before :PRINT@. In line 320 
delete the apostrophe at the beginning of 
the line. 

Change line 1150 to read IF X = A(100) 
AND D = 4 THEN 1300. Change line 1160 
to read IF X = A(101) AND D = 2 THEN 
1350. 



In Matt Robins' article "Hydra- 
Disk" (80 Micro, March 1982) the 
captions under Figs. 2 and 3 on 
page 208 were reversed. — Eds. 



The main program was 


omitted 


from Richard Ramella's 


article, 


"Shady Characters" (80 


Micro, 


March 1982). The listing 


appears 


below. 




100 REM SHADOW BOX BY RICHARD RAMELLA 


110 CLS 




120 CLEAR 126 




(DATA LIKES) 




1000 FORX=1TO150 




1010 READ A 




1020 READ B 




1030 LPRINT STRINGS(A,"") ; 




1040 LPRINT STRING$(B-A,"*") 




1050 NEXT X 




1060 END 





Michael Goldflam's sort routine ("Goldf lam Sort,"80 Input, February 1982) was 
incorrect as printed. The correct listing follows. 

1 INPUT"HOW MUCH MEMORY WOULD YOU LIKE TO SET ASIDE FOR ITEMS", -B:C 
LEAR B:INPUT"HOW MANY ITEMS TO SORT" ; A: DIMA$ (A) : FOR X=l TO A: INPUT 

A$(X) :NEXT X 

2 FOR X=2 TO A:FOR Xl=l TO X-1:IF A$ (X) <A$ (XI ) THEN 4 ELSE NEXT 

3 NEXT X:GOT05 

4 B$=A$(X):FOR X2=X TO Xl+1 STEP-1 : A$ (X2) =A$ (X2-1) : NEXT: A$ (XI) =B$ : 
GOT03 

5 CLS:PRINT"DONE" : INPUT"HIT <ENTER> TO CONTINUE" ; B: FOR X=l TO A: PR 
INTA$(X);" ";:NEXT 



65110 DATA 0,0,2 05,127,10,3 4,212,127,33,192,63,237,212,127 
65120 DATA 237,66,68,77,42,212,127,17,64,0,237,82,84,93 
65130 DATA 42,212,127,237,176,58,32,64,214,64,50,32,64,201 

Figure 1 
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AND MODEL 



Now Model III users can take advantage of the ALPHA I/O system too* Our new 
MOD III/I BUS CONVERTER allows most port based Model I accessories (such as 
our ANALOG-80, INTERFACER 2 and INTERFACER-80) to connect to the Model III 

RTER, complete with all connectors, only $39.9 




PRINTSWITCH 

Have 2 printers on line at all times and select printer 1 or 
2 by means ol a conveniently located switch. End the problem 
of constantly plugging and unplugging printer cables. PRINT- 
SWITCH is a compact module that plugs onto the parellel printer 
port of your TRS-80 and provides an edge connector for each 
of your two printers. It works with any two types ot printers: 
dot matrix, daisy wheel, plotters. TRS-80 converted selectrics, 
etc. Assembled, tested, ready to use with connector and in- 
structions. For Model I or III (please specify). ONLY . . $59.00 



OS 40W 
@6ID 34P 



^P CABLES 



®§1D 34Pta,54- @ @ @ p 
© E3 34 Ph, 2ft D=» 

© §3 34 Pkl, 4ft 



9- 



■ B 



40Pta,2of4ft 



9- 



SUPERIOR QUALITY REPLACEMENT & EXTENSION CABLES 

Highest quality cable and high force, gold plated contacts 
ensure the utmost in connection reliability. 

O KEYBOARD TO EXPANSION INTERFACE S21 . 

© DISK DRIVE CABLE FOR 1 OR 2 DRIVES $32. 

© DISK DRIVE CABLE FOR 3 OR 4 DRIVES $45. 

© DISK DRIVE CABLE EXTENDER $22 

© PRINTER CABLE EXTENDER $24. 

© 40 PIN BUS EXTENDER - 2 ft. .. $22 4 ft. .. $24. 

Custom cable configurations are also available. Call us. 







YOU ASKED FOR IT: 'EXPANDABUS" XI. X2. X3 AND X4 
CONNECT ALL YOUR TRS-80 DEVICES SIMULTANEOUSLY 
on the 40 pin TRS-80 bus. Any device that normally plugs 
into the keyboard edge connector will also plug into the 
"EXPANDABUS". The "X4" is shown with protective 
covers (included). The TRS-80 keyboard contains the bus 
drivers (74LS36?) lor uo to 20 devices, more than you will 
ever need Using the E/l, it plugs either between KB anfl E/l 
or in the Screen Printer port. Professional quality, gold 
plated contacts. Computer grade 40 conductor ribbon cable. 
X2...$29. X3..S44. X4 ..$59. X5 S74. 

Custom configurations are also available call us 




ANAL0G-80: A WORLD OF NEW APPLICATIONS POSSIBLE. 
8 DIGITAL MULTIMETtRS PLUGGED INTO YOUR rRS-80" 1 
Measure Temperature. Voltage. Current. Light. Pressure, etc 
Very easy !o use lor example, let's read input channel #4 10 
OUT 4 Selects input #4 and also starts the conversion 20 
A = INP(O) Puts the result in variable "A" Voila' 
Specifications Input range 0-5V. to 0-500V. Each channel 
can Oe set to a different scale 

Resolution. ?0mV (on 5V range). Accuracy: 8 bits ( 5%) Port 
Address lumper selectable Plugs into keyboard bus or E/l 
iscreen printer port) Assembled and tested 90 day warranty 
.Complete with power supply, connector, manual $139. 



SPECIAL THIS MONTH.' 



$Q9_5 



DISK DRIVE EXTENDER CABLE. FREE YOUR MINI-DRIVES. 

End the daisy-chain mess once and for all. Fits all mini- 
drives: Percom, Aerocomp, Shugart, Micropolis, MTI, Vista, 
Pertec, Siemens, BASF. East to install: just remove the drive 
cover, plug in the EXTENDER CABLE and replace the cover. 

Now you can change and move your drives without dis- 
assembly. Keep the cover on and the dust out. High reliability 
gold plated contacts, computer grade 34 conductor cable. 
Tested and guaranteed. 

Get one for each drive ... ONLY $8.95 




TIMEOATE 80: REAL-TIME CLOCK/CALENDAR MODULE 

Keeps quartz accurate time lor 3 years on 2 replaceable 
AAA batteries (not included) Gives MO/DATE/YR. DAY ol 
WEEK. HR MINSEC and AM/PM. Features INTELLIGENT 
CALENDAR and even provides lor Leap Year This compact 
module simply plugs into rear of Keyboard or side ot 
Expansion Interlace (may be slipped inside E/l) Includes 
cassette software tor setting clock and patching lo any DOS 
(including NEWDOS 80. 2 0). Optional "Y" connector allows 
lor further expansion For Model I Fully assembled and 
tested Complete with instructions and cassette. ONLY 

power relays ui 



.. inputs «. 
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INTERFACER-80: She most powerful Sense/Control module. 

• 8 industrial grade relays, single pole double tmow isolated 
contacts: 2 Amp. @ 125 Volts. TTL latched outputs are also 
accessible to drive external solid state relays. 

•8 convenient LEDs constantly display the relay stales 
Simple 'OUT" commands (in basic) control the 8 relays. 

.8 optically-isolated inputs for easy Oirect interlacing to 
external switches, photocells, keypads, sensors, etc 
Simple INP" commands read the status of the 8 inputs 
Selectable port address. Clean, compact enclosed design 
Assembled, tested. 90 days warranty Price includes power 
supply, cable connector, superb user's manual. .. . $159 



GREEN SCREEN 

WARNING 

I8M and all the biggies aie using green screen monitors 

Its advantages are now widely advertised. We feel that every 

TRS-80 user should enjoy the benetits it provides But 

WARNING: al! Green Screens are not created equal. Here is 

what we found: 

•Several are just a flat piece of standard colored Lucite The 

green tint was not made for this purpose and is judged by 

many to be too dark. Increasing the brightness control will 

result in a fuzzy display. 

•Some are simply a piece ol thin plastic him taped onto a 

cardboard frame The color is satisfactory but the wobbly turn 

gives it a poor appearance. 

•One "optical filter" is in fact plain acrylic sheeting 

•False claim: A few pretend to "reduce glare", in lact. their 

Hat and shiny surfaces (both film and Lucite type) ADD their 

own reflections to the screen. 

•A few laughs: One ad claims to "reduce screen contrast" 

Sorry gentleman but it's just the opposite One of the Green 

Screen's major benefits is to increase the contrast between 

the text and the background. 

•Drawbacks: Most are using adhesive strips to tasten their 

screen to the monitor. This method makes it awkward to 

remove for necessary periodical cleaning All (except ours) 

are flat. Light pens will not work reliably because of the big 

gap between the screen and the tube. 

Many companies have been manufacturing video fillers for 

years. We are not the first (some think they are), bul we have 

done our homework and we think we manufacture the best 

Green Screen. Here is why: 

•It tits righl onto Ihe piclure tube like a skin because it is the 

only CURVED screen MOLDED exactly to the picture tube 

curvature. It is Cut precisely to cover ihe exposed area ol the 

picture tube. The tit is such that the static electricity is 

sufficient to keep it in place! We also include some invisible 

reusable tape for a more secure fastening 

•The filter material that we use is just right, not too dark nor 

too light. The result is a really eye pleasing display. 

We are so sure that you will never take your Green screen ott 

that we offer an unconditional money-back guaraniy: try our 

Green Screen for 14 days. If for any reason you are not 

delighted with it. return it tor a prompt reiund. 

A last word We think that companies, like ours, who are 

selling mainly by mail should »lisl their street address»have a 

phone number (lor questions and orders ("accept CODs. not 

every one likes lo send checks lo a PO boxaolfer the 

convenience of charging their purchase to major credit cards 

How come we are the only green screen people doing it? 

Older your ALPHA GREEN SCREEN today $1 2 50 




Prodi* 



ADO S2.50 PER ORDER FOR SHIPPING AND HANDLING 

ALL ORDERS SHIPPED FIRST CLASS MAIL 

WE ACCEPT VISA. MASTER CHARGE CHECKS MO 

COD ADD S2 00 EXTRA 

OUANTITY DISCOUNTS AVAILABLE ■! 

N Y RESIDENTS ADO SALES TAX ■■ 



85-71 79 St.WOODHAVEN N.Y. 11421 S Info and order. (212)296-5916 
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Data must have 105 items for each 


change "R" to "— 


'; and in line 270 change 


maze, so I added one zero as the first data 


"L" to "■*-". You must also change lines 


item in lines 3250, 3260, 3290, 3300, 3330, 


1110-1130. In line 1110 change "F" to 


and 3340. Example: 3250 DATA 0, 


CHR$(94); in line 


1120 change "R" to 


11011 


CHR$(9); and in I 


ne 1130 change "L" to 


I also made a change to Supermaze that 


CHR$(8). 




makes it easier to walk through the maze 




Daniel W. Phillips 


if you are unfamiliar with the keyboard. In 




289 S. Sheridan St. 




line 250 change "F" to "T"; in line 260 




Wilkes-Barre, PA 18702 






The article "CP80," page 306 in the April 1982 issue has some technical errors 






which were missed. Line numbers 1600-2190 were deleted 


in the magazine, but 






are correct on the Load 80 tape and disk. They are shown in 


he listing below. The 






Key Box states that CP80 requires at least one disk drive 


. The minimum con- 






figuration is actually 32K Level II, and is not tested under disk operation. Lastly, 






on page 306 the article refers to a Compac program. This is a modem-driver 






package which will soon be appearing 


n 80 Micro. Our thanks to author Brian 






Cameron for pointing out these errors. - 


-Eds. 








7049 FE5B 01600 CP 


5BH 


UP ARROW? 






704B 2007 01610 JR 


NZ,N0TU 


NO 






704D 3EC9 01620 LD 


A,0C9H 


LOAD A RET 






704F 328876 01630 LD 


(POUT) ,A 


STORE IT 






7052 18C6 01640 JR 


CMDHND 








01650 ; 










7054 01660 N0TU EQU 


? 








7054 FE2A 01670 CP 


2 AH 


IS IT STAR? 






7056 2009 01680 JR 


NZ, NOTST 


NO - BYPASS 






7058 01690 CMORE EQU 


$ 








7058 CD9770 01700 CALL 


OURKBD 


GET COMMENT 






705B FE0D 01710 CP 


0DH 


END? 






70 5D 20F9 017 2 JR 


NZ, CMORE 


NO - GET MORE 






705F 18B9 01730 JR 


CMDHND 








7061 01740 NOTST EQU 


$ 








7061 CBAF 01750 RES 


5,A 


INSURE UPPER CASE 






7063 FE44 01760 CP 


4411 


DISPLAY? 






7065 CAF971 01770 JP 


Z,DICMD 








7068 FE53 01780 CP 


5311 


STORE? 






706A CA0C71 01790 JP 


Z,STCMD 








706D FE41 01800 CP 


4.1H 


ADSTOP? 






706F CA0575 01810 JP 


Z,ADSTP 








7072 FE42 01820 CP 


42H 


BEGIN? 






7074 CA3074 01830 JP 


Z,BCMD 








7077 FE45 01840 CP 


45H 


E CMD? 






7079 283D 01850 JR 


Z,ECMD 


YES 






01860 ; 










01870 ; 










707B 00 01880 NOP 










707C 00 01890 NOP 










707D 00 01900 NOP 










01910 ; 










707E 01920 ICMD EQU 5 










707E CD7B76 01930 CALL 


OURMSG 


DISPLAY MSG 






7081 0E 01940 DEFB 


0EH 


CURSOR ON 






7082 0D 01950 DEFB 


CR 








7083 49 01960 DEFM 


'INVALID COMMAN 


)' 






7092 0D 01970 DEFB 


CR 








7093 00 01980 DEFB 


EOM 








01990 ; 










7094 C31A70 02000 JP 


CMDHND 


; START AGAIN 






02010 ; 










7097 02020 OURKBD EQU 


S 








7097 CD2B00 02030 CALL 


KBD 








709A B7 02040 OR 


A 








709B 28FA 02050 JR 


Z, OURKBD 








709D CD8176 02060 CALL 


DSP 








70A0 C9 02070 RET 










02080 ; 










02090 ; 










70A1 02100 WBLK EQU 


$ 








70A1 CD9770 02110 CALL 


OURKBD 


GET A CHAR 






70A4 FE20 02120 CP 


20H 


IS IT A BLANK? 






70A6 2001 02130 JR 


NZ, NOTBL 








70A8 C9 02140 RET 










02150 ; 










70A9 02160 NOTBL EQU 


5 








70A9 Fl 02170 PDF 


AF 


FREE UP STACK 






70AA 18D2 02180 JR 


ICMD 








02190 ; 



















Percom Disk Storage 

Quality Percom products are available from 
the following authorized Percom retailers. 
If a retailer is not listed for your area, call 
Percom toll free at 1-800-527-1222 for the 

address of a nearby retailer, or to order directly 
from Percom 

ARKANSAS 
MICROCOMPUTER SYSTEMS. INC Hoi Spnngs 1501 ) 62.3 5209 

ARIZONA 
SIMUT! K Tucson 1602)323-9391 

CALIFORNIA 
ALPHA BYTE STORES Calabasas 1213) 883-H594 

BERKELEY MICRO COMPUTFRS Berkeley (415)848 7122 

COMPUTER INFORMATION EXCHANGE 

SanLuisRey (714)757 4849 
COMPUTER SERVICE CENTER Hollywood (21318513434 

DESMAR ELECTRONICS Sania Clara (408)988 2208 

HOBBYWORLD Norihndge (213)886 9200 

DISTRICT OF COLUMBIA 
THE PROGRAM STORE Washington (202) 337 469 1 

FLORIDA 
ENTRON.INC Largo (813)586 5012 

MICROSYSTEMS SOFTWARE. INC 

Hollywood (305) 983 3390 

GEORGIA 
COMMERCIAL DATA PRODUCTS Atlanta (404)325-7800 

HAWAII 
COMPUTER CENTER Honolulu ' (808)488 2171 

IDAHO 
OFFICE MAGIC COMPUTERS Boise (208)376 4613 

IDAHO MICROCOMPUTER ' Buhl (208) 543-6292 

ILLINOIS 
GARCIA & ASSOCIATES 



BESCO ELECTRONICS 
CARDENS. INC 

DATA SERVICES INC 



Chicago 
KANSAS 

Shawnee 
Hutchins. 
Wichita 
KENTUCKY 



.ill,- 



OMNITFK 



DAMASCUS CB 

Al TFRNAT1 SOUR! 1. 



THE CODE ROOM 



lEMBERCTRCO 



COLUMBUS TV 
CURTRONICS 



COMPUTER MAGIC 

MASSACHUSETTS 

I ,'wksburv 

MARYLAND 

Damascus 

MICHIGAN 

Lansing 

MINNESOTA 

Eden Praine 

MISSOURI 

Vienna 

NEBRASKA 

Columbus 

Lincoln 

NEW JERSEY 

CHANNEL 1 RADIO SHACK Medford 

DA &D SALES Bloomfield 

NEVADA 

PCS COMPUTER Las Vegas 

NEW YORK 

H & E COMPUTRONICS Spring Valley 

MICRO 80 SYSTEMS Brooklyn 

PROGRAMS UNI IMITED Jericho 

STONY CLOVE New York City 

DATASCAN COMPUTER SYSTEMS. INC . . , 

Selden 

NORTH CAROLINA 

HOLLIDAYMFG Greensboro 

OHIO 
FELDMAN ENTERPRISES Akron 

MPS Wadswonh 

PENNSYLVANIA 
COMPUTER ANALYSTS N. u Bnghti « 

SUNRISE ELECTRONICS Chambersburg 



TENNESSEE 
COMPUTER WORLD. INC Nashville 

TEXAS 

PERCOM COMPUTER! ENTER R.chardson 

COMPUTER TO GO Ausbn 

BREEZE. QSD. INC Dallas 

TEXAS COMPUTER SYSTEMS Ariington 

UTAH 
MICRO MNEMONICS Sunset 

WASHINGTON 
COMPUTER SERVICES Kennewick 

NORTHWEST COMPUTER SERVICE 

Bellvue 
WEST VIRGINIA 
BURCO DISTRIBUTORS Huntington 

WISCONSIN 
BYTE SHOP MILWAUKEE Greenfield 

FINAMORES Marshheld 

FOREIGN DEALERS 
AUSTRALIA 
DICK SMITH ELECTRONICS P.O. Box 321 North Ryde NSW2113 
CANADA 



(913)268 7633 
(316)669 8261 

(316)838 9021 

(502) 893 9334 

(617)851 4580 

(301)253 2101 

1517)487 3358 

(612)934 1826 

(314)422 3353 

(402)564 5531 
(402)423 7771 

(609)654 7454 

(201)751-8444 

(702)870 4138 

(914)425 1535 
(212)748 3236 

(81X1) 645-6038 
(212)391 8337 

(516) 6986285 
(919) 274-6346 

(216)724-5583 

(216)336 2771 

1412)846 9;i23 
1717! 264-8214 

1615)244 6094 

1214! 690-0207 
(512)472-8926 
1214)484 2976 
(8171274-5625 

(801)825-9317 
(509) 582 9759 

; 206) 454-4979 
(304)453-6387 

[414)281 7004 

(7151.384 9610 
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ALPHA ONE Edmonton 


(403)454-8409 


VALERIOTE AND ASSOC GuelphOntano 


1416)624 4899 


DVR ELECTRONICS Surrey B C 


(604)576 1045 


COTS MICROSYSTEMS. LTD Ottawa 


(613) '41 7937 


MICRO COMP ENTERPRISES. INC Pickenng 


1416)839-4561 


MICRO MART Montreal 


(514)7319486 


MEXICO 




CIBERMATIC. S A Mexico 


(905) 592 3433 


COMPUTADORAS Y ASESORAMIENTO 




RioPanvco 14 


Mexico 5 D F 


DOMINICAN REPUBLIC 




RADIO SHACK Santo Domingo 


WIN) .565 9121 



TRS*80* COMPUTING EDITION 



©1981 PercomDataCo., Inc. 



®t)e percom ^ertptjeml 



35 cents 



Percom's DOUBLER II" tolerates wide variations in media, drives 



GARLAND, TEXAS — May 22, 1981 — 
Harold Mauch, president of Percom Data 
Company, announced here today that an im- 
proved version of the Company's innovative 
DOUBLER® adapter, a double-density plug-in 
module for TRS-80' Model I computers, is 
now available. 

Reflecting design refinements based on both 
theoretical analyses and field testing, the 
DOUBLER II®, so named, permits even great- 
er tolerance in variations among media and 
drives than the previous design. 

Like the original DOUBLER, the DOU- 
BLER II plugs into the drive controller IC 
socket of a TRS-80 Model I Expansion Inter- 
face and permits a user to run either single- or 
double-density diskettes on a Model I. 

With a DOUBLER II installed, over four 
times more formatted data — as much as 364 
Kbytes — can be stored on one side of a five- 
inch diskette than can be stored using a stan- 
dard Tandy Model I drive system. 

Moreover, a DOUBLER II equips a Model I 
with the hardware required to run Model III 
diskettes. 

(Ed. Note: See "OS-80®: Bridging the TRS- 
80* software compatibility gap" elsewhere on 
this page.) 

The critical clock-data separation circuitry 
of the DOUBLER II is a proprietary design 
called a ROM -programmed digital phase-lock 
loop data separator. 

According to Mauch, this design is more 
tolerant of differences from diskette to diskette 
and drive to drive, and also provides immunity 
to performance degradation caused by circuit 
component aging. 




Percom DOUBLER II s 



Mauch said "A DOUBLER II will operate 
just as reliably two years after it is installed as it 
will two days after installation. " 

The digital phase-lock loop also eliminates 
the need for trimmer adjustments typical of 
analog phase -lock loop circuits. 

"You plug in a Percom DOUBLER II and 
then forget it," he said. 

The DOUBLER II also features a refined 
Write Precompensation circuit that more 
effectively minimizes the phenomena of bit- 
and peak-shifting, a reliability-impairing char- 
acteristic of magnetic data recording. 

The DOUBLER II, which is fully software 
compatible with the previous DOUBLER, is 
supplied with DBLDOS**, a TRSDOS'- 
compatible disk operating system. 

The DOUBLER II sells for $2>^5, includ- 
ing the DBLDOS diskette. *#ill<|/^ 



Circuit misapplication causes diskette read, format problems. 

High resolution key to reliable data separation 



GARLAND, TEXAS — The Percom 
SEPARATOR® does very well for the Radio 
Shack TRS-80* Model I computer what the 
Tandy disk controller does poorly at best: reli- 
ably separates clock and data signals during 
disk-read operations. 

Unreliable data-clock separation causes for- 
mat verification failures and repeated read 
retries. 

CRC ERROR -TRACK LOCKED OUT 

The problem is most severe on high-number 
(high-density) inner file tracks. 

As reported earlier, the clock-data separa- 
tion problem was traced by Percom to misap- 
plication of the internal separator of the 1771 
drive controller IC used in the Model I. 

The Percom Separator substitutes a high- 
resolution digital data separator circuit, one 
which operates at 16 megahertz, for the low- 
resolution one-megahertz circuit of the Tandy 
design. 

Separator circuits that operate at lower 
frequencies — for example, two- or four- 



megahertz — were found by Percom to provide 
only marginally improved performance over 
the original Tandy circuit. 

The Percom solution is a simple adapter that 
plugs into the drive controller of the Expansion 
Interface (EI). 

Not a kit — some vendors supply an un- 
tested separator kit of resistors, ICs and other 
paraphernalia that may be installed by mod- 
ifying the computer — the Percom 
SEPARATOR is a fully assembled, fully tested 
plug-in module. 

Installation involves merely plugging the 
SEPARATOR into the Model I EI disk con- 
troller chip socket, and plugging the controller 
chip into a socket on the SEPARATOR. 

The SEPARATOR, which sells for only 
$29.95, may be purchased from authorized Per- 
com retailers or ordered directly from the fac- 
tory. The factory toll-free order number is 
1-800-527-1222. 

Ed. note: Opening the TRS-80 Expansion In- 
terface may void the Tandy limited 90-day 
warranty. ^ 2 



The Percom DOUBLER II is available from 
authorized Percom retailers, or may be ordered 
direct from the factory. The factory toil-free 
order number is 1-800-527-1222. 

Ed. note: Opening the TRS-80 Expansion In- 
terface may void the Tandy limited 90-day 

warranty. 

^ i 

AH that glitters is not gold 

OS-80® Bridging the TRS-80* 
software compatibility gap 

Compatibility between TRS-80* Model I diskettes 
and the new Model III is about as genuine as a gold- 
plated lead Krugerrand. 

True, Model I TRSDOS* diskettes can be read on 
a Model III. But first they must be converted and re- 
recorded for Model IN operation. 

And you cannot write to a Model I TRSDOS* dis- 
kette. Not with a Model III. You cannot add a file. 
Delete a file. Or in any way modify a Model I 
TRSDOS diskette with a Model III computer. 

Furthermore, your converted TRSDOS diskettes 
cannot be converted back for Model I operation. 

TRSDOS is a one-way street. And there's no re- 
treating. A point to consider before switching the 
company's payroll to your new Model III. 

Real software compatibility should allow the di- 
rect, immediate interchangeability of Model I and 
Model III diskettes. No read-only limitations, no 
conversion/re-recording steps and no chance to be 
left high and dry with Model III diskettes that can't 
be run on a Model I. 

What's the answer? The answer is Percom's OS- 
80'* family of TRS-80 disk operating systems. 

OS-80 programs allow direct, immediate inter- 
changeability of Model I and Model III diskettes. 

You can run Model I single-density diskettes on a 
Model III; install Percom's plug-in DOUBLER'* 
adapter in your Model I, and you can run double- 
density Model III diskettes on a Model I. 

There's no conversion, no re-recording. 

Slip an OS-80 diskette out of your Model I and in- 
sert it directly in a Model III. 

And vice-versa. 

Just have the correct OS-80 disk operating sys- 
tem — OS-80. OS-80D or OS-80/III — in each com- 
puter. 

Moreover, with OS-80 systems, you can add, de- 
lete, and update files. You can read and write disket- 
tes regardless of the system of origin. 

OS-80 is the original Percom TRS-80 DOS for 
BASIC programmers. 

Even OS-80 utilities are written in BASIC. 

OS-80 is the Percom system about which a user 
wrote, in Creative Computing magazine, "... the best 
$30.00 you will ever spend. "t 

Requiring only seven Kbytes of memory, OS-80 
disk operating systems reside completely in RAM. 
There's no need to dedicate a drive exclusively for a 
system diskette. 

And, unlike TRSDOS, you can work at the track 
sector level, defining and controlling data formats — 
in BASIC — to create simple or complex data struc- 
tures that execute more quickly than TRSDOS files. 

The Percom OS-80 DOS supports single-density 
operation of the Model I computer — price is 
$29.95; the OS-80D supports double-density opera- 
tion of Model I computers equipped with a DOUB- 
LER or DOUBLER II; and, OS-80/III — for the 
Model III of course — supports both single- and 
double-density operation. OS-80D and OS-80/III 
each sell for $49.95. 

«^" 3 



PRICES ANDSPEC1FICATIONS SUBJECTTO CHANGE WITHOUT NOTICE. PRICES DO NOT INCLUDE HANDLING AND SHIPPING. 

PERCOM DATA COMPANY, INC. 11220 Pagcmill Road Dallas, Texas 75243 (214) 340-7081 

^Trademark of Percom Data Company, Inc. 'TRS-80 and TRSDOS ate trademarks of Tandy Corporation which has no relationship to Percom Data Company. 'tCreative Computing Magazine, June, 1980, page 26. 
^See List ot Advertisers on page 386 
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SO ACCOUNTANT 



by Michael Tannenbaum C.P.A. 



"/ deplored the lack of tax planning software and 
suggested this area to software developers. " 



In my February column I discussed 
the state of tax preparation software as 
seen from the vantage point of November 
1981. My thoughts were influenced by a 
survey of our staff conducted during 
September and October. As you might 
recall, I deplored the lack of tax planning 
software and suggested this area to soft- 
ware developers. I also noted that a micro 
might not be the best vehicle for automat- 
ing tax preparation procedures. 

Several readers have taken me to task 
for this conclusion. Mr. Fred E. Guth of 
Gooth Software (931 South Bemiston, St. 
Louis, MO 63105) suggested that I was not 
giving micros the break they deserve. He 
indicated that his software helped many 
tax preparers with return preparation and 
his clients all used TRS-80 models. Unfor- 
tunately, I did not receive a sample of the 
software so I was unable to evaluate it for 
this column. However, F. Lee Radzicki of 
IMPACC Associates (P.O. Box 93, 
Gwynedd Valley, PA 19437) did send me 
his Tax Master system. 

The Tax Master System 

The Tax Master system (TM) simulates 
tax forms on the Model It's display. Any 
tax return preparer familiar with the tax 
form will be able to use this system with 
almost no training. This feature of the TM 
system represents a radical departure 
from the normal service bureau input 
form. Although the input forms used by 
our firm's service bureau are well designed, 
we still require a pre-tax season training 
session in their use for our staff. 

Elimination of the input form has a fur- 
ther benefit. Any ambiguities in how data 
input affects the tax return can be resolved 
immediately. Because of the interaction 
between tax forms, data entered on one 
form often affects calculations on another 
in unexpected ways. This interaction is not 
always obvious to novice tax preparers 
when entering data on service bureau input 
sheets. Should such a misunderstanding 
occur, time will be lost in all the input 
sheets and preparing the return again. 

TM is for use on a two-disk Model II 
system. The programs reside on drive zero 
and the client data files reside on drive one. 
With this type of organization, the data disk 
can accommodate up to 75 clients. The TM 



software developer recommends an alpha- 
betic indexing scheme for establishing 
client disk files. Regardless of the method 
used, the program's sophisticated client 
search method allows the preparer to 
separate and reference clients with the 
same last name, same first name, same 
state of residence but different telephone 
numbers. 



"You cannot just pop 
a CP/M-based 

application system in 
your disk drive and 
expect it to work. " 



Once you have established a client 
master file, TM presents a menu of tax 
forms. Simply select the form and the pro- 
gram displays a facsimile on the screen. 
Because of screen limitations, the entire 
form cannot be displayed at once. The 
system's designers used logical breaks 
within the form to divide it into 
displayable groupings. A maximum of 23 
lines is presented at one time. The last line 
is reserved for messages from the system 
to the user. 

By using the control key, special func- 
tion keys, the tab key and the curly 
bracket ({) keys data is entered on the ap- 
propriate lines on the form. Arithmetic 
operations can be made in numeric data 
entry fields. Each field is a calculator. For 
example, to sum the earnings of a hus- 
band and wife, the operator need only 
enter a plus sign after the first entry. Then 
when he enters the second amount and 
presses the Enter key the field will display 
the sum of the entries. Other arithmetic 
operations such as multiplication and 
division are also permitted. 

When data is entered, the cursor moves 
to the next allowable data entry field. If 
the new field is a subtotal or grand total 
field, pressing the control key and the let- 
ter V automatically does the calculation. If 



the field is the result of calculations done 
on another form, the same key sequence 
extracts the appropriate total. If the other 
form has not yet been completed, the key 
sequence will return a zero. The preparer 
may override the zero amount if he desires 
to estimate the amount. 

You can use an estimate for the 
unknown amount if an approximate tax 
value is to be calculated. The TM system 
permits estimated taxes to be calculated 
since there are two levels of calculation 
(local to the form and global to the return). 
This feature allows you to use the TM sys- 
tem as a tax planning tool. Once the glo- 
bal (entire return) calculation option is ex- 
ercised, the estimate will be replaced by a 
zero if the proper schedule has not been 
prepared. 

At any time the preparer can terminate 
data entry operations even if all informa- 
tion required is not entered. Once this is 
done, the data entered to date is stored on 
the disk and the forms selection menu is 
displayed. Should the preparer elect to 
work on another client, he can exit from 
the forms selection menu and select a 
new client name from the master file. The 
entire forms and client selection pro- 
cedure makes the TM system a close 
analogue of manual procedures. 

At any point in the tax preparation pro- 
cess you can print a set of tax forms. By 
entering appropriate commands when 
you select a form, the totals are dumped 
onto the printer. The format of the report 
has been designed so that you can place a 
tax form overlay on the printout and 
photocopy them. In a pinch, if a tax form 
overlay is not available, you can make the 
printout directly on the form. The latter 
course of action is not very desirable— it 
is difficult to line up the form so data is in 
the proper boxes. Getting a good copy 
takes patience and plenty of extra forms. 

I evaluated the system by entering data 
for an actual taxpayer. As a novice user, 
unfamiliar with the program's control key 
structure, I made many mistakes. The 
system is quite forgiving but a bit 
frustrating to use. For example, when I 
made an error, the system presented a 
flashing message on the last line of the 
screen. You must enter control S to 
acknowledge the message. The system 
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From Computer Plus to YOU . . . 
PLUS ane, PLUS a«e, PLUS 




Model IIM6K $839 

Model III 48K 

2Disc&RS232C$2059 



BUY DIRECT 



Here are just a few of our fine offers . . . 
call TOLL FREE for full information. 



COMPUTERS 

Model II 64K $3300 

Model III 4K LEV I 599 

MODEL III 16K 839 

MODEL III 32K 945.50 

•MODEL III 32K 88150 

MODEL III 48K 1052 

•MODEL III 48K 924 

Model III 48K 

2 Disc &. RS232 c 2059 

Color Computer 4K 310 

Color Computer 16K 416.50 

'Color Computer 16K 352.50 

Color Computer 16K 

w/extended basic 459 

Color Computer 32K 

w/extended basic 525 

Color Computer Drive 470 

Pocket Computer 2 230 

VIDEOTEX 310 
'Computer Plus New Equipment. 

with NEC RAM installed. 

180 Day Computer Plus Warranty. 

We have the lowest possible 
Fully War ran teed Prices AND 
a full complement of Radio Shack 
Software. 

DEALER INQUIRIES ARE INVITED 

Prices subject to change without notice. 
Not responsible for typographical errors. 
TRS-80 Is a registered trademark of Tandy Corp 



PERIPHERALS 




Expansion Interface OK 


$249 


Expansion Interface 16K 


355.50 


'Expansion Interface 16K 


291.50 


Expansion Interface 32K 


462 


•Expansion Interface 32K 


334 


16K RAM N.E.C. 200 N.S.chi 


ds 25 


MODEMS 




Lynx Direct Connect Ml/Mil 


235 


Auto Ans. /Dial 




Telephone Interface II 


169 


R.S. Modem I D.C. 


130 


R.S. Modem II D.C. 


210 


PRINTERS 




Daisy Wheel II 


1695 


Epson MX80 


479 


Epson MX80 FT 


589 


Epson MX100 


759 


Line Printer VII 


315 


Line Printer VIII 


620 


Line Printer V 


1610 



345 
479 
735 
1090 
199 

712 

299 

999 

1518 

2040 




Microline80 

Microline82A 

Microline83A 

Microline 84 Parallel 

P. C. Plotter Printer 
DISK DRIVES 

R.S. Model III 1ST-Drive 

Tandon 40 Track Ml 

R.S. 1 Drive Exp Mil 

R.S. 2 Drive Exp Mil 

R.S. 3 Drive Exp Mil 
SOFTWARE 

R.S. Software 10% off 

Newdos80MIII 

ST80III 
ETC. 

Verbatum 5" Double Density 32 

Verbatum 8" Data Life 49.95 

Ctr-80A recorder 52 

C.C Joysticks 22 



call toll FREE 1-800-343-8124 



ist 



149 
149 




com 




245A Great Road 
Littleton. MA 01460 
617-486-3193 



plus 



I Write for your 
free catalog 



sSee List of Advertisers on page 386 



80 Microcomputing, June/July 1982 • 31 



@softbyte computing 

announces . . ,^398 
STAR SEARCH ASTRONOMY GUIDE Instantly 
display a map of the skies overhead for any date 
and time entered that plots the brightest stars, 
double stars, star clusters, nebula and the exter- 
nal galaxies $19.95 

DATA-FILE MANAGER A complete information 
filing and retrieval system that includes an alpha 
& numeric sort, user-defined record formats of up 
to 240 characters and 12 fields, multi-field search 
and totals, and auto memory size recogni- 
tion $19.95 

STOCK CHART GRAPHER Charts any stock's 
trading prices for up to 60 days, weeks, etc. along 
with volume of shares traded, price moving 

average and relative price change $19.95 

THE COUPON SHOPPER A convenient and 
organized way to keep records of your 
redeemable coupons on hand that also matches 
those coupons to your program-prepared shop- 
ping list... $9.95 

All programs are furnished on cassette for Model 
I or III with at least 16K. Disk owners inquire as 
to disk availability and prices. Overseas add $3.00 
and CT residents add sales tax. 
Softbyte Computing, Box 217, Wallingford, CT 

06492 



OUR 

E COST* 

Save 20-40% on all 
major Brands of micro-software 

90 day guarantee-when you're ha~~ 

we're happy! 

Gigantic inventory of old and new 

releases. 

Overnight shipment by UPS-no per 

item handling fee. 

We credit orders $1" 

from out of 213 






SOFTWA 

For free catalog/orders call 21 3-827-1 851 
(8 am - 5 pm only) New National Direct 
. Phone Number 1-800-423-6326 



FOR 

mmmL oo B ® 

ONLY 

TIRED OF TYPING IN LENGTHY FIELD 
STATEMENTS FOR PROGRAMS WHICH 
ANALYZE PROFILE FILES? WANT TO 
RESTRUCTURE A PROFILE FILE 
MOVING ITEMS IN SEGMENT 1 TO 
SEGMENT 2? YOU NEED C^HUDHlsiS YOU 
MAY NEVER HAVE TO TYPE THE 

WORDS "FIELD AS " AGAIN. 

SEND $5.00' FOR A SAMPLE OUTPUT 
AND PROGRAM. 

'APPLIED TO PURCHASE. 



FOILED D a a 



SWAYBACK SOFTWARE 

BOX 1351 

MERCHANTVILLE, NEW JERSEY 

08109 

609-663-2878 ^ 391 



also requires an uppercase response to a 
bulletin message. While these procedures 
are sound, they are easy to forget and un- 
til they become automatic they add to a 
new user's frustration. 

Once while entering data, the display 
froze. Rebooting the system brought up 
the ominous message "Internal Error at 
E086." The manual advises you to reset 
the system if a strange message appears 
when booting it up. I tried the recommend- 
ed procedure and the problem went away 
temporarily. When I tried to return to the 
form I was working on when the system 
failed, the same problem occurred again. 
The files had been left in an open status. 
The program includes no error trap for this 
occurrence. 

Since all programs in this system are 
supplied in compiled form, the lack of a 
trap for this type of error could be due to 
the compiler used by the system develop- 
er. I detected no other untrapped errors 
during the evaluation sessions. I was 
subsequently advised that a utility is pro- 
vided to close the files. Unfortunately, the 
otherwise excellent documentation does 
not indicate the availability of this utility. 

None of my problems should persuade 
a potential purchaser to avoid this 
system. The problems I encountered are 
typical of those any user must expect with 
a new system. The fact that I prepared an 
accurate return in such a short time 
proved to me the user-friendliness of the 
TM system. The professional tax preparer 
should have no difficulty using the system 
after a brief instruction period. 

During the evaluation process the 
system demonstrated its worth when a K1 



COLORTERM 

The Color Computer'as an intelligent terminal 

with 51 or 64 columns by 21 lines 
plus true lowercase! All done in software. 

Any data format - 16K or 32K -300or HOBaud 

Print and save host data to cassette 

Encode data for secure storage 

User programmable keys 



Much more ! 



^332 



. .very impressed. . ."-The Rainbow 

$34.95(0. S.) 40.95 (Canadian) 
M.Q .VISA, M/C (include expiry) 

MARTIN CONSULTING, 94 Macalester Bay 
Winnipeg, Man. R3T 2X5 CANADA 

•T.M. of Tandy Corp. 



and a 1099 showed up for the test case 
after I had prepared the manual return. 
Entering the new data on the appropriate 
forms and selecting the global calculation 
method generated a revised return in 
minutes. The opportunity for a quick pay- 
back of the system cost is obvious. 

The TM system is equipped to prepare 
28 different types of personal tax forms. 
Unfortunately, this does not include forms 
for any state. A tax preparer in a state 
where income tax returns are reouired 
must still resort to pen and pencil for the 
state return. This limits the market for an 
otherwise excellent software product. De- 
spite its cost of $1300, TM will be worth its 
weight in gold during tax season. Since it 
is a forms oriented system updates are re- 
quired to adjust the system for form and 
law changes. Updates, available for $300 
per year, keep the system current. 

The Shortax System 

The TM system is designed for the 
Model II and utilizes all graphics features 
available on the integrated CRT. It stands 
in sharp contrast to another tax related 
system I received for evaluation. Shortax 
works on a CP/M-based system. Because 
of the large number of different equip- 
ment configurations, application pro- 
grams for CP/M systems usually do not 
use elaborate graphic displays. 

Shortax's lack of fancy graphics does 
not hinder its usefulness. Shortax is a 
planning aid for the professional tax con- 
sultant. Because it groups categories of 
tax return data you cannot use it to pre- 
pare a tax return. However, if you enter the 
appropriate data, it will calculate the tax 
liability of individuals, corporations and 
trusts for up to five different time periods. 
(Shortax was designed by Vernon K. 
Jacobs, a Kansas City CPA who is a pro- 
fessional tax and fananciai consultant.) 

You can use a tax preparation system 
such as TM for planning; however, its 
forms orientation makes tax forecast 
calculations cumbersome. If you use the 
TM system for planning, only the 1981 
rates are available. Shortax contains rates 
and tables valid from 1979-1984. Clearly 
the two systems are designed to serve dif- 
ferent functions. 

Getting Shortax operating was a 
graphic illustration of the difficulty a 
TRSDOS user can have when moving to an 
unfamiliar operating system environment. 
As is common for systems supplied to 
CP/M users, Shortax arrived on a single 
density disk without the operating system 
and the Basic interpreter. To operate 
Shortax I had to acquire the operating 
system and the CP/M version of Basic-80. 
In the future the system will be supplied 
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in compiled form, eliminating the need for 
the Basic-80 interpreter. But you cannot 
just pop a CP/M based application system 
in your disk drive and expect it to work. 
The purchaser has to bring together the 
applications software and the operating 
system. 

Fortunately, I had all the parts.. .so I 
thought. Unfortunately, I was using the 
Lifeboat implementation of CP/M. Shor- 
tax expects the Pickles and Trout version. 
This incompatibility became apparent 
when the computer simply lost its mind 
during processing. I resolved the problem 
quickly and proceeded with my evaluation 
without further incident. 

The Shortax system requires entry of 23 
different facts to prepare an individual tax 
projection. The first three items include 
the tax year to be projected, the filing 
status (single, married filing jointly, and 
so on) and number of exemptions. The 
next 13 items relate to different categor- 
ies of income. If there are variations in 
categories peculiar to a tax year, only the 
categories relevant to the year being pro- 
jected will be displayed. For example, the 
categories "Long term gains prior to 
6/10/81" and "Long term gains after 
6/9/81 " are only important for the 1981 tax 
year and will be displayed only when a 
1981 tax projection is desired. 

All deductions are grouped into two 
categories: "Medical, tax and loss deduc- 
tions" and "Interest contributions and 
miscellaneous deductions." For many tax 
planners these categories may be too 
broad. Also because a recalculation of ad- 
justed gross income might affect some of 
the deductions, you should use the 
system carefully. Without detail, the 
deductible amounts will not be recalculat- 
ed as you vary the components of income. 

You can enter other categories into the 
system, including tax credits, withheld 
and estimated tax paid, net tax preference 
income and the prior four-year base 
period income. The tax planner can review 
the raw data, alter it and calculate the 
potential tax due. The system will display 
the results of the calculation indicating 
the figures in Table 1. 



With this data the planner will have a 
great deal of information concerning tax 
consequences. If the results of the 
calculation indicate an unexpected tax, 
the tax planner can alter the input 
parameters and recalculate the tax. Each 
set of input data can be stored on disk for 
recall as required. You can also print the 
data for distribution to interested parties. 

The same data can be projected to 
another tax period. You can alter the 
original data by a fixed or percentage 
amount. You can then store the new pro- 
file on the disk, use it for a new tax 
calculation or merge it with another pro- 
file. When merging two profiles, you can 
add or subtract the amounts. Once the 
files are combined they will remain in 
memory to be used for a tax calculation or 
stored on disk. 

In addition to combinations of raw pro- 
file data, the system permits you to merge 
the results of tax calculations made on 
different profiles. The tax combination 
feature is useful in determining the total 
tax liability where clients have accumula- 
tion trusts or closely held businesses. The 
system also projects tax liabilities of ac- 
cumulation trusts and corporations. Illus- 
trations of all of these featues are covered 
in a series of test cases included on the 
distribution disk. 

Because the system covers five tax 
years and a major change in tax law, com- 
putations of tax liability are quite com- 
plex. Mr. Jacobs cautions the user to 
become familiar with the system's opera- 
tions before putting it into general use. 
The best way to do this is to enter test 
cases and test the tax calculation 
manually. When the manually calculated 
tax agrees with that calculated by Shor- 
tax, the user has developed an under- 
standing of how the system is handling 
the profile data. 

Shortax is a useful system for the pro- 
fessional tax planner who takes the time 
to understand the system's limitations 
and its potential. It is well worth the $500 
charge. Shortax is available from Syntax 
Corporation, 4500 W 72nd .Terrace, Prairie 
Village, KS66208.H 



Alternative minimum tax 




Total Income (including tax exempt income) 


Net tax due after estimate payments and withholding 


Adjusted Gross Income 


FICA tax 




Taxable Income 


The sum of all federal tax 




Tax from tax rate schedule 


Capital loss carry forward 




Maximum tax (if any) 


Income after taxes 




Income averaging tax calculation 


Highest tax bracket 




Tax credits and payments 


Average tax rate all taxes 




Self-employment tax 


Average tax rate income tax only 


Table 1 


Add-on minimum tax 



BLOCK BREAKER 




A fast and furious action game designed to 
challenge players of all ages and skills! Special 
features include: 

• 9 levels of play 

• sound effects 

• SAVES TOP TEN SCORES 

• machine language 

For the TRS-SO^ Model I, Level II 16K or Model 

III 16K 

Price of $14.95 includes shipping and handling. 
To order call (513) 435-5966 or send check or 
money order to: 

Cedar Software Co. 

1943 Woodson Court 

Centerville, Ohio 45459 



Sottwire Co 
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Dealer inquiries invited. 

' Trademark of TANDY CORP. 
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COMPUTER 
TRS-80 MODEL 1/3 
TR5-80 16K COLOR 


GAMES 

16K LEVEL II 

AND 8K PET 


0NSTRATI0N PROG 
CASSETTE WITH 
USE ON YOUR NEX 
G RACE CASSETTE 

DUO-PAK'S ARE 

PGM SIDE 1. 
GONE FISHING. 

CRAPS 

STARSHIP 


RAM "FROG RACE" COMES 
A FULL REFUND COUPON 
T ORDER. 
$3. WITH CATALOG 

$10 DOLLARS EACH. 

PGM SIDE 2 




SLOT-MACHINE 

..SHERLOCK HOLMES 


TANK ATTACK.. 
NUMBER GUESS. 

SAFARI 




ASSOCIATION 

DICE ROLL 

STARSHIP-2 


MORTAR BATTLE 
TEASER 




MOUSE 


CHEK-CHES... 




STARSHIP-3 


THINK 

TREASURE ISLAND. 

PPED 1ST CLASS MAI 

SPECIFY WHAT C0MP 
B. ERICKS0N 

CHICAGO, IL 


LUCK ft LOGIC 

RESCUE 


. PPD. - NO COD'S. 

JTER YOU HAVE. 
P.O. BOX 11099 
60611 ^371 




REFORMAl 



Model II usersl Convert files between 
TRSDOS and CP/MI 

■ REFORMATTER runs under TRSDOS 

■ Operates on single drive system 

■ Converts in both directions 

■ CP/M operating system not needed 

■ All TRSDOS record lengths supported 

■ Initializes blank CP/M diskette 

■ Displays or dumps CP/M files 

■ Manipulates CP/M directory under 
TRSDOS 

S249.00 from stock. CP/M**IBM and 
CP/M — DEC versions of REFORMATTER 
also available at S249.00 from MicroTech 
Exports, Inc., 467 Hamilton Ave., Palo Alto, 
CA 94301 n Tel: 415/324-91 14 D TWX: 
910-370-7457 MUH-ALTOS l . Dealer R, 
OEM discounts available. ^T I 
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SOFT BITS 

a basic/assembly column 



by Roger Fuller 



Many couples marry in June — to 
celebrate, I will talk about the union 
of Basic and machine code. Basic is a lan- 
guage, but we often think of it as an oper- 
ating system. The distinction is important 
since we can modify an operating system 
easier than we can change a language. 

There are many ways to install machine 
code in a Basic program. In past columns I 
have put it in the initialization stack area, 
a string constant, the input buffer, and 
high memory. 

You can install a machine-code routine 
anywhere there is memory. It should not 
conflict with your operating system or 
your program. That leaves arrays, strings, 
video memory, free memory or any unused 
spot open for installing your code. 

All the routines I present this month are 
at 7000H and are relocatable (except Pro- 
gram Listing 3-to relocate this one you 
must either adjust the address of a sub- 
routine orduplicatethesubroutine in both 
places it is called. This adds 24 bytes but 
reduces the total count by six since two 
Call instructions are eliminated). 

You access each routine by a USR call. 
The USR function allows easy transfer of 
a single value to and back from the ma- 
chine-code subroutine. 

If you study the ROM code involved in 
USR, you will note a call at 27FEH to the 



"/ will talk about 

the union of Basic 

and machine code." 



reserved RAM. The address called (41 A9H) 
normally contains a return, but in Disk 
Basic it holds a call to a routine evaluating 
which USR call (0-9) is desired. You can in- 
tercept the USR function here for special 
purposes. For example, you can add 
numbered USR calls to a non-disk system. 
Another interesting thing about USR is 
that the call at 2802H-252CH will evaluate 
any valid expression. This includes single 
precision, double precision, and even strings. 
Note that the routine at 252CH sets the 
type flag. Errors occur when the type of 
the argument is not integer and Call 
0A7FH is used in the USR call. All of the 
following work: 

10 A% ViUSR(A% ) 
20 A! = USR (A!) 
30 A# = USR ( A# ) 
40 A$ = USR ( A$ ) 

USR is a numeric function and you should 

try to use it that way. To make it evaluate 

and return strings is a violation of syntax. 

Disk Basic does not have the same syn- 







00100 ; 


INVERTER 


PUBLIC DOMAIN 


7000 




00110 


ORG 


7000H 




7000 


21003C 


00120 


LD 


HL,3C00H 


; FIRST SCREEN ROW 


7003 


010004 


00130 


LD 


BC,1024 


;ONE SCREEN 


7006 


7E 


00140 TEST 


LD 


A, (HL) 


;GET SCREEN BYTE 


7007 


FE20 


00150 


CP 


• ' 




7009 


2004 


00160 


JR 


NZ,S+6 


;IF NOT SPACE 


700B 


36BF 


00170 


LD 


(HL) ,191 


;PURE WHITE 


700D 


180C 


00180 


JR 


NEXT 




700F 


FE80 


00190 


CP 


80H 




7011 


3808 


00200 


JR 


C,NEXT 


;IF BELOW GRAPHIC 


7013 


FEC0 


00210 


CP 


0C0H 




7015 


3004 


00220 


JR 


NC,NEXT 


;IF ABOVE GRAPHIC 


7017 


2F 


00230 


CPL 




; INVERT ALL BITS 


7018 


EEC0 


00240 


XOR 


128+64 


;SET BIT 7 RESET BIT 6 


701A 


77 


00250 


LD 


(HL) ,A 


; REPLACE BYTE 


701B 


23 


00260 NEXT 


INC 


HL 


;NEXT SCREEN POSITION 


701C 


0B 


00270 


DEC 


BC 


;DROP COUNT 


701D 


78 


00280 


LD 


A,B 




701E 


Bl 


00290 


OR 


c 


;TEST FOR BC=0 


701F 


20E5 


00300 


JR 


NZ,TEST 


;LOOP TIL DONE 


7021 


C9 


00310 


RET 






0000 




00320 


END 






00000 TOTAL 


ERRORS 














Program Listing 1 





tax for USR as Level II Basic. I have dis- 
cussed patching the Level II USR function 
to have numbered calls like Disk Basic. 
Patching Disk Basic to ignore them is very 
simple; just disable the call at 41A9H by 
POKE 1 5553, 201 . This changes the call to 
the return instruction of Level II. 

Inverting a Screen 

The program in Listing 1 inverts a 
screen. Only spaces and actual graphic 
codes are inverted. This USR routine 
needs no argument; just calling it inverts 
the screen. The code starts by loading HL 
with the address of the first location on 
the screen. Next BC is loaded with the 
number of screen locations. 

The scanner loop is labelled Test. It 
gets a character from the screen and 
checks for a space in line 150. If the char- 
acter is a space it is replaced by a solid 
white block and control jumps to the label 
Next (the loop boundary). 

If the screen character is not a space a 
relative jump passes control to line 190. 
Here the character is compared to 80H (a 
graphic blank). If the value of the charac- 
ter is less than 80H the carry flag is set 
and control passes to Next. If the screen 
character is greater than 191 (a solid white 
block) then the compare in line 210 will not 
produce a carry and control will pass to 
Next. 

If control still has not passed to Next 
then a CPL instruction will change the 
state of all bits. All graphic codes have bit 
7 set and bit 6 reset. A CPL will leave these 
two bits incorrect. Restore them by XOR- 
ing with a mask containing only bit 7 and 
bit 6 set. Figure 1 shows the bit patterns. 

The XOR will set bit 7 since it is zero af- 



IIT POSITION - 
IT VALUE 



GRAPHIC CODE- 

AFTER CPL 

I28 ♦ 64 MASK- 
AFTER XOR 



128 


64 


32 


16 


8 


4 


2 


1 


1 


O 


X 


X 


X 


X 


X 


X 





1 


X 


X 


X 


X 


X 


X 


i 


1 





















Figure 1 
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Reader Service lor facing page ^47" 



HEATH/ZENITH &YOU, INC. 
ONE STRONG PARTNERSHIP 



A computer purchase is the beginning of a long-term partner- 
ship between you and the people you buy from. Your ongoing 
need for software, peripherals and accessories requires a 
partner who will stand by you with a growing line of products 
to meet your needs. Heath/Zenith will be that strong partner 
for you. Look what we have to offer. 

THE ALL-IN-ONE COMPUTER - The heart of the Heath/ 
Zenith line is the stand-alone 89 Computer. It's a complete 
system with built-in 5.25-inch floppy disk drive, professional 
keyboard and keypad, smart video terminal, two Z-80 micro- 
processors and three RS-232C Serial I/O Ports. It comes 
with 48K bytes of RAM. expandable to 64K. 

PERIPHERALS AND ACCESSORIES - These include the 
popular Heath/Zenith 19 Smart Video 
Terminal, loaded with professional features. 
We also offer color and black and white 
monitors, modems, computer lan- 
guage courses, and high-speed 
typewriter-quality / 
printers. _^f 





SOFTWARE - New software, in- 
cludes the SuperCalc Spread- 
sheet and Condor Data Base 
Management System. Word processing, including 
three different programs. Small Business Programs, feature 
Peachtree's Series 5, Softstuff's General Ledger and Inven- 
tory Control. HUG. Heath Users' Group, offers members a 
library of over 500 low-cost programs for home, work or play. 



PROGRAMMING LANGUAGES- 

For your own custom programs, 
Microsoft languages are available in 
BASIC (compiler and interpreter), 
FORTRAN and COBOL. 



APPLICATIONS SOFTWARE - Expand the performance 
range of your computer with a broad selection of software, 
including the best of Digital Research and Micropro - as 
well as the complete line of Softstuff™ products. 





OPERATING SYSTEMS - Three versatile systems give you 
the capability to perform your specific tasks. CP/M by Digital 
Research makes your system compatible with thousands of 
popular CP/M programs. UCSD P-System with Pascal is a 
complete program development and execution environment. 
HDOS, Heath Disk Operating System gives you a sophisti- 
cated flexible environment for program construction, storage, 
and editing. 

DISK SYSTEMS -The new Heath/ 

Zenith 67 Winchester Disk System, 

for commercial use, adds nearly 

11 megabytes of storage to your 89 ^^^^ 
computer. It includes an 8-inch 

floppy disk drive for data portability. The 
new 5.25-inch 37 disk system, available 
with 1 or 2 drives, adds up to 1 .28 mega- 
bytes of storage. Both plug-in systems 
have write protection. 

SERVICE AND SUPPORT- Prompt and professional serv- 
ice and assistance is available nationally through Heathkit 
Electronics Centers, Zenith Data Systems for commercial 
users or through Heath factory servicing and phone-in tech- 
nical assistance. 

Complete, integrated computer hardware and software, de- 
signed to serve and grow with you - that's what to look for in 
a strong partner. And with Heath/Zenith you get it all. 



Heath/Zenith computer products are 
sold nationwide through Heathkit 
Electronic Centers* (check your white 
pages for locations). For a FREE 
catalog and mail order service, write: 
Heath Co., Dept. 035-904, 
Benton Harbor, Ml 49022. v w 




HEATH/ZENITH 

Your strong partner 





*- 



Product specifications are subject to change without notice. 

'Heathkit Electronic Centers are operated by Veritechnology Electronics 

Corporation, a wholly-owned subsidiary of Zenith Radio Corporation. 



SOFT BITS 



ter the CPL and bit 7 of the mask is one. 
Bit 6 is one after the CPL and will be reset 
to zero since bit 6 of the mask is also one; 
XOR will reset if both values are one. All 
other bits are left the same. Alternately 
you can replace line 240 with an Add A,64 
instruction. This changes bit 6 to zero and 
the carry changes bit 7 to one. 

At Next the screen pointer HL is moved 
one position and the byte counter BC is re- 
duced by one. Then the B register is load- 
ed into A at line 280 and ORed with C. If 
both B and C are zero the result is zero and 
the loop falls through; otherwise, control 
passes back to Test and the loop con- 
tinues. 

If you delete lines 150-180 only screen 
positions with graphic codes will be 



changed. This allows you to flash graphic 
sections on the screen, leaving spaces in 
text or around the screen undisturbed. If 
you are hand-assembling and remove 
these lines remember to adjust the rela- 
tive jump at line 300 to reflect the loss of 
eight bytes. 

Program Listing 2 is a routine to change 
all lowercase letters in a string to up- 
percase. This requires that you pass the 
location of the string via the USR argu- 
ment to the machine code. Therefore the 
argument of the USR function is the 
VARPTR of the target string. To capitalize 
all characters in S$ use this code: 10 X = 
USR (VARPTR (S$)). 

The VARPTR of a string variable does 
not return the address of the first charac- 







00100 


; CAPITALIZER 


PUBLIC DOMAIN 


7008 




00110 


ORG 


7000H 




7000 


CD7F0A 


00120 


CALL 


0A7FH 


;GET STRING POINTER ADDRESS 


7003 


46 


00130 


LD 


B, (HL) 


;GET STRING LENGTH 


7004 


7 8 


00140 


I,D 


A,B 


j 


7005 


B7 


00150 


OR 


A 


;TEST FOR NULL STRING 


7006 


2813 


00160 


JR 


Z,LOOP+2 


| EXIT IF NULL 


7008 


23 


00170 


INC 


HL 


; POINT TO STRING LSB 


7009 


5E 


80180 


LD 


E, (HL) 


; GET IT 


700A 


23 


00190 


INC 


HL 


; POINT TO STRING MSB 


700B 


56 


00200 


LD 


D, (HL) 


; GET IT 


700C 


K3 


00210 


EX 


DE,HL 


;NOW HL => STRING ITSELF 


700D 


7E 


00220 


CAPTL LD 


A, (HL) 


;GET STRING CHAR 


700E 


FE61 


00230 


CP 


61H 




7010 


3806 


00240 


JR 


CLOOP-1 


; BELOW A LOWER CASE A 


7012 


FE7B 


00250 


CP 


7BH 




7 014 


3002 


00260 


JR 


NC , LOOP- 


1; ABOVE A LOWER CASE Z 


7016 


CBAE 


00270 


RES 


5,(HL) 


; CONVERT TO UPPER CASE 


7018 


23 


00280 


INC 


HL 


j POINT TO NEXT STRING 


7019 


10F2 


00290 


LOOP DJNZ 


CAPTL 




701B 


C9 


00300 


RET 






0000 




00310 


END 






00000 TOTAL 


ERRORS 














Program 


Listing 2 









00100 ; 


REVERSE 


A STRING PUBLIC DOMAIN 






00110 ; 








7000 




00120 


ORG 


7000H 




7000 


CD7F0A 


00130 


CALL 


0A7FH 


;GET STRING POINTER 


7003 


4E 


00140 


LD 


C,(HL) 


; LENGTH TO C 


7004 


AF 


00150 


XOR 


A 


;ZERO A 


7005 


47 


00160 


LD 


B,A 


;NOW BC=LENGTH OF STRING 


7006 


23 


00170 


INC 


HL 


; POINT TO STRING LSB 


7007 


5E 


00180 


LD 


E, (HL) 


; GET IT 


7008 


23 


00190 


INC 


HL 


; POINT TO STRING MSB 


7009 


56 


00200 


LD 


D, (HL) 


; GET IT 


700A 


D5 


00210 


PUSH 


DE 




700B 


El 


00220 


POP 


HL 


;NOW HL = DE 


700C 


09 


00230 


ADD 


HL,BC 


; POINT HL TO END OF STRING +1 


700D 


2B 


00240 


DEC 


HL 


/BACKUP TO ACTUAL END 


700E 


41 


00250 


I.D 


B r C 


;GET LENGTH AGAIN 


700F 


CB3 8 


00260 


SRL 


B 


; DIVIDE LENGTH BY TWO 


7011 


2809 


00270 


JR 


Z,EXIT 


;IF LENGTH TOO SHORT 


7 013 


4E 


00280 RVERSE 


1,0 


C,(HL) 


;GET END CHAR 


7014 


1A 


00290 


LD 


A,(DE) 


;GET FIRST CHAR 


70.1', 


77 


00300 


LD 


(HL) ,A 


; FIRST SHALL GO LAST 


7016 


79 


00310 


LD 


A,C 


• 


7017 


12 


00320 


LD 


(DE),A 


;LAST SHALL GO FIRST 


70 ii; 


13 


00330 


INC 


DE 


;MOVE UP START POINTER 


7019 


2B 


00340 


DEC 


HL 


;MOVE BACK END POINTER 


701A 


10F7 


00350 


DJNZ 


RVERSE 


;LOOP TIL DONE 


701C 


C9 


00360 EXIT 


RET 






0000 




00370 


END 






00000 TOTAL 


ERRORS 














Program Listing 3 





ter of a string, but the address of a de- 
scriptor block. The first character is the 
length of the string and the next two are 
the addresses of the actual string in 
LSB, MSB format. The USR routine will 
place the VARPTR address in Basic's 
arithmetic work area. You can transfer 
this integer address to the HL register pair 
by calling 0A7FH as in line 120. 

The length of the string is loaded into 
the B register and tested for zero. If it is a 
null string no action is taken. Sincethe ad- 
dress pointer for a null string must point 
somewhere, any modification of that loca- 
tion may be unwanted. If the string is not 
null lines 170-200 load the address of the 
actual string of characters into the DE reg- 
ister pair. Line 210 swaps the DE and HL 
register pairs, allowing the more versatile 
HL register pair to serve as the pointer. 

At CAPTL the first character is loaded 
into the accumulator and tested for a val- 
ue less than 61 H (lowercase A). If so, no 
action is needed; otherwise the character 
is tested for a value below 7BH (the next 
ASCII code after a lowercase Z). If the 
character is below 7BH then it is a lower- 
case letter and line 270 resets bit 5. This 
action occurs directly on the byte in mem- 
ory, not on its image in the accumulator. 

HL is moved up one place and a DJNZ 
drops the B register one, tests it for zero 
and loops back if not zero. Remember the 
B register was loaded with the string 
length in line 130. If the B register is zero 
control returns to Basic. 

Here is an example of how to use the 
above routine: 10 L$ = "" : INPUT L$ : 
PRINT USR ( VARPTR (L$) ): GOTO 10. This 
Basic line requires that you already set up 
the USR. Assigning L$ a value prevents a 
function call error if no characters are 
entered for L$. If no characters are entered 
L$ is not defined for the VARPTR function. 



SINGLE PIXEL 



GRAPHIC BLOCK 





figure 2 
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HAPPINESS IS.. 

THE WORD PROCESS! I 
BUSINESSMEN AND PROI 

We offer you ongoing support by answering 
your questions and providing reasonably 
priced enhancements. 

A FEW OF NEWSCRIPTS STANDARD FEATURES: 

*Form Letters with merging of names and addresses 
*Gives superb appearance to your final documents 
•Comprehensive manual with hundreds of examples 
•Centering, top/bottom titles, indents, pagination 
•Underlining, boldface, double-width, italics" 
*Sub-scripts, super-scripts, proportional pitch + 
•Generates Table of Contents, sorted Index 
•Allows block graphics, special symbols i 

•Search and replace globally or within a range 
•Block move, copy, delete, insert from other file 
•AUTOSAVE. WHOOPS. DIRECTORY, KILL, REPEAT 

•Based on IBM's "EDGAR" and "SCRIPT" systems 
•Supplied ready-to-run on "tiny" DOSPLUS 

•Easily transferred to NEWDOS, NEWDOS/80. LDOS, TRSDOS 
•Includes handy Quick Reference Card 

NEWSCRIPT CONTROLS THESE PRINTERS : 

•EPSON MX-80. MX-100: all 12 fonts, plus underlining 
and block graphics; italics with GRAFTRAX 

•Centronics 737, 739; Radio Shack L.P. IV, L.P. VIII, Prowriter. 
Daisy Wheel II, NEC PC-8023A, TEC 8500R, C.ITOH 8510: 
Right-justified true proportional printing 

*Good support for: Diablo, Spinwriter, Starwriter, QUME, Microline 
Anadex, modified Selectric, standard line printers 

NOW AVAILABLE: right-justified true proportional support for 
Diablo, Spinwriter, Starwriter, and Qume (DaisyWheel Option!** 

TYPICAL USER AND REVIEWER COMMENTS: 

"There is a new word processor on the market that will change the way p>eople think about the capabilities of the THS-80. Imagine a 
powerful mainframe text editor running on a TRS-80, with virtual compatibility between the two versions. ..on-going support second to 
none, with superb documentation." (Jim Klaproth, 80-U.S. JOURNAL February, 1982) 
fhe manual: 

"It definitely rates the first 'W given to any documentation reviewed in this column." (A.A. Wicks. COMPUTRONICS, October. 1981) 

the software: "An excellent Word Processor" (D.H.); "Absolutely fantastic" (S.E.S.); "You have features that I cannot duplicate 
on my $14,000 system" (J.B.) 

the support: "Your phone information system and the prompt and courteous staff that you provide to help your clients... are worth 
the cost of the system." tV.H.H.) 




REQUIRED CONFIGURATION: 48K TRS-80 with 
one disk drive. Specify Model I or Model III. 

t Some features work only li your printer has the mechanical capability. 
* DaisyWheel proportional is extra-cost option. 

TO ORDER, CALL NOW, TOLL-FREE: 

(800) 824-7888, Operator 422 

CALIF: (800) 852-7777, Oper. 422 

ALASKA/HAWAII: (800) 824-7919 

FOR TECHNICAL INFORMATION CALL: 

(213) 764-3131, or write to us. 

Order from your Software dealer, or from: 
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NEWSCRIPT 7.0: $124.95 

NAILING LABELS OPTION: 29.95 

Special: NEWSCRIPT + LABELS: 139.95 

Daisywheel Proportional Option: 49.95 

"PENCIL" / "SCRIPTSIT" 

File Conver tor: 14.95 

Manual Only ( 1 80 pages): 30.00 

Reference Card Only: 2.50 
Electric Webster + Correction Feature: 149.50 

Graphics Editor and Programmer: 45.95 

DOSPLUS 3.4: 149.95 



DEPT. C. BOX 560 • NO. HOLLYWOOD, CA 91603 



TERMS: We accept VISA, Mastercard, checks. Money Orders, C.O.D. and 
even cash. We pay shipping via surface UPS inside U.S.A. Please add 
S3. 00 ior Blue Label, 6% tax in California, and 15% outside North Amer- 
ica (air shipment). 



SOFT BITS 



DURING RPIXEL 



1 


2 


4 


8 


16 


52 







4 




16 







-2 




8 




32 



ft N D 2 * 8 + 3 2 

SRA 



REVERSED 



Figure 3 



10 DIM S$(15) 




20 FOR R=0 TO 15 : M = VARPTR ( S$(R) ) 




30 POKE M,64 




40 POKE M+l , R * 64 AND 255 




50 POKE M+2 , R / 4 + 60 




60 NEXT 




70 FOR R = 1 TO 47 : SET ( R , R ) : NEXT 




80 FOR R = TO 15 : M = USR( VARPTR ( S$(R) )) 


: NEXT 


90 GOTO 80 




Program Listing 4 





The 



Fantasies and Reflections 
on Self & Soul 




ROeGIS 5 SMUUWN 4 MOHOWITZ 4 «UOtE> 4 M'SDANFf 4 
WHtEllS* DAWKINS4 ZUflO" 4 SAN.'CtfO 4 li.BEKi TjetNG 4 
C*«*W & M*M»NC & StAUlf * NAGH 4 NOIKX & 1£M 

Composed and Arranged bv 

DOUGLAS R. HOFSTADTER 
DANIEL C. DENNETT 



fascinating." 

— ComputerWorld 

Douglas Hofstadter, author of the 
Pulitzer Price-winning Godel, 
Escher, Bach, and Daniel Dennett, 
author of Brainstorms, take you on a 
mind-jolting journey to confront 
"questions about consciousness, the 
self as software, and the paradoxes of 
free will . . .Inexplicably exhilarating." 
— Washington Post. "Superb." — 
Martin Gardner. "Charming and 
thought-provoking."— Popular 
Computing $16.95 




Fantasies & Reflections on Self & Soul 

Composed and Arranged by Douglas R. Hofstadter 
and Daniel C. Dennett 

BASIC BOOKS, INC. 

10 E. 53rd St., New York, NY 10022 (212) 593-7083 

Visa and MasterCard welcome ^-533 



From Back to Front 

Listing 3 reverses the order of charac- 
ters in a string. It also reverses any graph- 
ic codes along a vertical line down the 
middle of each graphic block. This way a 
diagonal line is a mirror image of itself 
when reversed. If the strings reversed are 
the first and second lines of the screen 
Fig. 2 would show a correct and an in- 
correct reversal. 

The USR routine uses CALL 0A7FH to 
determine the address of the string's de- 
scriptor block. BC is loaded with the 
string's length. In lieu of loading the 
B register with an immediate zero byte, 
XOR A packs the code in a string con- 
stant. Remember Basic uses the zero byte 
to find the end of a Basic line. Once again 
the actual address of the string is loaded 
into the DE register pair, but instead of a 
swap a Push-Pop combination loads HL 
with DE. 

This Push-Pop technique is very slow, 
taking 22 T-states to execute. A tandem 
set of register-to-register loads take the 
same number of bytes, but only eight 
T-states. The instruction in line 230 com- 
putes the end of the string plus one. To 
see why this is so, pretend a string of 
length one was at address 1000H. Since 
the start is also the end, adding the length 
to the address would give 1001 H— one 
past the actual end. DEC HL adjusts this 
address to its proper value. 

Lines 250-270 perform two tasks. They 
divide the length of the string by two and 
test for a string length which does not 
need reversing. Such a length is zero or 
one. The SRL divides by two to prevent a 
double reversal of each character. I could 
have used a RET NZ in line 270 instead of 
the conditional jump but that would allow 
two exits including one in the middle of 
the program. 

RVERSE does the actual switching. If 
you do not want the graphic codes re- 
versed remove the subroutine RPIXEL and 
the calls to it in lines 300 and 330. Other- 
wise the last character is loaded into C 
and the first into A. Now each is in the chip 
instead of in memory. RPIXEL is called 
to reverse A if it is a graphic code. Then 
the last character is placed first and the 
first character in C is loaded into A and 
sent to DE. 

DE (the start pointer) is incremented in 
line 350 and HL (the end pointer) is 
decremented in line 360. Since the B 
register still contains the length to reverse 
(one-half the original length) DJNZ drops 
the count and loops back until done. 

RPIXEL 

Lines 400-430 test for graphics to be 
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UNITERM 

Communicate with other computer owners as well as THE BIG 
BOYS' from your TRS-80 Model I or III Computer. Full featured 
intelligent terminal program allows you to download and upload on 
your favorite system. Auto-logon, auto polling, connect and signon 
messages all supported! Available with NEWDOS/80 command 
support also (UNITERM/80)! 

UNITERM (113000). $79.95 

UNITERM/80 (113080).$89.95 

CONNECTION — 80 

Run your own Bulletin Board on your TRS-80 Model I or III. A full 
feature BBS with over 100 in use throughout the country, Canada, 
Mexico and Europe! Package is easy to operate and needs only an 
auto-answer modem, and 2 disk drives (an RS232-C board may also 
be needed). For complete details, call the modem number below 
which is the HQ system for CONNECTION-80. 

Connection-80 (I) (101000) $199.95 

Connection-80 (III) (103000) $199.95 



ELECTRONIC MESSENGER 

Connect yourself with your friend, office, branch, or other remote site with the ELECTRONIC 
MESSENGER! This is a full featured Electronic Mail Package for your TRS-80 Model III 
computer. Allows you to compose messages on your computer and either leave them for 
retrieval by another unit, or SEND THEM AUTOMATICALLY AT A PRESET TIME!!! Just 

think of the possibilities 

First copy (103013) $149.95 

Additional copies (103014) $ 89.95 



Available At: 



Micro-Computer Busines 
3111 Juneau Place 
Baltimore, Md. 21214 
301426-6803 



80 Microcomputing Services 
158 Remsen Street 
Cohoes, N.Y. 12047 
518-235-9004 

Inflo, Inc. 

Rt. #1 Box 244 Mill Road 

Yaphank, N.Y. 11980 

516-924-5179 



Computer Services of Danbury 
1 Franklin Street 
Danbury, Ct. 06810 
203-743-1299 

Maxi-BYTE Computer Shoppe 
999 Middle Country Road 
Middle Island, N.Y. 11953 
516-924-7722 



Eberts Personal Computers 
4122 South Parker Ave. 
Aurora, Co. 80014 
303-693-8400 



Micro Images 
146-03 25th Road 
Flushing, N.Y. 11354 
212-445-7124 




171 Hawkins Bd. 
Centereach, N.Y. 11780 
(816) 981-8568 (voice) 
(816) 888-8836 (modem) 



VISA 



Dealer Inquiries Welcome 
N.Y.8. Residents Add Tax 
Add $8 snipping — handling 
Prices subject to change 

WELCOME 



■See List of Advertisers on page 386 
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SOFT BITS 







00100 ; 


HORIZONTAL SCROLL 


PUBLIC DOMAIN 


7000 




00110 


ORG 


7000H 




7000 


CD7F0A 


00120 


CALL 


0A7FH 


;GET TYPE BYTE 


7003 


CB7C 


00130 


BIT 


7,H 


;TEST FOR NEGATIVE 


7005 


2022 


00140 


JR 


NZ,LSCRL-6 


;IF NEGATIVE SCROLL LEFT 


7 07 


0610 


00150 


LD 


B,16 


;16 ROWS TO MOVE 


7009 


DD21FF3B 


00160 

00170 


LD 


IX,3C3FH-40H 


;END OF TOP ROW 

; BACKED UP ONE ROW 


7 0D 


DDE5 


00180 RSCRL 


PUSH 


IX 




70 0F 


El 


00190 


POP 


HL 


;HL IS ROW POINTER 


7010 


C5 


00200 


PUSH 


BC 


;SAVE ROW COUNTER 


7011 


014000 


00210 


LD 


BC,64 


;ROW LENGTH 


7014 


09 


00220 


ADD 


HL,BC 


;MOVE ROW POINTER DOWN 


7015 


so 


00230 


LD 


E,L 




7016 


54 


00240 


LD 


D,H 


;DE => END OF ROW 


7017 


E5 


00250 


PUSH 


HL 




7018 


DDE1 


00260 


POP 


IX 


;IX => END OF ROW 


701A 


DD7E00 


00270 


LD 


A, (IX) 


;GET LAST CHAR ON ROW 


701D 


2B 


00280 


DEC 


HL 


;SET UP FOR MOVE 


701E 


0B 


00290 


DEC 


BC 


;MOVE 63 BYTES 


701F 


EDB8 


00300 


LDDR 




;MOVE THEM 


FIELD OVERFLOW 








7021 


DD77C1 


00310 


LD 


(IX+256-63) ,A 


;LAST CHAR TO FIRST PLACE 


7024 


CI 


00320 


POP 


BC 


; RESTORE COUNTER 


7025 


10E6 


00330 


DJNZ 


RSCRL 


;TIL 16 ROWS DONE 


7 8 27 


1820 


00340 
00350 


JR 


EXIT 




7029 


0610 


00360 


LD 


B,16 


;16 ROWS TO MOVE 


702B 


DD21C03E 


00370 
00380 


LD 


IX,3C00H-40H 


; START OF TOP ROW 
; BACKED UP ONE ROW 


702F 


DDE5 


00390 LSCRL 


PUSH 


IX 




7031 


El 


00400 


POP 


HL 


;HL IS ROW POINTER 


7032 


C5 


00410 


PUSH 


BC 


;SAVE ROW COUNTER 


7033 


014000 


00420 


LD 


BC,6 4 


;ROW LENGTH 


7036 


09 


00430 


ADD 


HL,BC 


;MOVE ROW POINTER DOWN 


7037 


SB 


00440 


LD 


E,L 




7038 


5 4 


00450 


LD 


D,H 


;DE => START OF ROW 


7039 


E5 


00460 


PUSH 


HL 




703A 


DDE1 


00470 


POP 


IX 


;IX => START OF ROW 


703C 


DD7E00 


00480 


LD 


A, (IX) 


;GET FIRST CHAR ON ROW 


703P 


23 


00490 


INC 


HL 


;SET UP FOR MOVE 


7040 


0B 


00500 


DEC 


BC 


; MOVE. 63 BYTES 


7041 


EDB0 


00510 


LDIR 




;MOVE THEM 


7043 


DD773F 


00520 


LD 


(IX+63) ,A 


? FIRST CHAR TO LAST PLACE 


7346 


CI 


00530 


POP 


BC 


; RESTORE COUNTER 


7047 


10B6 


00540 


DJNZ 


LSCRL 


;TIL 16 ROWS DONE 


7049 


C9 


00550 EXIT 


RET 






0000 




560 


END 






00001 TOTAL ERRORS 














Program Listing 5 





reversed. Note that a blank or solid block 
is not reversed. The BC counter is saved in 



TRW, CBI & affiliates 
CREDIT REPORT 

program for TRS-80 & CP/M 



for only $99.95 ppd. 
You don't have to worry about making 
mistakes. Type input at your own speed, 
correct, then send. . 

• Prompted input w/ field size 

• Can edit input information change, 
insert & oelete char. 

• Stores input for sending later 

• Subscriber's #s are stored in program 
for auto sign on 

• Credit info is stored in RAM for 
display and print later 

Send $99.95 check or money order w 

TRW & CBI subscriber # & complete 

hardware list to 

HON FINANCE & INSURANCE COMPUTERS 

PO Box 23825, Pleasant Hill, CA 94523 

(415)680-7888 ^421 THANK YOU 



order to use B as a temporary storage 
location. AF is saved since the value in the 
accumulator must be operated on twice 
and the result combined. 

The operations move the left three pix- 
els to the right and the right three pixels to 
the left. This is easy to do by multiplying 
and dividing, respectively. The drawings 
in Fig. 3 show how this works. Remove the 
extraneous bits by ANDing them with the 
correct mask. After each side is moved 
over the results are added and bit 7 set by 
adding 128. BC is popped off the stack 
and control returns to the calling program. 

The Basic code in Program Listing 4 al- 
ters the descriptor blocks of the variables 
in string array to point to each row of the 
screen. This code POKEs a value of 64 into 
the length byte and alters the pointer ad- 
dress to point to the addresses of the start 
of each video row. Then a loop reverses 
the strings one by one. 

You can make this run much faster by 
making the USR routine do all 16 rows at 
once. I challenge beginners to see if they 
can figure out how to do it. You might get 















t 

HL 
BC 














| | 



EB 



Figure 4 



an idea by studying the last program 
(Listing 5). 

This program does a horizontal screen 
scroll of one position upon each call. The 
routine needs a value passed to it. This 
value determines which direction the 
screen scrolls, left if negative or right if 
positive. After getting the value via CALL 
0A7FH, a bit test on bit 15 of the integer 
value (bit 7 of the H register) determines 
the sign. 

If a right scroll is required, the B register 
is loaded with 16 (the number of rows to 
scroll). Then IX is loaded with the pointer 
to the end of the row. This is originally 
backed up one row to allow for the row in- 
crease in line 220, which precedes actual 
scrolling. Lines 180 and 190 contain a 
Push-Pop combination (you cannot load 
the IX from another register pair). 

The row counter BC is saved on the 
stack in line 200, allowing the BC register 
pair to increase the row address by one 
row in line 220. Then DE is loaded quickly 
by a tandem pair of register-to-register 
loads. Lines 250 and 260 load IX with the 
increased address for later use. 

This routine does the scroll by saving 
the last byte on the row, moving the first 
63 over one, and putting the saved byte in 
the first position. This process repeats 16 
times, once for each row (see Fig. 4). 

Line 310 includes the strange expres- 
sion because of a bug in the Radio Shack 
Editor/Assembler program. This line will 
give a field overflow error, but will assem- 
ble correctly. To avoid the error I made the 
value positive by adding 256. The LSCRL 
is very similar to the above. ■ 
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PENETRATOR features amazingly fast firing action; accurate bomb release; 
incredibly smooth graphics and arcade type sound that you have 
never before seen or heard on a TRS80! 



Your mission is to penetrate the enemy defenses, 
blow up their illegal neutron bomb store and return 
safely to base - an almost impossible feat! 

The console above shows the actual view from your TRS80. 

The four stages present continually new challenges, and increasing enemy defense 

means each stage is more difficult than the previous one! 

Enemy radar stations constantly track your movements unless you 
destroy them. You will need all your skill and cunning! 

To aid you on your mission, Control Center has provided 
you with a Training Simulation Chamber where you may 
practice your skills in any of the stages 
before risking your life. 



Announcing PENETRATOR - the fastest 
and most exciting game ever developed for the TRS80* 

PENETRATOR is a game that will challenge you time after 
time, hour after hour The unique customizing feature allows 
you to change the conditions of the game at will. 
This means that each PENETRATOR package actually contains 
hundreds of different games to keep you challenged and stimulated 

Don't wait any longer - PENETRATOR is available from your 
favorite software dealer or directly from the publishers. 



PENETRATOR includes a 16 page booklet and is compatible 
with the Alpha joystick. 
Available as: 

• 16K TRS Model l/lll. two-cassette pack $24 95 

• 32K TRS Model l/lll protected diskette $24.95 
Please add $1 . 50 per order for shipping, 
foreign orders add $6.00. 

California residents please add 6% sales tax. 

Visa. Mastercharge accepted. 

Dealer Enquiries Welcomed. , . . _ , _ 

'TRS is a trademark of the Tandy Corporation. 



Melbourne House Software 6917 Valjean Avenue, Van Nuys, CA 91406. 
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TAKE THE NEXT STEP IN MICRO COMPUTER EVOLUTION 

PUT THE LANGUAGE OF THE FUTURE ON YOUR COMPUTER 

TODAY. 

Let ALCOR Pascal transform your computer into a truly professional development system. 
No other language system offers as much power, efficiency, and versatility. 

EASY TO LEARN 

Alcor Pascal is easy to learn. It comes with a 250 page documentation 
package which includes a 100 page tutorial that introduces Pascal to the 
beginning programmer. 

Also included in the language are many of the string functions that are 
familiar to Basic programmers. 

SPEED 

Important to many users is the fact that Alcor Pascal programs execute 
between 10-20 times faster than interpreted Basic programs. 

ALCOR SYSTEMS SUPPORT 

Alcor Systems stands behind its products with a free one year service 
contract that includes upgrades to new Alcor Pascal releases for a nominal 
fee. Also included free is a one year subscription to the Alcor Pascal 
Newsletter. Programs may be developed for resale that execute like stand 
alone machine language programs. (Absolutely no licensing fees) 

COMPATIBLE COMPUTERS AND OPERATING SYSTEMS 

48 K memory / One disk drive Single or Double Density (two recommended) 

TRS80 Model I 
Trsdos 2.3, Ldos 5.1, Newdos 2.0, Dosplus 3.3, 3.4 

TRS80 Model HI 
Trsdos 1.3, Ldos 5.1, Newdos 2.0, Dosplus 3.3, 3.4 
Osborne - 1 CP/M 

Apple II CP/M (Z-80 softcard) 

Other Z-80 CP/M based systems (8 inch drives) 



Pascal Features 

A complete Jensen and Wirth Standard Pascal 
Produces compact efficient code that executes 10-20 

times faster than interpreted BASIC 
Can compile large programs (4000 lines ♦ ) 
Fast one pass compiler 

Simple commands for compiling and running programs 
Supports separate compilation or procedures and functions 
Compiler switch options, including conditional compilation 
Full heap support including NEW and DISPOSE procedures 

that perform true heap allocation 
Complete implementation of sets with up to 256 members. 
Variant records are fully supported 
Supports single and double precision REAL 
Files are compatible with TRSDOS 

Extensions 

OTHERWISE clause on case statements 
Identifiers may contain "$' and '— ' characters 
Automatic type conversion in arithmetic expressions and 

assignment statements 
Constants may be expressed in decimal or hexadecimal 
Characters within strings may be specified by ascN code. 

Allows non-printable characters in strings. 
Type transfer operator to override type matching 
ESCAPE allows exit from anywhere In a procedure 
LOCATION function returns the address of a variable 
SIZE function returns the amount of memory for a variable 

Full Screen Text Editor 

included with Pascal 
No limit on file size (except disk capacity) 



The Best of Both Worlds 

Pseudocode (Pcode) for compactness 

Allows large programs in small memory space (8500 
line + programs can execute in 48k) 
Native code for speed 

Optional code generator produces Z80 instructions 

Z80 code can be mixed with Pcode 

250 Page Documentation Pkg. 

Beginner's guide 

Pascal Tutorial with 500 line Data Base program. 

(source supplied on diskette) 
Pascal Reference Manual 
System Implementation Manual 
Text Editor Manual 
Handy System Reference Card 
Cross reference index for documentation package 

Linking Loader 

Links separately compiled routines 

Supports procedure and function libraries 
Can create command files 



trademark 

TRS-80 Tandy Corporation 

CP/M Digital Research, Inc. 

Z80 Zilog, Inc. 

APPLE II Apple Computer, Inc. 

OSBORNE I Osborne Computer Corp 

ALCOR PASCAL Alcor Systems 

DEALER INQUIRIES 
INVITED 




r 
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Optional Advanced Development Pkg. 

Pcode optimizer 
Reduces the size of a program by 25-30% 
Increases execution speed 
Z80 native code generator 
Produces relocatable, reentrant native code for the Z80 
Native code executes 3-5 times faster than Pcode. 
Native code can be mixed with Pcode to provide speed 
where required and still benefit from the compactness 
of Pcode 

YES, I'm interested in Pascal for: 



□ TRS-80 Model I 

□ TRS-80 Model III 
D CP/M Z80 8 inch disks 

□ Send More Information 

□ Alcor Pascal System 

□ Advanced Dev. Pack. 
; Manuals only 

Shipping & Handling $5.00 USA $10.00 Foreign 



G CP/M 0sborne-1 

□ CP/M Apple II (Z80 SC 

FREE 
$199 
$125 
$ 30 



Name_ ■ 

Address . 

City. State. Zip _ 

Master/Visa # 

ALCOR SYSTEMS 

800 W. Garland Avenue, #100 • Garland, Texas 75040 

For immediate service call: (214) 226-4476 



rMurry Foley thought 
"lowercase descenders'* were 
people who avoided paying taxes. 







Until he became an 
Orange Micro Printer Expert. 



Printers Can Be Con- 
fusing. Sometimes, even 
the informed personal com- 
puter owner is caught short 
by the mound of technical 
differences in printers. Dot 
matrix for correspondence, 
or daisy wheel? What does 
bidirectional printing 
have to do with the 
price of tomatoes? 
We Educate First 
With so many dif- 
ferent printers out 
there with as many ■ 

different features, we feel a 
printer education is in order. We 
take what you already know 
about computers and explain printers in the 
same terms. Our current customers seem to 
like that because of the friends they refer. 
(Nearly 50% of our business is referral.) 
It's Easy To Be An Expert Orange Micro 
printer specialists are there to make you feel 
comfortable with your newfound printer knowl- 
edge. And when you decide on the printer right 
for you, you'll know exactly why you picked it 
from all the rest With over 35 popular models 
to choose from, and a complete selection of 
cables, options and interface accessories, we 




have everything you need to 
get your new printer up and 
operating in minutes. 
We Have The Right 
Printer For You. Bring 
along your toughest printer 
questions. Our salespeople 
will answer them honestly 
and practically. In less time 
than you'd imagine 
possible, you'll be a 
printer expert too! 
After all, printers are 
our only business, so 
we always do a better 
job at finding the right one for you. 



Orange Micro Printer Stores 

3150 E. La Palma, Suite I 
Anaheim, CA 92806 (714) 630-362 2 

13604 Ventura Boulevard 

Sherman Oaks, CA 91423 (213) 50 1-3486 

3216 Scott Boulevard 

Santa Clara, CA 95051 (408) 980-1213 
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Dynamic Report Generator 



No Programming Required 



Maintain different data files, each with its own set 
of internal logical relationships. 
Permits user to define customized report formats 
and column headings. 

Specify arithmetic relationships between columns. 
Automatic sorting and file compression. 
Keyed index for rapid retrieval of data. 
Redefine index by exchanging it with other report 
columns. 

Flexible add, delete, and list modes. 
Edit mode allows headings and arithmetic relation- 
ships to be altered without re-entering data. 
List mode allows for selected ranges and optional 
sub-totals. 

Price: $14.95 



LABELS UTILITY 

Create and maintain 

disk label files. 

Full editing and sorting 

capabilities. 

Flexible label formats. 

Print up to 5 across. 

Works with all Radio 

Shack printers. 

Labels optionally 

routed to video. 

Price: $14.95 



XREF UTILITY 

Generate detailed 
cross reference by 
Statement number. 
Variable name, or 
Keyword. 
Aids in documenta- 
tion and debugging. 
Corrects numerous 
bugs in TANDY'S 
version. 

Price: $14.95 



All programs include documentation and shipping 
Complete package (DRG, LABELS, XREF) 

[ill 3 for $29.95| 
For use on 48K, TRS-80 Model! , 1-Disk and Printer. 



DYNAMIC 

58-04 208th Street 




SOFTWARE 

Bayside. New York 11 S64 



Portions copyrighted by Microsoft. 1980. 
TRS-80 is a registered trademark of Tandy Corp. 
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TER STORE 



©Orange Micro 1982 



DISK DRIVES 

BASF Fully Reconditioned 
to New Unit Performance 
120 Day Written Warranty 

Drive (bare) $129.95 

2-Drive Pwr. Sup. w/case . 69.95 
1 -Drive Pwr. Sup. w/case . 39.95 

2 Drive Cable 22.50 

4-Drive Cable 33.00 

Drive Tech. Manual 10.00 

We also sell power supplies 

in kit form for more 

savings to you. 

•The kit comes to you partially 
assembled. 

•Easy pictorial step by step 
instructions. 
•Takes less than 1 hour to assemble. 
•Case included, finished in black 
wrinkle. 
Prices for kits: 

2-Drive Pwr. Sup 49.95 

1 -Drive Pwr. Sup 29.95 

Visa, M.C. and C.O.D. 

Call our 24 hour order number 

(206) 679-4797 
or send M.O., Certiled Check to: 

Computer Peripheral Resources 
(C.P.R.) 
P. 0. Box 834, Oak Harbor, WA 98277 
add 3% for U.P. S. ground 
Wash, residents add 5.9% sales tax .-420 



*-See List of Advertisers on page 386 
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"Anyone from a businessman to the hobbyist 

can benefit from the vast amount of information 

that a modem allows them to access." 



Modem 80 

ICROM Enterprises Ltd. 

1240 Bay St., Suite 205 

Toronto, Ont. 

Canada M5R 2A7 

Models I & III 

$289 

by Mel Patrick 

With the increasing number of com- 
puter communication networks 
such as CompuServe, The Source, Mi- 
croNet and the standard CBBS (com- 
puter bulletin board service), a modem is 
rapidly becoming very popular with com- 
puterists. Anyone from a businessman to 
the hobbyist can benefit from the vast 
amount of information that a modem 
allows them to access. 

I decided to join these ranks in mid-Oc- 
tober and began looking for a modem that 
would offer the highest versatility while 
maintaining an economical cost. 

The market offers some astounding 
products. Companies offer modems with 
direct-connection (versus the older style 
acoustic connection), auto-answer, auto- 
dial, and units that do not require the infa- 
mous RS-232 to control their various func- 
tions. Since I was using a Microtek expan- 
sion unit at the time (which does not have 
any facilities for an RS-232 unit), I was nar- 
rowing the field of choices available. Only 
two choices were worth considering. One 
was the MicroConnection (reviewed Au- 
gust 1981), and the other more recent en- 
try called the Modem 80. After looking at 
the software support that each had to of- 
fer, I chose the Modem 80. 

The Modem 80 is a complete unit. There 
are no extra items to buy (even a phone ex- 
tension patch cord came with the unit). 
The unit includes all cables, instruction 
manuals and most important, a tape con- 
taining six programs for software support. 

Modem 80 is a direct-connection 
modem that connects to either the TRS-80 
Expansion Interface or to the back of the 
Model I keyboard's extension bus. The 
Modem 80 is also compatible with the 
TRS-80 Model III (Model I is a 40-pin bus, 
Model III is a 50-pin bus). 

The unit measures 8 by 3 1/2 by 1 1/2 in- 
ches. On one end are two modular phone 



jacks for connecting to the phone line and 
the telephone, although the latter is not 
required for operation. The opposite end 
houses a ribbon cable and an edge card 
connector (this is extremely handy if you 
want to connect other devices to the 
TRS-80 bus). A special Y power cable ex- 
tends from this end as well. One end of 
this cable connects to the TRS-80 power 
socket on the computer, the other con- 
nects to the jack on the other end of the 
power pack. Two LEDs are on the top of 
the unit to indicate on-line and carrier- 
detect conditions. 

Inside the Modem 80 is what first ap- 
pears to be a 50-pin bus for the connection 
to a Model III computer. ICROM builds the 
Modem 80 for the TRS-80, Pet and Apple. 
The edge card bus inside the Modem 80 is 
for the Apple card slots. 

Two pages of instructions are included 
for initial setup and a self test to ensure 
proper connection. Two manuals also ac- 
company the Modem 80. One describes 
operation from Basic, and the other de- 
scribes all the command functions in the 
terminal mode. 

Software 

The Modem 80's strongest point is its 
software. Four of the programs supplied 
on tape are for Basic operation between 
two Modem 80-equipped systems. Two of 
these programs are in machine language 
for the actual modem input and output. 
The other two programs are host pro- 
grams which work in conjunction with the 
machine-language programs to support 
either tape or disk. 

The last two programs on the tape are 
machine-language terminal programs. 
These smart terminal programs allow 
users to access computer information 
networks. 

Modem Basic 

After loading either of the machine- 
language programs for Basic operation 
(16K version or 48K version), eight new 
Basic commands are available. You can 
incorporate these into your own programs 
or use them directly from the command 
mode (without a program). Table 1 lists the 
new Basic commands. 

The other two Basic programs (disk or 




tape) use these new commands to config- 
ure two computers as host and terminal. 
In this mode Basic programs, machine- 
language programs, and data may be 
transferred from one system to the other. 
Also during program or data transmis- 
sions Modem Basic has automatic line- 
error detection and re-transmission, thus 
providing very reliable communications. 

Modem Terminal Software 

Two machine-language programs (tape 
or disk) are provided to allow access to 
computer networks. These programs are 
not the standard dumb terminal, but 
rather smart terminal support. These pro- 
grams are excellent and I have not en- 
countered any problems with either of 
them to date. There are 32 command func- 
tions in the terminal mode. The manual ex- 
plains them clearly and concisely. 

Eight programmable function keys 
allow the user to define eight lines of text 
with a maximum of 32 characters per line. 
Any one of these lines may be selected 
and transmitted to the host system. A 
ninth programmable key sends any ASCII 
file that was loaded in to the host system. 

An upper/lowercase switch is used 
when the host system understands only 
uppercase letters. 

You can set the baud rate at any value 
from 25 to 300. 

There is no limit on the number of digits 
you can dial. 

The redial-phone-number feature 
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redials the last number entered. There is 
also a disconnect-from-line feature. 

All of the material received is held in a 
buffer. The terminal program signals 
when the buffer is full, and you may either 
clear it or ignore it. Once full no more is ac- 
cepted into it (but is still displayed on the 
video). 

The display menu shows all commands 
supported. 

You can set parity from the keyboard at 
even, odd or no-parity. You can also toggle 
between full and half duplex. 

The write/load buffer command stores 
any information contained in the com- 
puter's buffer on tape or disk. All informa- 
tion that your computer receives from the 
host system is stored in the buffer until it 
is full. 

The transmit buffer command loads the 
buffer from tape or disk and then sends its 
contents to the host system. 

The save/load function keys enable you 
to store the eight pre-programmed keys 
on tape or disk. 

The scroll-buffer command allows you 
to display all information previously 
stored in the buffer. You can display the 
buffer in either direction continuously or 
one line at a time. 

The line-printer buffer command sends 
the buffer's entire contents to the line 
printer. 

The place-markers-in-the-buffer com- 
mand allows you to insert start and stop 
markers to tape or disk, or send it to the 
line printer. 

All of the above commands are invoked 
by using a letter key with either a shift key 
or the clear key. Some host systems re- 
quire that the terminal be able to transmit 
control characters. A control character is 
invoked by pressing the clear key with the 
required letter. 

Hardware 

Since Modem 80 does not require an 
RS-232 unit, it uses a port to control its 
functions and for input and output. Inside 
the Modem 80 are all the integrated cir- 
cuits that make it work. Unlike some other 
companies that solder the ICs directly to 
the board and then sandpaper the part 
numbers of the devices, ICROM utilizes 
sockets for all but two of the ICs and 
leaves the part numbers on. Circuit layout 
is uncrowded and provides for easy ser- 
vicing. 

The Modem 80 is designed around the 
Motorola modem IC (MC14412). While this 
chip is capable of either answer or origin- 
ate modes, the Modem 80 can only send in 
the originate mode, but can receive in 
either mode. Any mode switching is done 
by setting a bit in a control word and then 
sending it to the Modem 80's port (port 



120). The remainder of the ICs on the 
board are for decoding input/output port 
control words and the active filters to re- 
spond to only the other modem's signal 
transmitted over the phone line. A fil- 
tered power supply is also on board for 
power requirements. 

Using the Modem 80 

Until I acquired the Modem 80, I knew 
little about such things as word length, 
parity, and stop bits. After reading the ter- 
minal manual I knew a little more, but 
after my first connection to a local bulletin 
board it was still not enough. Through in- 
quiries made from friends and reading 
everything concerning modems, I con- 
cluded that most systems need either a 
seven or eight-bit word length, no parity, 
and one or two stop bits. I switched to 
eight-bit word length, no parity, one stop 
bit and dialed the bulletin board again. 
This time the information was displayed 
correctly on my screen. 

Over the next two weeks I signed onto 
various bulletin boards in Canada and the 
U.S. All worked well with only a few excep- 
tions. Occasionally the phone line would 
go dead or the modem could not read the 
first few characters on a line. The reason 
for this seems to be the speed that the 
host system starts sending the next line 
after sending a carriage return. 

I found two methods to cure this. One 
was to specify about 4-5 nulls when 



asked by the host. This causes the host to 
delay 1-2 seconds after a carriage return 
before resuming transmission. The sec- 
ond was to increase the baud rate I was 
using to about 310. Although the manual 
states that the baud rate is variable from 
25 to 300, 1 found that it accepts values as 
high as 318. By using either of these two 
methods, I was able to access any bulletin 
board with excellent reliability. Out of 17 
systems that I have accessed, only 3 re- 
quired these fixes. I assume the source of 
these problems originates with the host 
system rather than with the Modem 80 ter- 
minal software. 

Modem 80 has proved to me that reli- 
able communications between systems is 
possible for a low initial cost. I have down- 
loaded (received Basic programs), up- 
loaded (sent Basic programs) and chatted 
with various sysops (system operators) 
with complete success. 

One other interesting point is that 
ICROM is producing modems for the 
TRS-80, Apple, and Pet. This is not un- 
usual in itself but they plan to make all the 
modem host programs compatible with 
one another. This means you can dial up a 
friend with an Apple or Pet and send him 
your program in memory, or vice-versa. 
Because of the different Basics involved, 
you would have to edit the programs, but it 
would be easier than typing in the whole 
program. ■ 



MO PEN 


: dial a number or wait for a call and then sign on to the other system. 


MCLOSE 


: disconnect from the phone line 


MLOAD 


load a Basic program iron- the othei computer 


MPRINT 


send a message to the other computer 


MPUT 


send data to the othet computer. 


M INPUT 


request a response from the other computer. 


MDATA 


: request computer type identification. 


MOUT 


: generate an audio tone through the cassette port. 




Table 1 



PI80C Parallel Printer Interface 

The Micro Works 

P.O. Box 1110 

Del Mar, CA 92014 

Color Computer 

$69.95 

by Howard Berenbon 

The Micro Works must be working over- 
time to develop software and hard- 
ware for the TRS-80 Color Computer. A 
new product which I recommend is their 
PI80C Parallel Printer Interface. It is de- 
signed so that you can use a parallel print- 
er, such as the Centronics 730, through 



the serial port of yourTRS-80C. You do not 
have to buy a serial printer if you happen 
to have a parallel printer nearby, say from 
a Model I. 

The Hardware and Connection 

The printer interface is supplied in a 

ROM pack, though the instructions warn 
you that it is not a ROM Pak and should 
not be plugged into the ROM slot of your 
Color Computer. A DIN plug connects to 
your computer's serial I/O jack. An edge 
connector connects to your parallel print- 
er cable. A transformer plugs into a 120 
volt ac outlet (the interface has its own 
power supply). I used a Centronics 730 
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parallel printer to test the interface, but 
any Centronics-compatible printer should 
work as long as it can do a line feed auto- 
matically. To output to the printer, follow 
the directions in the Color Computer man- 
ual. It requires no software to operate. It 
uses the commands that Color Basic pro- 
vides: LLIST and PRINT #-2. 

Radio Interference 

The interface causes slight radio fre- 
quency interference and snow on the tv 
screen. This can be minimized if not elimi- 
nated, by moving the interface away from 
the tv. This move is limited by the cable 
that connects to the computer's serial I/O 
jack; the cable is only about 10 inches 
long. This could be lengthened, say to 
three or four feet, so that the interface 
may be moved further away from the tv. I 
used a black and white portable tv with 
the Color Computer. I do not know what in- 



Escon Selectric Interface 
Escon Products Inc. 
12919 Alcosta Blvd. 
San Ramon, CA 94583 
Models I, II, & III 
$599 



by Mike Rigsby 



The Escon Selectric typewriter inter- 
face kit enables any Selectric 
typewriter to operate as a printer. The kit 
includes an electronic interface (blue box) 
and electro-mechanical components. The 
kit works with any Selectric and operates 
at a maximum speed of 12.5 characters 
per second. The electronic interface ac- 
cepts data in RS-232 orTTL parallel form. 
You may use 110, 150, 300, 600, 1,200, 
2,400, 4,800 or 9,600 baud rates. The inter- 
face has a 96-character buffer and it will 
accommodate various forms of hand- 
shaking. Instructions are included for in- 
terfacing to the TRS-80 Model I (with or 
without Expansion Interface), the TRS-80 
Model II, Apple, Sorcerer, an SSM AIO 
Card, and the Northstar (parallel). 

Although this kit works with any Selec- 
tric, the early versions of Model I with 
serial numbers beginning with four have a 
small problem. A spring which debounces 
the space bar gets in the way of solenoid 
mounting. You can remove the spring and 
the unit will not suffer as a printer, though 
it will be very poor as a typewriter. As an 
alternative, IBM will modify the typewriter 
to operate like the later models and it will 
then perform well as a printer or 
typewriter. 



terference, if any, results when using a 
color tv. 

Data Processing 

The interface must convert your serial 
data to parallel before printing: this slows 
down the printing process somewhat. You 
will notice this delay when listing a pro- 
gram. The short program line may have no 
noticeable lag, but the longer line will take 
about Vt of a second to process before 
the printer prints it. Serial printers I have 
seen operating with the Color Computer 
do not seem to have any noticeable print- 
ing lag. 

Since the printer interface requires no 
software, there is no problem using the 
printer's available functions, which re- 
quire control characters from the comput- 
er for activation. If you want to elongate 
your character set, or do whatever your 
printer is capable of doing (proportional 



The instruction manuals are very 
thorough and Escon's staff is helpful with 
questions, but solenoid installation is not 
for the timid. It took me about one week 
(every spare moment after work and all 
weekend) to make the modifications. The 
cover did not come off my machine in any 
of the indicated ways in the instructions; I 
removed a screw from the bottom and slid 
the lower part of the case towards the rear 
of the machine to get it off. I never could 
get the top cover off, though it turns out 
that I did not need to. 

Although you should read the instruc- 
tions carefully before attempting the in- 
stallation, you must perform one opera- 
tion early in the sequence and at the time 
the instructions state. After all the 
solenoids, levers and wires are in place 
(five days into the project) the instructions 
tell you to use an ohmmeter to assure that 
none of the solenoid wires are shorted to 
the chassis. If a short is found at this 
point, you must undo much of the pre- 
vious mechanical work, correct the prob- 
lem (a 30-second fix) and then reassemble 
the unit. To avoid this frustration, I strong- 
ly recommend checking for shorts be- 



spacing, double striking, underlining, and 
so on), follow the instructions that come 
with your printer. The interface will accept 
these control characters, as it accepts 
any data your computer sends, allowing 
your computer to control your printer. 

The PI80C printer interface is a useful 
piece of hardware for the TRS-80 Color 
Computer. It can save you the expense of 
a serial printer if you already own, or have 
access to, a parallel printer.H 




tween the solenoid wires and their metal 
frames before, during and after each in- 
stallation. There is an electrical checklist 
which involves reading specific values 
with an ohmmeter. Diodes are involved, 
thus the polarity of the meter leads can 
determine whether you obtain the desired 
readings. 

Operating this unit from a TRS-80 
Model I without an Expansion Interface 
requires a printer interface cable (Radio 
Shack number 26-1411) which you must 
then wire to the blue box of the inter- 
face unit. 

The machine worked almost perfectly 
the first time I printed a message. There 
was a slight problem with the shift mech- 
anism which I adjusted in less than 10 
minutes. The instructions are quite clear 
on how to adjust the linkages; they cau- 
tion to expect imperfect copy until you 
have made adjustments. With no further 
adjustments I have typed over 200 pages 
and the machine has worked flawlessly. 

Documentation on the system is good 
and would allow the user to repair or 
modify the unit with relative ease. I am 
using Scripsit (cassette) and the type- 



". . . / strongly recommend checking for shorts 

between the solenoid wires and their metal frames 

before, during and after each installation." 
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Photo 1. Inside view of typewriter, all parts in place 



"Solenoid installation 

requires work 

and patience. . . " 



writer appears to be totally compatible 
with the software. 

Economically, this system would be 
easiest to justify for someone who al- 
ready owns a Selectric typewriter - 
used Selectrics in fine condition cost $300 
or more. Solenoid installation requires 
work and patience (and the nerve to pull 
guts from that costly Selectric). Escon will 
install the solenoids (for a fee) if the job 
seems too formidable. 

For letter-quality printing on a reliable, 
sturdy (slow) machine, the Escon inter- 
face and a Selectric typewriter combine to 
form an attractive printer alternative-^ 




Color Computer Disk System 

Radio Shack 

Fort Worth, TX 

26-3022 

$599 

by Howard Berenbon 



The TRS-80 Color Computer Disk Sys- 
tem is for everyone, or for at least 
anyone that can afford disks. The system 
is easy to operate and requires a 16K Col- 
or Computer with Extended Basic. The 
92-page manual is written in a style 
similar to Radio Shack's Color Basic 
manual, including sections for the pro- 
grammer and newcomer to programming. 
Its simple and direct language takes you 
slowly, and clearly, step by step through 
the disk operating system (DOS), and 
features examples of the commands and 
Disk Basic. 

The system costs $599, but is available 
for somewhat less if you decide to pur- 
chase it through the mail from the dis- 



count Radio Shack dealers that advertise 
here in 80 Micro. 

The System 

The system consists of the disk inter- 
face in a plug-in program pack cartridge, a 
cable, and a 5 1 /i-inch disk drive. The cable 
connects to the disk interface and the 
disk drive with one free connector allow- 
ing you to connect a second drive. A sec- 
ond drive is not required. The interface 
controls up to four drives, but an addition- 
al cable is required when adding two more 
drives. The 35-track double-density, 
18-sectors-per-track disks hold about 
161K bytes of data. 

If you want to add another drive to your 
system, I'm sure that a 40-track drive will 
work (usually available for about $310 mail 
order) but you'll get only 35 tracks of stor- 
age because that is all the DOS supports. 

The DOS is part of the system (on ROM), 
and it only uses 2K of your computer's 



"The TRS-80 

Color Computer Disk 

System is for 

everyone. . . " 



RAM. When you PCLEAR 1, it leaves you 
with a iittleover 11Kof RAM. If you require 
more memory for longer programs, it may 
be necessary to upgrade your 16K com- 
puter to 32K. 

Commonly Used Commands 

The DSKINIO command automatically 
formats any disk in drive 0, while DSKINI1, 
formats any disk in drive 1 , and so on. You 
can access your program directory by 
entering the DIR0 command, or just DIR if 
you intend to look at the directory of the 
disk in drive 0. DIR1 displays the directory 
of the disk in drivel, and soon. All your ex- 
isting files are displayed. 

With the Merge command you can 
merge one program from disk with 
another currently in memory. The Kill com- 
mand deletes any file from disk while the 
Load command allows loading any Basic 
program file into memory. LOADM allows 
loading machine-language files. There is 
also a machine-language save command, 
SAVEM. And speaking of machine 
language, there is a section in the manual 
on machine-language with examples. 

One annoying point about this system 
is that the supplied disk drive does not 
have an On/Off indicator light making it 
difficult to know if the drive is on or off. 
There is a white dot on the switch to be 
used as an On/Off indicator, but this is 
inadequate. 

The Color Computer Disk System works 
well, is easy to operate, and has excellent 
documentation. ■ 
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TRS-80 owners . . . the Mapper I and III Works 
Packages are available In 64K versions for S 599. 



OMIKRON proudly presents 




The ultimate CP/M package for your TRS-80* Model I or III 



The WORKS includes: 

Mapper I & CP/M 2.2, CBASIC II, MBASIC-80 

and WordStar 



$399 



Mapper I and Mapper III 

cards are designed for simple plug in instal- 
lation. 



CP/M 2.2 is the latest version of CP/M 
from Digital Research. Our package also includes 
the MAPPER I CP/M adapter and a sophisticated 
set of utilities and drivers designed to optimize 
the CP/M system for the TRS-80. 

□ List price: $239 



WordStar is widely recognized as the 
most advanced product on the market. It is 
featured by many computer manufacturers, in- 
cluding Xerox, for wordprocessing applications. 

□ List price: $495 

MBASIC-80 is the CP/M version of 
Microsoft BASIC. The conversion of TRS-DOS 
BASIC programs to MBASIC is easy because the 
syntax is almost identical. 

□ List price: $349 

CBASIC II is the most widely used BASIC 
for CP/M applications programs. This version of 
BASIC contains all of the features necessary to 
develop complex business programs. 

□ List price: $149 



"See Review 80 Microcomputing, April 1982, page 370" 



OMIKRON 



f TRS-80™ Radio Shack/Tandy Corporation 



Products that set Precedents 

I 1 21 Hearst Street, Berkeley, CA 94702 (4 1 5) 845-801 3 

CBASIC II™ and CP/M™ Digital Research 




Litigation Support System 
Tandy/Radio Shack 
Fort Worth, TX 
Model II 
$299 

by Edward D. Young III 

Every junior lawyer has heard it a 
thousand times "Haven't we had a 
case like this before? I seem to recall that 
George handled a case like this several 
years ago; see if you can find the file." The 
request sends the junior attorney scurry- 
ing to a mammoth file cabinet and a con- 
glomeration of index card boxes. If he is 
lucky, he will eventually find that Harry, 
not George, handled the case which oc- 



curred only four months ago, not years. 

With Radio Shack's Model II Litigation 
Support System, savvy lawyers no longer 
need to waste time searching old files. Af- 
ter an hour of learning the system, anyone 
(even a lawyer) can create, store and re- 
trieve files. 

The Litigation Support System is com- 
posed of two files: a Clients file and a 
Forms file. The Client file can hold up to 
375 files. You can use the client record to 
store information such as the client's per- 
sonal background, case history and prior 
correspondence. The Forms file is used to 
conduct legal research. The user enters 
the area of law, case number, keyword, or 
any other criteria desired, and the com- 
puter searches up to 570 records for that 
criteria and displays all matching records 
until the user decides which one he wants 
to use. 

In addition to storing and retrieving in- 
formation, the Client and Forms files can 
generate reports. The Client file program 
can generate two reports; a Client Repre- 
sentative report and a Client Personal 
Data report. The Client Representative re- 



port prints the current date, client's name, 
client number, type of case, attorney of 
record and other relevant information for 
each client selected. The Client Personal 
Data report prints the name, record or 
case number, address and phone number 
of each client selected. The Forms file re- 
port generates a list of cases, subjects, 
forms or keywords based on any criteria 
you select. 

The availability of these storage and re- 
porting features means lawyers can con- 
duct research on recurring legal issues 
and familiarize themselves with the case 
history of their clients in a fraction of the 
time it took using traditional filing sys- 
tems. Therefore lawyers can manage their 
cases more carefully and respond faster 
to client or court inquiries concerning the 
status of the case. By entering times and 
dates in the user-defined input fields, a 
lawyer can even use this program to keep 
track of scheduled appointments. 

Excellent Documentation 

Perhaps the most impressive feature of 
this program is its documentation. The 



PRICES LOWERED AGAIN! (THOSE WITH $ SIGN) |i|jPR f\ Ikl Ck A I $£ EXACT REPLACEMENTS, LONG-LIFE, HEAVY WKING 

pood ™* Month RADIO SHACK-CENTRONICS-EPSON- ANADEX-BASE 2- HEWLETT PACKARD-MAUBUHBM PRINTERS 



X 



PRINTER 

MAKE, MODEL NUMBER 

(Contact us it your printer is 
not listed. We can probably 
RELOAD your old cartridges.) 



RIBBON 
SIZE 



ANADEX 9000 Series 



BASE 2 

CENTRONICS 7-meg 

702/7Q3/704/753 



HP-MALIBU 2608-2631 

RADIO SHACK 
DAISY WHEEL II 

Carbon Film (26-1419) 



COLORS 



Long-Lite Fabri c ( 1449) 

LP I— II — IV 700 Zip-Pack 
(141 3) 730/737/ 739/779 

LP III— V (26-1414) 

LP VM/ljT (26^1418) 
_LP YU __ <2 ®" 1 424) . 

EPSON MX 70-ao IBM 



MX 100 



PU«ER 
JxOOP 



INSERTS 

EZ-LOAD™ 



EXACT REPLACEMENTS made in 
out own shop feature LONG-LIFE 
and HEAVY NCNG. Our nstructions : 



4z-> 



DROP IN, NO WINDING! 

^"twi "W -tuna 



$25/6 $48/12 $270/72 
$30/6 $58/12 $3 24/7 2 

S24/3 $47/6 S.90/12 

13/3 48/12 



$18/3 



$66/12 



$17/3 



$62/12 



$18/3 



$66/12 



$21/3 



$78/12 



RELOADS 

You SEND your used 
CARTRIDGES to us. We 
RELOAD them for you. 

_ $/* ^ 

10/1 $9/2 or more 



$8/2 or more 



1 1/1 10/2 or more 

...2.P/.1 lj» Xt/jLaunor*. . 

1 5 Z2. or more 

18/3 or more 
971 _ $8/2. or more. 

9/ 1 $8/2 or more 



$8/2 or more 



$8/2 or more 
10/2 or more 



NEW 
CARTRIDGES 

(from the various 

manufacturers. Subject 

to availability.* ) 

$/+ 



$30/2 



$87/6 $168/12 



$25/2 $72/6 $140/12 



$18/ 3 $ 70/J 2 $40 8 1 J 2 
$21/3 $82/12 S4f0/J2 
$20/2 $5.8/6... SJ 12/12 



25/2 75/6 



22/2 66/6 



16/2 



$21/2 



48/6 9 6/12 

$60/6 $108/12 



36/2 * 



SILVER DOLLAR 

WIND to LOAD 

WHY DO WE SELL THESE? 
This is the type ribhon you get if von 
order from our fellow advertisers, rte 
seli them tor Jess since we make \tn-^. 
ourselves. Do you really like the mess 
nnd inconvenience of unwinding and 
dumping this type ribbon into a waste- 
basket or out on a newspaper and/or 
winding it into your cartridge' We 
don't know why these are being sold. 

Computers Should simplify your life, 
not make it more complex just to save 
a few pennies. You are welcome to 
order these if you cannot afford our 
EZ-LOAD - INSERTS. RELOADS, or 
NEW CARTRIDGES. But BEWARE! 
You now know how to avoid disap- 
pointment. One more caution: be sure 
to check the length of any ribbon 
BEF ORE you buy it. For instance, an 
MX-foo ribbon should be 30 yards 
long, not 20 as in the MX-80. 



12/3 44/12 252/72 



11/3 40/12 228/72 



12/3 44/12 252/72 



18/3 66/12 



SEND CHECK, MONEY ORDER, or COD ($2.00 ups) TO: 

BCCOMPCO ^ _ 

C9 800 SOUTH 17 BOX 246 Jmm 

SUMMERSVILLE MO 65571 

417 932-4196 



WORRIED ABOUT ORDF.KlNt; HY MAIL" Relax 



We've been in business for many years and can please the 
smallest and largest account. You receive some of the finest ribbons available made of our own exclusive 
IMAGE PLUS*" fabric and carbon film. Our ribbons fit your printer exactly. COMPARE, but BEWARE! We 

order all our competitor's products and are amazed at what we get. Have you ever received a new fabric 
nbbon you had to unwind and dump out on the table before you could use it? We have. Or, carbon film in- 
serts that had no cnd-of-nbbon sensor' Or, 7-meg cartridges with only HALF enough ribbon at full retail' 
Our only Business is RIBBON manufacturing and distribution. We use the latest state-of-the-art production 
equipment and are blessed with a fine, dedicated staff. We fully guarantee all our products because we make 
them ourselves.You must be completely satisfied, period. Our ribbons are made fresh dady and shipped 
in 24 hours. *nte for our brochure and newsletter "INK SHOTS". Dealers welcom. 



.SMS* 



MODEL II 8" GAME DISCS 



Biorhythms, Trap 
Rip Cord, Yacht Sea 
Concentration & 4 More 



$25.00 each 



Ugly, Bingo 

Towers, Blackjack 

Farkle, Pony « 3 More 



KUDOS: (Unsolicited comments from some of our users.) 

"Thanks again for your excellent product and service." 

"EZ-LOAD Is teriffic' l'U never wind a 'silver dollar' again." 

"You people do good work. Thank you." "The previous order was vi 

"We received your ribbons the next day. We couldn't believe it!" (W 

"The inking on our last order (LP V INSERTS) was much better than 'sto 

"I have appreciated the quality, service/turn around on orders, and cle 



rv good." 
! couldn't either.) 
'e-bought' •• cartridges." 
■ instructions of your products.' 



"We just went through three of your (DW ID reloads, and there's no question they are better than the 

USERS' 

" Doctors, lawyers, accountants, hospitals, schools, universities, U.S. Armed Forces, small 
and large corporations, state and federal agencies, Radio Shack Dealers, and a lot of just plain 'folks'. 
Need a recommendation in your area? Call us. We have users all over the world, in Japan, Australia, 
the Phjllipines. Italy, Canada, Mexico. Sweden, England, Columbia, Kenya and many other countries. 
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documentation is so complete even a per- 
son who has never touched a computer 
can run the program successfully. The in- 
structions are clear, consise and easy to 
read. In addition to illustrating, in great 
detail, the procedures for creating, storing 
and retrieving client records, the manual 
also provides instructions for making 
back-up disks. The ability to create a back- 
up data base is very important in the legal 
environment. The loss of vital information 
could severely damage a client's case and 
the lawyer's reputation. 

The manual also provides meticulous 
instructions for printing client reports, us- 
ing various formats: alphabetical order, 
chronological order, by attorney's name, 
or by just about any other criteria you de- 
sire. You can also adjust the page length 
and paper width to accommodate your 
printer. 

Added Features 

The Litigation Support System is de- 
signed both for expansion and for use 
with other Radio Shack programs. A sec- 



". . . the most 
impressive feature. . . 
is its documentation." 



tion of the user's manual is devoted to ex- 
plaining how to run the program on a sys- 
tem with more than one disk drive. That 
section also explains how to convert cli- 
ent and back-up files created on a one- 
drive system into files to be used in a 
multi-disk environment. 

The manual explains how to merge 
Scripsit with the Litigation Support Sys- 
tem to create commonly used documents 
such as form letters, leases and powers of 
attorney. This feature alone can save a 
law office much time and effort. 

Additionally, the Litigation Support 
System has the capacity to print mailing 
labels. This feature is particularly valu- 



able for filing documents with courts. 
Rather than type the address of the court 
each time a pleading is sent there (which 
the average lawyer does at least 2,000 
times a year), a lawyer can simply enter 
the name of the court and the mailing lab- 
el is printed instantly. 

The Litigation Support System can be 
used with Radio Shack's Time Accounting 
System. If you have this system, you can 
give clients the same client numbers as- 
signed to them by the time accounting 
system. This way, users of both systems 
can maintain the continuity, accuracy and 
accessibility of the client record system. 

This program allows lawyers to do legal 
research, manage their cases and send 
out repetitive documents with a minimum 
of effort. The program works so well that 
you wish that you had more storage capa- 
city so you could store complete opinions, 
excerpts from legal treatises, or even legal 
briefs. ■ 

(Editor's note— The reviewer is a gradu- 
ate of the Harvard Law School and a prac- 
ticing attorney in Washington, D.C.) 




Robot Intelligence— With Experiments 

David L. Heiserman 

Tab Books 

Blue Ridge Summit, PA 17214 

Softcover, 322pp. 

$9.95 

by Don Stauffer 

What, another book on building a 
robot? I have several of these books 
and although the robots sound interest- 
ing, I find it hard to justify spending the 
money for the necessary hardware. But 
after reading its back cover and taking a 
quick thumb through, I realized Robot In- 
telligence is different. It is not a book 
about building robots; it is a book about 
simulating robot behavior on aTRS-80. 

The book's theme is the computer simu- 
lation of machine intelligence developed 
by a technique the author calls Evolution- 
ary Adaptive Machine Intelligence (EAMI). 
Heiserman warns the reader early that 
these simulations are not very spectacu- 
lar, but they do illustrate behavior that will 
prove thought provoking if you have an in- 



"What, another book 
on building a robot?" 



terest in machine intelligence. The reader/ 
programmer must study the explanations 
of how the programs work to gain any- 
thing from the simulations, the author 
warns. Typing the programs in and watch- 
ing them run will not be enough. 

Heiserman classifies the intelligence of 
the creatures created by the simulations 
into three categories of increasingly com- 
plex behavior: Alpha, Beta and Gamma. 
Each of these categories is subdivided in- 
to two levels: level I and level II. Even the 
most intelligent creature in this book is no 
robot genius. The fascination stems from 
the complex behavior that results from 
relatively simple programming. 

The programs are straightforward and 
well documented; the author includes 
hints on debugging them. He makes ex- 
tensive use of subprograms, easing the 
task of entering the increasingly larger 
programs. Most of the subroutines from 
early chapters are used in the higher level 
creatures of later chapters. So, for each 
step up in intelligence only the short main 
program must be revised and the new sub- 
routines added. 



Although the book is a source of much 
fun and interest, there are a few faults. As 
is common in Tab publications, the book 
lacks sufficient editing, as evidenced by 
the large number of typographical errors. 
There are typos in the program listings, 
though the printout "composite" listings 
at the end of the chapters are generally er- 
ror free. 

The lengthy discussion of the philoso- 
phy of machine intelligence in the early 
part of the book may bother some who are 
anxious to get to the experiments. I en- 
joyed the discussion, though it may ap- 
pear to others that the author belabors 
the point. 

I also take slight issue with Heiser- 
man's comment that, "There is absolutely 
no programming devoted to telling the 
creature exactly what it is supposed to do 
under any particular set of circum- 
stances." I have not tried to prove the 
point, but I think some of the creature's 
responses are somewhat less "autono- 
mously self-programming" than Heiser- 
man claims. 

These small criticisms do not detract 
from the fascination if this book and the 
creature it creates. If you own a computer 
other than a TRS-80, the Basic is fairly 
standard, except for the graphics, and can 
be easily converted by any competent pro- 
grammer. Robot Intelligence will provide 
many hours of fascination and provoke 
thoughts about the nature of machine in- 
telligence.B 
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FOR LESS THAN $20 

YOU CAN TEST 

THE BEST 



BUILD BIG ON-LINE SYSTEMS . . . BUG FREE . . . FAST. 

See for yourself how easily and quickly you can set up a RELATIONAL data base. 
Exercise the query language. Use the full screen editor. 

Feel the muscle of the programming language . . . drive up to twelve files fast . . . 
with the ease of BASIC, the power of PASCAL and the structure of "C". 

Try DATA ACE V for $19.95 with our special sample diskette on 
a TRS-80 Model l/ll/lll. 



You'll find DATA ACE V amazingly easy to use. 



The Application Creation 
Environment DATAy' 



DATA ACeV 

is smart and completely integrated; operating system, 
relational DBM, query language, structured programming 
language, full screen editor, catalog, application 
packages and commitment to 
future development. 



COMPUTER SOFTWARE 




NAME 



rf 



COMPANY, 
ADDRESS. 
CITY 



Yes, I want to try it too! state zip 



I will be trying DATA ACE V on 

TRS/80 Model IU II D III D 

Computer Software Design Inc. 
Enclosed is my check/credit card details 1911 Wright Circle 

(We accept Visa or M/C) exp. / / Anaheim, California, 92806 

card no □ □ □ DDD □ □ □ DDDDD Telephone (714) 634 9012 
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dBASE II 

Ashton-Tote 

3600 Wilshire Blvd. #1500 

Los Angeles, CA 

$700 

by Craig Hilton 

Many powerful Data Base Managers 
(DBMs) are written under CP/M to 
reach the widest potential market; dBASE 
II is one such manager. 

Written in Assembly language, dBASE 
II is a novel approach to sophisticated 
data base management for the price. 
Figure 1 details the results of a com- 
parison between dBASE II and Profile II 
Plus, another popular DBM. 

Most data base managers operate ex- 
clusively in an interactive mode where the 
end user manipulates data one step at a 
time. Programming diversity is generally 
traded off for simplified data manipula- 
tion techniques. DBASE II approaches the 
"diversity or simplicity" dilemma from a 
new direction. Adapted from techniques 
developed by NASA, dBASE provides two 
entirely separate modes of operation. An 
interactive mode, similar to other DBMs, 
allows data manipulation in discrete 
steps under end-user control. However, it 
is the command mode that makes dBASE 
II unique. Like a high-level language, it 
allows complex sequence functions to be 
programmed in a Pascal-like structured 
language. 

Many complex routines, that would re- 
quire numerous Basic statements to ac- 
complish, can be called using dBASE II 
with a single command: Create, creates 
an entire file structure; Sort, sorts a file; 
Total, sums portions of a file; and so on. 
Through the use of a wide range of 
qualifiers to the commands, diverse and 
very sophisticated programs can be writ- 
ten (Fig. 2). 

The two modes of operation function in 
a relational management environment, 



Benchmark Standard 


dBASE II 


Profile II + 


Orientation 






Level of required user sophistication 


beginner 


competent 


Quality of supporting documentation 


adequate 


poor 


Ease of Use 






Overall use of entire DBM (human engineering) 


excellent 


very good 


Creating a file 


excellent 


very good 


Editing a file 


excellent 


excellent 


Screen/Report customization 


very good 


very good 


Creating the File 






Maximum number of fields per record 


32 


36 


Maximum size of 1 record 


1000 characters 


852 characters 


Maximum number of records with maximum record size 


65,535 


2,400 


Maximum number of records with 10 character record size 


65,535 


20,000 


Editing the File 






Can one file update another 


yes 


no 


Can groups of records be altered or updated with a single command 


yes 


no 


Number of 'layered" sort levels possible 


unlimited 





Maximum sort length 


unlimited 


30,000 char. 


Reporting the File 






Screen reports 


yes 


no 


Subtotals on reports 


yes 


no 


Type of reports available 


unlimited 


3 




(in Command mode) 


General Features 






Support algebraic functions 


yes 


no 


Can non-DBM data be accessed 


yes 


no 


Can non-DBM programs be run concurrent with DBM 


yes 


yes 


Text processor 


yes 


no 


Can routines be programmed into subroutines 


yes 


no 


Speed 






Time to index 1,000 records 


70 sec 


31 sec 


Time to locate a record within a 1,000-record file 


2 sec 


22 sec 


Time to locate a record within a 10,000-record file 


2 sec 


1 90 sec 


Time to locate and modify a record within a 1,000-record file 


2.5 sec 


23 sec 


Cost 


$700 


$299 


Figure 1 







meaning data elements are represented 
internally in a two-dimensioned table. 
Without the internal complexity of the 
usual DBM hierarchal management en- 
vironment (where linked lists and pointers 
maintain data relationships), indexing 
speed and efficiency are not affected by 
file length. Impressively quick operations 
are a result of the relational system. An in- 
dexed record can be located in a 100 or 
65,000-record file in the same time— two 
seconds. Each file can handle up to65, 535 
records of 1,000 characters each in 32 
fields. The only limit to the number of files 
contained within the system is imposed 
by the available storage capacity. Two 
separate files can be used simultaneous- 
ly, providing extremely fast manipulation 
of data from one file to another. Non- 
dBASE programs and files can be used di- 



rectly under the command mode control, 
allowing the incorporation of the dBASE 
power within the user's existing routines 
and data files. 

Included in the newly released updated 
version is a respectable text editor (sorely 
lacking in the previous version) and 
several file-handling enhancements in- 
cluding a fascinating "window-like" 
Browse command. 

Problemr? The system suffers from in- 
adequate documentation of its abilities 
only partially satisfied by the newly up- 
dated manual. I am surprised that a 
system with the sophistication of dBASE 
is not carefully supported with com- 
prehensive programming examples and a 
step-by-step tutorial. Be ready to spend 
hours learning the system's hidden 
abilities by trial and error. I was also dis- 



80 Microcomputing, June/July 1982 • 53 



BO REVIEWS 



Sample Command Mode Program 

CLEAR 

USE Test INDEX Tesll 

STORE 1 10 X 

DO WHILE X< = 10 

APPEND Bl ANK 

ACCEPT Name' to MName 

REPLACE Name WITH MName 
STORE X + 1 toX 
ENDDO 

Here an indexed file is called (Tesfl), the user is asked for a 'NAME', the name is inserted into the file where it 
is automatically indexed, and the process is repeated 10 times. 



Create 


Change 


Copy- 


Delete 


Report 


Recall 


Save 


Pack 


Index 


Display 


Inser 


Read 


Browse 


Edit 


Replace 


Total 



The Enhanced dBASE II Commands 

Do Find 

Select Locate 

Sort Skip 

Accept Do While 

Insput If. . Eise 

Get Bell 

Sum Save 

Restore Clear 



Modify 
Call 

Erase 

Skip 

Update 

Accept 

Input 

Macro 

Append 



Fig. 2. Enhanced dBASE II commands and sample command mode program 



appointed in the interactive mode report 
writer. To generate truly customized 
report formats, plan on writing the for- 
mats yourself using the command mode. 
One more sore point — a file cannot be 
split between drives. Though not a serious 
flaw, it does require multiple-drive users 
to carefully plan file placement. 

Overall, this is a very powerful, fast and 
sophisticated data base manager. I found 
the efficiency of file organization, speed 
of execution, and the command mode pro- 
gramming most impressive. In the most 
rigorous and complex string manipulation 
operations, where I have previously found 
most serious DBM problems, data integri- 
ty was never compromised under dBASE 
II. The novice can expect to create useful 
data base applications immediately. The 
competent user can expect, by trial and 
error, to master the command mode func- 
tions. The system is capable of fulfilling 
nearly any data base requirement con- 
ceivable in the micro environment. ■ 




GR Basic 3.0 
Med Systems Software 
PO Box 2674-T 
Chapel Hill, NC 27514 
Models I & III 
$19.95 cassette 
$24.95 disk 

by Bruce Powel Douglass 



Med Systems Software sells quality 
products and provides excellent 
service and support. Case in point: 
GRBasic by Simon Smith. 

Previously, you had to get different ver- 
sions of GRBasic depending on your oper- 
ating system. GRBasic now integrates 
with any operating system and provides 
much enhanced graphics and sound 
capabilities. I received the disk version. 

GRBasic comes on disk with three ver- 
sions, one for each memory size. It comes 
on a non-systems disk, so TRSDOS users 
with only one drive have a problem. Med 
Systems offers a solution to this, how- 
ever. You may send them a TRSDOS disk, 
and they will place GRBasic on it for you. 



They will also pay you back for your 
postage. 

The manual is a small format (5 by 7 
inches), but well written and very well re- 
produced. The manual is 20 pages long 
and has a very useful table of contents. A 
short index should be included for memo- 
ry-size tables and other information that I 
like to have at my fingertips. The first five 
pages tell disk and cassette users how to 
load GRBasic into their TRS-80s. The rest 
of the manual tells you about the graphics 
and sound commands. 

Besides the GRBasic programs, you 
also get MISSILE/BAS, a demonstration 
program, and SEDIT/BAS, a shape-table 
editor, written in Basic. 

When you execute GRBasic from your 
operating system, GRBasic automatically 
loads in Basic and begins Basic for you. 
The commands are integrated into the in- 
terpreter's parser, so you only need to 
type in the command, with the appropriate 
syntax and parameters, to execute it. If 
you have improper parameters or have in- 



correct syntax, you are informed of this er- 
ror through the normal Basic error 
routines. 

The commands fall into four catego- 
ries: line drawing — LDRAW(R) and 
LDRAW(S); circle drawing — CIRCLE(R) 
and CIRCLE(S); shape drawing — 
SDRAW(R), SDRAW(S), Size, and Turn; 
and sound generation— Audio. 

The S and R are mandatory and tell if 
the line or shape is to be drawn using Set 
(S) or Reset (R). The LDRAW commands 
draw a line from one point to another, or 
from the current point to another. It does 
this very quickly, on the order of hun- 
dredths of seconds. To draw a line from 
(0,0) to (127,47), you enter the command 
LDRAW(S) 0,0 TO 127,47, or, if the last 
command drew a line to (0,0), you need on- 
ly enter LDRAW(S) TO 127,47. You may 
use variables for these parameters also. 

You may chain points together as deep- 
ly as you like in a single LDRAW com- 
mand. For example, to frame the video 
screen, you could enter LDRAW(S) 0,0 TO 



"GRBasic now integrates with any 

operating system and provides much enhanced 

graphics and sound capabilities." 
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1 27,0 TO 1 27,47 TO 0,47 TO 0,0. This draws 
the frame around the screen in consider- 
ably less than one second. 

You also have a command to draw cir- 
cles. You must specify the coordinates of 
the center of the circle and the radius of 
the circle. The upper limit on the radius is 
23, since that is the largest circle that will 
fit on the screen. A visually interesting 
program is: 



10 FOR R = 1 TO 23 

20 CIRCLE(S) 64.24.R 

30 CLS 

40 NEXT R 

50 GOTO 10 



This program draws a circle that gets 
larger and larger and then starts over. 
Children will enjoy it. 

More interesting is the ability to draw 
shapes from a shape table. GRBasic does 
this extremely quickly, and as far as hu- 
man reflexes go, instantaneously. You en- 
code a shape as a set of numbers and 
POKE it into a block of memory (there is a 
127-byte block reserved for this). Two dia- 
grams in the manual explain this fairly 
well. 



"You may also 

scale or rotate 

your shape." 



You indicate a direction by a number. 
You have eight directions in which you 
may move from a given pixel. You have the 
same eight directions but different num- 
bers if you wish to redraw the line rather 
than draw it. You terminate a shape with a 
99. If you want to draw a box that is two 
pixels long in the X direction and three in 
the Y direction, POKE in the numbers 
1,1,3,3,5,5,7,7,99. The 1 tells it to go right 
one unit, the 3 tells it to go up one unit, the 
5 tells it to go left one unit, and the 7 tells it 
to go down one unit. The 99 indicates the 
end of the shape. You can easily have 
several shapes in your block of memory. 
The command SDRAW(S) X,Y, USING N in- 
dicates the specific shape. The N tells 
GRBasic which shape to use. The X,Y tells 
it where to start drawing from. You need 
not specify the USING parameter if you 
wish to use the same shape again, but to 
reset the pointers, you must use a 
SDRAW(S) X,Y USING 1. 

You may also scale or rotate your 



shape. The Size N command gives 
GRBasic a scaling factor to multiply the 
lengths by. The Turn N parameter, where 
N is a number between and 255, speci- 
fies the number of 45 degree turns to 
make. This is a bit inconvenient, since you 
may specify only 45-degree rotations. A 
better idea would have been to divide the 
360-degree circle into 256 even parts and 
rotate by that factor instead. One problem 
with all this is that the TRS-80 graphics 
are 3 by 2 units. Rotation causes some 
rather strange distortions in shape. The 
command is useful and it would be diffi- 
cult to implement in Basic every time you 
wanted to do it. 

You can return to the correct size by en- 
tering Size 1. You may return from an N 
turn by specifying 8-N turns if N is be- 
tween 1 and 8. The shape drawing uses a 
clipping algorithm so that if a point draw- 
ing is off the screen, no error will result 
since the point will be drawn in extended 
space. There are several such algorithms 
in existence, and this one works well. This 
algorithm solves a potential problem with 
rotations and scalings. 

The manual also gives instructions on 
how to POKE the shapes into strings, and 
how to tell the shape-table pointer where 
to look. 

The last command GRBasic provides is 
Audio. This command permits the produc- 
tion of tones over an amplifier connected 
to the TRS-80's cassette port. The Audio 
command is interesting in that you may 
play a single tone for a set duration, or you 
may play a scale of tones from one to an- 
other using the given duration. The syntax 
is Audio X,Y,N. If X = Y then a single tone 
is played, otherwise a range of tones is 
played from X to Y (if X<Y) or Y to X (if 
Y<X). N is the duration of the tones to be 
played. You may specify a fourth argu- 
ment, and it indicates the number of times 
the Audio X,Y,N command is to be played. 
You can get some very interesting tones 
from this command and it significantly 
enhances the overall package. 

GRBasic is a useful tool for the develop- 
ment of games and even some plotting 
programs. It allows you to view things in a 
variety of perspectives and provides very 
useful line, circle and arbitrary shape- 
drawing commands, as well as sound pro- 
ducing commands. 

As good as GRBasic is I would like to 
see the following improvements: Change 
the Turn command as mentioned; allow 
the user to input three-dimensional ob- 
jects and have GRBasic display the two- 
dimensional isoclines of the figure (pro- 
jections of the figure onto a plane); and 
change the Audio command so that you 
can play musical scales (minor and 
major). ■ 



INTELLIGENT 

PRINTER 

INTERFACE 

Free Your Computer from the 
Mundane Task of Printing 




^See List of Advertisers on page 386 



Imagine being able to use your 
computer seconds after beginning an 
extensive printout. 

Visualize your printout with page 
breaks, page numbering and titles, 
margins of your choice, indented 
carryover lines, on any size paper! 

Appreciate the time and money you 
will save by not waiting for your 
printer. 

SooperSpooler, a buffered printer 
interface, maintains control over your 
printer while you go on using your 
computer for more productive 
activities. Eliminate waiting while your 
printer pecks through a long 
document. SooperSpooler accepts 
information from your computer at up 
to 3000 characters per second and 
feeds it to your printer as fast as it can 
handle it without using any of your 
computer's memory or time! 

SooperSpooler features include: 

• 16K Memory (62K optional) 

• Buffer Status Readout 

• Space Compression 

• Pagination 

• Single Sheets 

• Headers and Page Numbering 

• Indentation on Carryover Lines 

• Self Test Routine 

• Features also Software Controllable 

• Plugs into Model 1, II, Hi systems 

• 16K Parallel I/O Unit $349.00! 

• Serial I/O Option $95.00 

• 46K Memory Option -$159.00 

SooperSpooler by Compulink— 
The missing link that gives your 
microcomputer mainframe printing. 



COMPULINK 

CORPORATION . 276 

1M0 Industrial Circle 
Longmont. CO 805O1 (303) 651-2014 



Send for brochure 

Dealer inquiries welcome 

Call for information: 800-525-6705 
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Uniterm 

B.T. Enterprises 

171 Hawkins Road 

Centereach, NY 11720 

Models I & III 

$79.95 

by Sal Navarro 

Uniterm is short for Universal Terminal 
Program. According to Webster's, 
universal means "pertaining to, or charac- 
teristic of all." This word totally explains 
Uniterm. 

Regardless if you have a Model I or 
Model III you only need one terminal pro- 
gram for both. It can be used with NEW- 
DOS +, TRSDOS, DOSPLUS, LDOS and 
NEWDOS80 Versions 1 and 2. The mini- 
mum system requirements are a Model I 
or III with one drive and 32K of memory 
and some type of serial interface, either 
an RS-232C interface, Lynx modem, Chat- 
terbox modem or Microconnection mo- 
dem. The manual comes in a looseleaf 
binder with 74 pages of comprehensive 
user instructions. It also gives tips on how 
it can make your communications easier. 

Getting Started 

When you first turn on the computer, 
you can initialize a Command I and set up 
a INIT/PAR file with the parameters you 
will be using for that type of communica- 
tion. You have to answer a few simple 
questions such as Auto Log-on Message 
and Sign-on Message. I answered my ID 
number for the log-on message and my 
password for the sign-on message. Now 
when I enter Micronet I just give an up ar- 
row-C and an up arrow-S and I have trans- 
mitted my ID number and password with 
just two keystrokes. All of these parame- 
ters are stored on the disk, and every time 
you call up Uniterm it automatically initial- 
izes all that you need. 

Command Mode 

The following is a summary of the com- 
mand mode. 

A— auto buffer open/close: This is a 
powerful feature that allows Uniterm to 
accept a clean copy of text from the host 
computer. It allows the host to open and 
close your computer's buffer automatical- 
ly, and the text will be ready to be saved to 
disk. 

B— load/save binary file: The command 
B allows you to send and receive binary 
files automatically. Uniterm converts 
them to ASCII before transmission and 
before saving them to disk. 

C— close buffer: This command allows 
you to manually close the buffer. 

D— display/print buffer: Unlike many 




other terminal programs, Uniterm allows 
you to look at your buffer to see what you 
are about to send or what you have just re- 
ceived. You can also send the contents of 
the buffer to your line printer. 

E— exit to DOS: If you want to return to 
DOS for a moment to check something, 
you can by the command E. You can then 
return to Uniterm by the R/CMD file includ- 
ed with Uniterm. 

H— half/full duplex: If you want to 
change from half duplex to full duplex 
while in Uniterm, you just have to do a 
command H and enter either an H or F. 

I— define your initialization parame- 
ters: These parameters are usually set up 
just once the first time you boot up Uni- 
term. The exception is if you are using a 
different number of systems that require 
different parameters. In this case you can 
make up different files for the different 
systems or different disks set up for the 
particular system. 

L— load ASCII file to buffer: Command 
L loads any ASCII file that has been saved 
to disk either by the command S or one of 
the word processors. In this mode you can 
also add to the contents of your buffer, in 
effect combining two or more files than 
you would by resaving to disk or transmit- 
ting them to another computer. 

M — change modem parameters: To 
temporarily change your modem parame- 
ters, you use this command. The perma- 
nent change is done via the command I. 

O— open and zero the buffer: The com- 
mand O can manually open and zero the 
entire buffer. This way the only thing in the 
buffer will be what you are receiving at the 
time. While in this mode you can toggle 
the buffer open and close with a shift-®. 
Doing this you can capture only the data 
that you want, such as specific messages 
on the bulletin board. 

P— send buffer in prompt mode: The 
command P transmits what you have 
stored in buffer. 

R— send buffer with auto open/close 
buffer codes: This feature is designed to 



"Uniterm conforms 

to the way you want 

to do things." 



be used with the Auto Buffer feature for 
automatically opening and closing the 
buffer during transmission. 

S— -save buffer in ASCII format: The S 
command automatically saves your buf- 
fer to disk in ASCII format. 

T— transmit buffer: This sends out the 
entire contents of the buffer in block for- 
mat. This means that it keeps sending the 
contents as long as the receiving system 
does not halt or abort the transmission. 
While in this mode and in full duplex, reli- 
ability increases tremendously. 

W— set screen to desired width: W al- 
lows you to set your screen width to any 
desired length up to 64 characters. By 
using a smaller value you are assured of 
no words being broken up. 

X— type to buffer from keyboard: This 
very handy feature lets the operator add 
text to the buffer before sending to anoth- 
er system or saving to disk. 

Z— display this command list: Activat- 
ing the command Z displays all the com- 
mand codes and what they are for. This is 
handy in the beginning while you are still 
learning the codes. 

The Manual 

A glossary of terms is included in the 
manual. It fully explains different words 
and phrases used in smart terminal pro- 
grams. There are sheets on how to build a 
special table if you so desire. If at any time 
there is an update for Uniterm, there is a 
sheet explaining how and where to get it 
off a bulletin located in your section of the 
country. A technical information section 
explains overlays and locations that Uni- 
term uses and for what. A list of public ac- 
cess systems that are in use around the 
country is also provided. It includes what 
type of system, phone number, access 
hours, baud rates and special interest 
codes for the particular system. 

Summary of Uniterm 

I have been using Uniterm first with my 
Model I with a Novation Cat and RS-232C, 
and now with my Model III with a Lynx for 
about six months. Now that I am used to 
the command and control keys I find it a 
lot easier to use than the terminal pro- 
grams that I had been using before. Uni- 
term conforms to the way you want to do 
things.H 
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Go For 

The Gold 




DOW JONES NEWS/RETRIEVAL®, . . 
The Standard Of Excellence In Electronic Information. 



Every four years, athletes set their sights on the "gold." 
Every day, millions of people set their sights on another 
standard of excellence — information from Dow Jones, the 
world's leading provider of business and financial news. 

Now, through DOW JONES NEWS/RETRIEVAL, 

the publishers of The Wall Street Journal offer owners 



of personal computers and terminals instant, electronic ac- 
cess to this same standard of information excellence. Re- 
liable information you can use to plan, solve problems 
and make more informed personal money management 
decisions. News and services that will help educate your 
family and bring it into the "Information Age." 

The Best. . .From The Biggest 

DOW JONES NEWS/RETRIEVAL gives you access 
to a wealth of exclusive information. Quickly. Easily. In 
the convenience of your home or office. It's the best in 
business and financial news and data. . .plus the best in 
consumer information, such as sports reports, weather fore- 
casts, movie reviews and, coming soon, an encyclopedia 
service. Our customers appreciate the quality of Dow 
Jones information. That's why DOW JONES NEWS/ 
RETRIEVAL is the nation's largest information re- 
trieval service. 



Free Introductory Time 

If you own a personal computer, or are about to buy one. 
ask your nearest computer dealer about DOW JONES 
NEWS/RETRIEVAL or call our toll free hotline for our 
free color booklet. We'll give you one hour of free intro- 
ductory non-prime time after you become a customer. 



Don't be confused . There are other retrieval services. But 
only DOW JONES NEWS/RETRIEVAL gives you 
news from The Wall Street Journal and Barron's , along 
with other news and information essential for business 
and investing. Step up to the standard of excellence in 
electronic information that's as good as gold. Subscribe 
to DOW JONES NEWS/RETRIEVAL today. 

CALL TOLL FREE 800-257-5114 

(In New Jersey call 609-452-1511) 



DOWIQNES 



DOW JONES NEWS RETRIEVAL is a registered trademark of 
Dow Jones & Company. Inc. 




■ GAMES GAMES GAMES™ 

The computer was not meant to be ALL business! 
We carry a complete stock of Adventure & Arcade 
style games. Each game has been subjected to ex- 
tensive testing by one of our less productive staff 
members. (* denotes rated great!) 

For Model I or III 

'Adventures by Scott A Cass. $19.95 

1-12 order by adventure number - also for 

Atari & Apple Cassette Disk 

Super Nova 15.95 19.95 

*Galaxy Invasion . . 15.95 19.95 

*Cosmic Fighter 15.95 19.95 

* Robot Attack 15.95 19.95 

•Attack Force 15.95 19.95 

•Defense Command 15.95 19.95 

•Alien Defense 19.95 19.95 

StarTrek3.5 14.95 19.95 

Sky Warrior 14.95 19.95 

•Eliminator 14.95 20.95 

•Armor Patrol 19.95 24.95 

•Valkyrie 29.95 39.95 

Planetoids 19.95 20.95 

Interlude 18.95 21.95 

For Kiddies 

Human Adventure — 19.95 

•Old McDonald 19.95 — 

Frog 14.95 — 

Red Riding Hood 14.95 — 

Color Computer 

CART CASS. DISK 

•Beserk — 24.95 — 

•Cave Hunter — 24.95 — 

Calixto Island — 19.95 — 

Black Sanctum — 19.95 — 

•Star Blasters 39.95 — — 

Color Meteroids — 21.95 — 

Magic Cubes — 19.95 24.95 

*Pac Attack — 24.95 29.95 

Hangman — 14.95 — 

Sigmon — 29.00 — 

Sees — 29.00 — 

Color Forth 109.95 — — 

3D Drawing — 24.95 — 

Minotaur Adventure — 19.95 — 

Color Scripsit 38.95 — — 

•Art Gallery 39.95 — — 

•Learning Lab — 49.95 — 



SPECIAL DELIVERY^ 

By now you have heard of this 

FANTASTIC SOFTWARE. 

Now experience it! 

• Maintain Your Mai! List 

• Print Free Format Labels 

• Merge with Form Letters 

• Fast Fast Fast Machine Language 

• Sorts Faster Than A Speeding Bullet 

• Enter Names at typist speeds 

• Use with Scripsit, Lazywriter, Electric 
Pencil (We sell them all!) 

• Extract Selected Names 

• Boldface & Underline (Even on the Daisy 
Wheel II!) 

• Get your Form Letters Past the 
Secretary's Desk! 

XTRA Special Delivery Includes All Of 
The Above PLUS: 

eDisk Sorts 
eMuIti Label Printer 
eKey Definitions 

The last mailing list you will 
ever have to buy! 

NOTE TO 
REGISTERED OWNERS 

Registered SPECIAL DELIVERY owners can upgrade to 
XTRA! by returning their ORIGINAL disk with $74.00 + 
$2.00 shipping and handling. 

FOR YOUR MODEL I OR III: 
(requires minimum of 32K, single drive) 

SPECIAL DELIVERY $125 

XTRA SPECIAL DELIVERY $199 

FOR YOUR MODEL il: 

(requires TRSDOS version 2.0 & Scripsit 2.0) 

SPECIAL DELIVERY $199 



■OTHER FINE SOFTWARE^ 
■iFOR THE MODEL I & IIIh 

All New Electric Pencil 

We are through stalling. 
It's really herel 

The original PENCIL set a standard for ease of use 
that no other editors can match. The NEW ELECTRIC 
PENCIL reaches even greater heights with many ex- 
citing new features that make it the most simple to 
learn text editor available for the TRS-80 Mod I or III! 
Don't leave home without it. 
Electric Pencil version 2 $84.95 



EDAS 

This is the assembler from Misosys which is used 
for all assemblies of Special Delivery. We had real 
headaches until this came along. A must for any 
assembly language programmer. 
EDAS MOD l/MOD III $75.00 

THE DISASSEMBLER 

This is simply the most advanced disassembler we 
have ever seen. Creates EDAS source code, inserts 
user-defined labels, disassemble disk or memory, 
generates ORGS & EQUates. 
THE Disassembler- Mod I, III $39.00 

RETAIL INVENTORY CONTROL SYSTEM 

Maintains Inventory, Tracks Stock Sold, Tracks 
Backorders, Tracks Reorder Items, Prints Purchase 
Orders, Prints Listings by Vendors, & MUCH MORE! 
This is the one we use in our store. 
Retail Inventory - Mod 1,111 $129.00 

MAXI MANAGER 

A real database manager has finally come to the 

Model I & III. 

Maxi $89.95 

MORE 

VISICALC MODEL I $94.95 

VISICALC MODEL III $189.00 

SCRIPSIT $94.95 

R.S. General Ledger $94.95 

LAZYWRITER l/lll $165.00 

NEWDOS 80 2.0 $145.00 

LDOS $125.00 

ST80 III $145.00 

Super Utility Plus $74.95 

Quick Fix $29.95 

NEW NEW NEW... 

ELECTRA SKETCH 29 95 

i^mmPRINTERSbhmm 

EPSON PRINTERS 

Epson has become the standard by which other low-cost 
printers are measured. Highly recommended! 

MX80 $465.00 

MX80 F/T $635.00 

MX70 $299.00 

MX100 $745.00 

Printer Cable $35.00 

TRS80 Bus Board/Cable $100.00 

GRAPHTAX 80 $80.00 

MX-80 Ribbons $14.00 

Print Heads $38.00 

2K Serial Card $145.00 

QUME DAISY WHEEL PRINTERS 

Sprint 9 KSR 35cps $1995.00 

Sprint 9 RO 35cps $1895.00 

Sprint 9 LTD 45cps. $2195.00 

Tractor Feed $195.00 

NEC SPINWRITERS 

NEC 7730 RO Parallel $2650.00 

NEC 7720 KSR $3100.00 



DATA SEPARATOR 

The lifesaver. If you have a MOD I with disk drives 
and no data separator you have problems. Order 
from us or someone else but get a data separator. 
Data Separator $29.95 

DOUBLER 

Another breakthrough. Add double density to your MOD 

I. Includes built in data separator. 

Doubler $165.95 

GREEN SCREENS 

Not much difference between green screens but 
everybody should have one. If you don't buy ours, 
buy theirs. 

MOD l/MOD III $17.95 

MOD ll/LEEDEX 100 $22.95 

IJG BOOKS 

Disk Mysteries $21 .50 

BASIC Faster & Better $28.95 

BASIC Decoded $28.95 

DISKETTES 

VERBATIM DATALIFE! Re-inforced hub, double den- 
sity, single sided. 

Pkg.of 10-5V4 inch .$25.00 

ELEPHANT DISKS. Re-inforced hub, double density, 

single sided. 

Pkg. of 10-5V4 inch $24.00 

MX80 PRINTER STANDS 

Smoked plastic printer stand. Hope you buy one of 
these — gotta bunch of these suckers in 
stock $23.95 

OTHER GOODIES 

Flip Sort Boxes 5 1 /4" $28.95 

Flip Sort Boxes 8" $39.95 

Plastic File Boxes (Holds 10 Disks) 4 Color's . . $3.50 

Verbatim Head Cleaner Kit $11.50 

Orchestra 90 $145.00 

Orchestra 85 $125.00 

Add 3% Shipping & Handling 

Texas Residents add 5% Sales Tax on 

all hardware items 

Specify whether MOD I, II, or III when ordering. 

SOFTWARE CONCEPTS 
(214)458-0330 

(214)458-0411 

visit our new retail store at 

116 Preston Valley 

Shopping Center 

Dallas, Texas 

Dealer inquiries invited. 

TRS-80 & Scrlpsit are Reg. Trademarks of Tandy Corp. ^ 43 
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Packer 1.5 

Cottage Software 

614 N. Harding 

Wichita, KS 

Models I & III, 16K, 32K or 48K 

$29.95 

by Tim Knight 

Most programmers aspire to write pro- 
grams which are fast, efficient, and 
tidy looking. Unfortunately, the process of 
debugging and modifying often results in 
a program less tidy or efficient than 
planned. Packer 1.5 solves some of these 
programming woes. 

Packer 1.5 is a machine-language pro- 
gram which enhances the Basic of a Mod- 
el I or Model III with or without disks. It is 
especially helpful to non-disk owners 
since it provides some commands not 
found in other non-disk systems. The 
package, made and distributed by Cot- 
tage Software, is one of the most helpful 
command-adding programs on the mar- 
ket—next to Level III Basic by Microsoft. 
After loading Packer, it is immediately 
up and running. Basic programming and 
all regular commands and functions are 
the same. In^addition, Packer provides 
some extra commands using the Disk Ba- 
sic command Name (which now works on 
any system, whether tape or disk). The 
commands are entered as Name xxxx: 
BLN,ELN", with xxxx as the command, 
BLN as the beginning line number, and 
ELN as the ending line number. 

Commands 

The Short command packs the resident 
Basic program by removing unnecessary 
words, spaces, and remark statements. 
When any of the commands are imple- 
mented, a beginning byte count is shown. 
At the completion of the command execu- 
tion an ending byte count is flashed on the 
screen. This is very useful in helping a 
user keep track of the space being saved, 
and see directly the benefits of using 
Packer. 

The second command, Unpack, does 
exactly what it sounds like. Unpack 
breaks the program into single-statement 
lines, places spaces between all data 
statements, and also between almost 
every keyword in Basic. This results in a 
very neat looking program, though some- 
what less efficient, and consuming a 
great deal more memory. If you are won- 
dering how this is useful, consider debug- 
ging packed program lines. Problem spots 
are always easier to spot in well spaced, 
unpacked program lines. Also, some mag- 
azines prefer this type of listing when sub- 
mitting programs, and the magazine read- 
er will appreciate them since they are eas- 



ier and less bugprone to type. 

The Pack command condenses the pro- 
gram as much as possible making it high- 
ly memory efficient. This command main- 
tains all program logic. If two lines should 
not be joined, Pack will not join them. 

Many Level II users have longed for a 
command to renumber their programs. 
Packer supplies this function with the Re- 
num command. A program may be renum- 



bered in any way desired. 

The last command is Move. As the 
name implies, it moves any block of pro- 
gram lines to any place in the program. 

I highly recommend Packer 1.5. Anyone 
frustrated with the limitations of Basic 
should consider it for his or her software 
library. It is easy to use, extremely well 
documented, and for the money, the best 
utility I have bought for my TRS-80. ■ 



Smart Terminal Program 
Howe Software 
14 Lexington Rd. 
New City, NY 10956 
$69 

by Richard K. Wallace 

Smart Terminal Program (STERM) is 
designed for a 16, 32 or 48K tape or 
disk-based Model I or Model III. STERM, 
with an RS-232 and modem, allows access 
to another computer over telephone lines. 
In addition, the terminal program can 
transfer files to or from the host system. 
STERM contains features not found in 
dumb terminal programs such as Radio 
Shack's Videotex, but is plagued by limita- 
tions not evident in many disk-based ter- 
minal programs. 

Features 

STERM's communications parameters 
can be set to conform to the requirements 
of the host computer. The baud rate, full 
or half duplex, the number of bits per 
word, the number of stop bits, even, odd or 
no parity, and a line feed after carriage 
return option are all software selectable. 

STERM can store whatever appears on 
the screen in a memory buffer and dump 
the buffer on command to a disk file, a 
tape file or a printer. Disk and tape files 
can be read by both Scripsit and Electric 
Pencil. In addition, everything on the 
screen can be simultaneously routed to 
the printer, with or without saving it in 
memory. You can type text or programs 
directly into the memory buffer for later 
transmission to the host computer one 
line at a time, upon receipt of a one to five- 
character, user-defined prompt string, or 
continuously. Files to be transmitted may 
also be prepared with Scripsit or Electric 
Pencil, saved to tape or disk, and then 
read into the memory buffer by the termi- 
nal program. Disk users can read and 
store Basic programs in disk files. The 
host computer can automatically send 
and receive data from the TRS-80's memo- 
ry buffer if the host is capable of sending 
Standard Device Control Characters. 



Other special commands include a true 
break code and an exit to DOS without 
rebooting. All available commands can be 
displayed on the screen. The user can re- 
define the control keys to transmit any 
ASCII character. Thus, symbols such as 
{, }, [, ], and / can be sent to the time-shar- 
ing computer, although they do not ap- 
pear on the TRS-80 keyboard. 

Faults 

STERM allows considerable communi- 
cation flexibility; however, it contains sev- 
eral shortcomings. For example, only al- 
phabetic control keys can be redefined to 
send arbitrary ASCII values. Since many 
keys already correspond to necessary 
control functions (cursor motions and line 
feeds), and the TRS-80 keyboard lacks 
many standard characters, the program 
would be more useful if it allowed defini- 
tion of numeric control keys. Note also 
that defining a key only allows the trans- 
mission of that character through the 
RS-232. Special characters or control 
codes cannot be typed into memory for 
later automatic transmission. 

Unless you have a disk-based system, 
Basic programs and data cannot be read 
into memory for transmission to the host 
system. For example, one could accept 
stock prices from an information network, 
but not store those numbers on tape for 
subsequent processing by Basic pro- 
grams. Also, if you regularly require a spe- 
cific communications protocol other than 
the default values or special control key 
definitions, you must set these values 
every time you load the program. There 
is no way to save the parameters to disk 
or tape. 

Any data stored in memory can only be 
scanned one line at a time. After display- 
ing the current line, the line pointer must 
be moved forward one line and the current 
line displayed again. This process repeats 
to slowly scan memory. Additional minor 
complaints include the lack of absolute 
cursor positioning and no provision allow- 
ing the system clock to keep track of con- 
nect time. The Model III version only 
comes on a 500-baud cassette, making 
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the only one with all these 

column x 24 line screen display I 

Real lower case characters 1 

Works with any printer i 

Runsin16Kor32K 



cated full-screen editor 

I text formatter 
Special MX-80 driver 
Disk & cassette I/O 




TELEWRITER 

Telewriter is the powerful word processor 
designed specifically for the Color 
Computer. It can handle almost any 
serious writing job and it is extremely easy 
to use. It has all the advanced features you 
need to create, edit, store, format and 
print any kind of text. With Telewriter you 
can quickly produce perfect, finished copy 
for letters, reports, term papers, articles, 
technical documentation, stories, novels, 
screenplays, newsletters. It is also a 
flexible and efficient way to take notes or 
organize ideas and plans. 

51 x 24 DISPLAY 

The Color Computer is an incredibly 
powerful and versatile computer, but for 
text editing it has some major drawbacks. 
The small 32 character by 16 line screen 
format shows you too little of the text and, 
combined with its lack of lower case 
letters, bears little resemblance to the way 
text really looks on the page. Reverse 
video in place of lower case just adds 
confusion. 

Telewriter eliminates these shortcomings 
with no hardware modifications required. 

By using software alone, Telewriter 
creates a new character set that has real 
lower case letters, and puts 24 lines of 51 
characters on the screen. That's more 
on-screen characters than Apple II, Atari 
or TRS-80 Model III. That's more than 
double the Color Computer's standard 
display. 

FULL SCREEN EDITOR 

The Telewriter editor is designed for 
maximum ease of use. The commands are 
single key (or single key plus control key), 
fast, and easy to remember. There is no 
need to switch between insert modes and 
delete modes and cursor movement 
modes. You simply type. What you type is 
inserted into the text at the cursor, on the 
screen. What you see on the screen is 
always the current state of your text. You 

Apple II is a trademark of Apple Computer. Ir 



can move quickly through the text with 
one key cursor movement in all 4 
directions, or press the shift key 
simultaneously for fast, auto-repeat. You 
can jump to the top or bottom of* the text, 
the beginning or end of a line, move 
forward or backward a page at a time, or 
scroll quickly up or down. When you type 
past the end of the line, the wordwrap 
feature moves you cleanly to the next. 



. . . one of the best programs for the Color 
Computer I have seen . . . 

— Color Computer News, Jan. 1982 



You can copy, move or delete any size 
block of text, search repeatedly for any 
pattern of characters, then instantly delete 
it or replace it with another. Telewriter 
gives you a tab key, tells you how much 
space you have left in memory, and warns 
you when the buffer is full. 

FORMAT FEATURES 

When it comes time to print out the 
finished manuscript, Telewriter lets you 
specify: left, right, top, and bottom 
margins; line spacing and lines per page. 
These parameters can be set before 
printing or they can be dynamically 
modified during printing with simple 
format codes in the text. 



. . . truly a state of the art word processor . . . 
outstanding in every respect. 

— The RAINBOW, Jan. 1982 



Telewriter will automatically number 
pages (if you want) and automatically 
center lines. It can chain print any number 
of text files from cassette or disk without 
user intervention. You can tell it to start a 
new page anywhere in the text, pause at 
the bottom of the page, and set the Baud 
rate to any value (so you can run your 
printer at top speed). 



Atari is a trademark of Ata 



is a trademark of Tandy Corp. : 



You can print all or any part of the text 
buffer, abort the printing at any point, and 
there is a "Typewriter" feature which 
allows you to type straight to your printer. 
Because Telewriter lets you output 
numeric control codes directly (either 
from the menu or during printing), it works 
with any printer. There's even a special 
driver for the Epson MX-80 that lets you 
simply select any of its 12 fonts and do 
underlining with a single underline 
character. 

CASSETTE AND DISK I/O 

Because Telewriter makes using cassette 
almost painless, you can still have a 
powerful word processor without the 
major additional cost of a disk. The 
advanced cassette handler will search in 
the forward direction till it finds the first 
valid file, so there's no need to keep 
retyping a load command when you are 
lost in your tape. The Verify command 
checks your cassette saves to make sure 
they're good. You can save all or any part 
of the text buffer to disk or cassette and 
you can append pre-existing files from 
either medium to what you have in the 
buffer already. 

AVAILABLE NOW 

Telewriter turns your Color Computer into 
the lowest cost hi-power word processor 
in the world today. It runs in 16K or 32K 
(32K recommended) and is so simple you 
can be writing with it almost immediately. 
It comes with 63 pages of documentation 
and is fully supported by Cognitec. 
Telewriter costs $49.95 including shipping 
(California residents add 6% tax). To 
order, specify disk or cassette and send 
check or money order to: 

Cognitec 

704 Nob Ave. 

Del Mar, Ca. 92014 

Or call (714) 755-1258 weekdays 7 AM- 
4PM PST. We will gladly answer your 
questions. 

MX-80 is a trademark of Epson America, Inc. e» 121 



sSee List ol Advertisers on page 386 
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BO REVIEWS 



"The documentation 
is fairly clear." 



tape reading and writing unnecessarily 
time-consuming. 

The detailed documentation is fairly 
clear. Only the discussion of changing 
baud rates and redefining control keys is 
confusing; however, experimentation with 
those commands should clarify their use. 
The most significant omission in the pro- 
gram package is that of a telephone 



number. If you experience any difficulty 
with the software, you are completely on 
your own. 

In summary, STERM provides many fea- 
tures not found elsewhere for tape-based 
computers. Disk users may prefer the sig- 
nificant advantages of somewhat more 
expensive programs such as ST80-III 
or Omniterm.B 
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The Patch Version 2.0 

CECDAT Inc. 

Box 497 

Hayden Lake, ID 83835 

$125 

by Bruce Powel Douglass 

The Patch is a lowercase modification 
that requires no software to drive it. It 
interfaces with the ROM chips inside the 
keyboard and monitors the calls made to 
the ROM. When something relevant to its 
operation is called, it takes control and 
substitutes its own bytes rather than 
those from the Level II ROM. You can also 
get (optionally) a shift-lock (just like a 
typewriter) and a block cursor. The lower- 
case is up and running as soon as you turn 
on your machine. You can turn the lower- 
case on (press Shift-up arrow) and off 
(press Shift-down arrow). You can, there- 
fore, revert to an uppercase-only keyboard 
with a double keystroke. The lowercase 
works with all the word processors as well 
as all DOSes, if you happen to have a disk- 
based machine. Some of these have to be 
modified slightly, but I'll get to that in a 
moment. The Patch is also compatible 
with Omikron's Mapper I and works with- 
out problems with this modification. 

The shift lock is a useful feature. By tap- 
ping the shift key, you can go temporarily 
into all uppercase mode. You stay here un- 
til you hold down the shift key for a slight- 



ly longer fraction of a second. It takes only 
a few tries to become proficient at switch- 
ing modes, but there is a slight problem 
with this i ( you use H with a disk-based 
machine. 

Most DOSes currently have a debounce 
feature to get around the keybounce prob- 
lems of the Model I. This debounce must 
be defeated for the Patch to work correct- 
ly. The Patch debounces the keys by itself. 
The manual shows the zaps to the various 
operating systems including TRSDOS 2.3, 
NEWDOS80 versions 1.0 and 2.0, 
NEWDOS + , Exatron ESF, and DOUBLE- 
DOS. Several DOSes are not mentioned. 
MultiDOS users can defeat the keyboard 
routine by holding down the shift key dur- 
ing the boot. Other DOS users will have to 
consult the manufacturer of that par- 
ticular DOS. This problem appears only if 
you also have the shift-lock option. 

What's the Catch? 

The Patch requires more extensive 
modification to your TRS-80 than you may 
feel comfortable doing. It involves cutting 
a trace, removing the ROMs and replacing 
them with a printed circuit board, and 
soldering in a piggy-backed chip and a few 
other wires. Although my experience 
should not necessarily be considered nor- 
mal, I did have problems. 

I am all toes (that's somewhat worse 
than all thumbs) when it comes to hard- 
ware. So rather than install it myself (and 
risk destroying my precious computer), I 
asked the electronics expert to put it in for 
me. The result was that the computer re- 
fused to function at all, even after remov- 
ing the unit and trying to reconstruct the 
system. I called CECDAT. They tried to be 



"They tried 

to be helpful, 

but nothing worked." 



helpful, but nothing worked. They advised 
me that I could send them the keyboard 
and they would repair it for $15 per hour, 
half their normal rate. So I sent it off, but it 
failed to work when I got it back. Fearing 
the worst, I opened the keyboard and 
found that in shipping, the PC board had 
come loose. After replacing it, it worked 
fine, and I have had no more problems 
with it. 

Even if you know what you are doing, it 
is possible to screw up this modification. I 
am not sure what went wrong in this case; 
CECDAT advised me that all they did was 
clean up the soldering a bit, although we 
checked it thoroughly before we sent it. If 
you send them your keyboard, they will 
make the modification for you. You pay 
the shipping expenses both ways. If you 
are unsure of yourself, you might consider 
that option. 

The original instruction manual I re- 
ceived was not very well written. It tended 
to verbosity on trivial things, and was 
vague on more important matters. This 
problem appears to be removed with the 
new instruction manual which includes 
drawings of the circuit board, where rele- 
vant, and takes you by the hand and leads 
you through the modification procedure. 
Even I could do it with these instructions, 
but after my previous experience I am not 
anxious to try. 

The manual also includes a program 
listing to use if you ever have to remove 
the Patch chip from the circuit board and 
return it for repair or update. 

The nicest feature of the new manual is 
that a large number of error symptoms are 
listed with a complete description of how 
to overcome them. For example, if you 
turn on the computer and get a screenful 
of squares, your ROM is unplugged. This 
troubleshooting guide is handy, and prob- 
ably necessary. 

If you are serious about having lower- 
case for your computer, the Patch is the 
best modification around. This is true be- 
cause it does not require a lowercase driv- 
er program to operate, and also because 
you can have a hardware shift lock with 
the shift key. These two features definite- 
ly make it worth the time and money.H 
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Wordsmith 
ABS Suppliers 
3352 Chelsea Circle 
Ann Arbor, Ml 48104 
$19.95 cassette and disk 

by Hugh M. Ruppersburg 



Wordsmith is an extremely inexpen- 
sive word processing program pro- 
duced by ABS Suppliers of Ann Arbor, Ml. 
It is written in Basic in two versions: one 
for 16K machines without disk, the other 
for 32K machines with at least one disk 
drive. The 16K version is generally identi- 
cal to the disk version, though it lacks the 
latter's search and kill functions and re- 
quires the B-17 Tape Operating System, 
marketed by ABS, to run. The disk version 
which is reviewed here comes on cassette 
and can be CLOADed under Disk Basic 
and then saved to disk. 

Wordsmith is one of the least expensive 
word processing programs available. 
Though it might satisfy a hobbyist inter- 
ested in playing around with word pro- 
cessing for casual letter writing or keep- 
ing a diary, it will not suit those who want 
to use their computers for more demand- 
ing writing applications. Wordsmith will 
not— its claims of being time-saving and 
elegant to the contrary— make such proj- 
ects as writing term papers, newsletters, 
or books easier. It requires an intolerably 
slow typing speed which only masters of 
the hunt-and-peck system will feel com- 
fortable with. Typists who work at moder- 
ate to rapid speeds will find that Word- 
smith has difficulty keeping up with them, 
often losing characters (especially at the 
beginning of lines), and occasionally lock- 
ing up completely until typing stops. 
Many hunt-and-peck typists who do not 
need the sophisticated capabilities of 
Scripsit or Electric Pencil will find Word- 
smith satisfactory. 

The instructions which accompany 
your cassette are clearly written and ac- 
curate. With the exception of the editing 
function, most of the program is simple 
enough; you should be able to use it with- 
out difficulty the first time you load it. Af- 
ter you run Wordsmith, the screen in- 
quires whether you want to use the lower- 
case option. If you answer yes, after a few 
seconds a message appears informing 
you that the lowercase option has been 
loaded and that you should type run once 
more. Once the lowercase option has 
been loaded, the first 10 lines of the pro- 
gram, which enable lowercase, are delet- 
ed from memory, so be sure to save the 
program to disk before running it. Other- 
wise you will lose the lowercase capability 
and will have to CLOAD again to regain it. 




Once in the lowercase option, the com- 
puter asks what line length you want to 
use. (Wordsmith allows a length of up to 
60 characters.) Then a menu appears list- 
ing the 14 program functions. To begin 
composing, type F for Fill and a column of 
15 numbers, each representing an empty 
line, appears on the screen's left side. A 
heavy vertical line on the other side of the 
screen marks the right margin. You type in 
your text in the normal manner. Word- 
smith features word wraparound, which 
means no words will be split in half at the 
ends or beginnings of lines. 

Unfortunately, Wordsmith does not al- 
low simultaneous composition and edit- 
ing, and its menu-oriented design is a def- 
inite disadvantage. In the fill mode you 
can delete words only by typing over 
them, an arduous process since the cur- 
sor backspaces very slowly. Insertions, 
deletions, and other changes must be ac- 
complished from the edit mode. To edit, 
exit the fill mode by pressing Clear, which 
returns you to the menu, where you type E. 
To make an insertion, press shift and the 
up arrow keys simultaneously. Then move 
the cursor to the desired position on the 
line and type in as many characters as the 
line length allows (the text does not auto- 
matically adjust itself past the end of the 
line as in more sophisticated word pro- 
cessors, so the number of inserted char- 
acters may not exceed the number of 
empty spaces in a line— another draw- 
back). 

Deletions are accomplished more easi- 
ly by typing D, which deletes the character 
beneath the cursor. Characters can also 
be changed simply by typing over them. 
Although the cursor moves slowly in the 
edit mode, you can speed things up a bit 
by using a character-search function: 
Press Enter, type the letter you are looking 
for, and then the number of its occurrence 
(the first occurrence, the second, and so 
on), and the cursor positions itself on that 
letter. You exit the edit mode by typing 



Shift and @ twice simultaneously. 

Editing is also possible in the delete 
and insert modes of the menu. If you press 
D, the computer queries the number of the 
line or lines you wish to delete. When you 
answer, Wordsmith deletes the lines, re- 
numbers the text, and returns you to the 
menu. Single words, sentences or para- 
graphs cannot be individually deleted, on- 
ly lines and whatever they contain. 

If you type I, the computer asks for the 
number of the line where you want to 
make an insertion. Once you answer, 
Wordsmith displays the text with the cur- 
sor at the beginning of that line. You can 
then move the cursor to the desired posi- 
tion and begin typing your insertion. Un- 
like insertions in the edit mode, additions 
made through the insert mode can exceed 
the line length, and the computer renum- 
bers the text to accommodate the added 
material. If you finish inserting and find 
yourself in the middle of a line, however, 
the text below will not readjust upwards, 
and you will find a big hole in the middle of 
a paragraph unless you can find some 
way to delete or add enough words to fill 
in the gap. A move mode also allows you 
to move up to 47 lines of text at a time, 
while a search feature locates every oc- 
currence of a specified word or phrase in 
the text. 

Wordsmith's editing functions are cum- 
bersome. Most writers, whether amateurs 
or professionals, edit as they write— try- 
ing one word, discarding it, trying another, 
and so on, until they happen upon the 
right one. They insert, delete and move 
sentences and paragraphs around con- 
stantly. Word processors are designed to 
make this particular aspect of writing 
much easier, and the good ones do. Word- 
smith does not. You cannot make 
changes unless you return to the menu 
and enter the edit mode, an irksome dis- 
traction which may break your concentra- 
tion, and which wastes time. 

Once you have written your text, Word- 
smith allows several means of formatting 
its appearance for display on the screen 
or on the printed page. Menu functions al- 
low the centering of individual lines, as for 
titles or subheadings, and right justifica- 
tion. The print mode allows more latitude 
in formatting. You can print all of the text 
or only the lines which you specify, with or 
without line numbers. You set the left 
margin, call for single or double spacing, 
automatically number pages in sequence 
beginning with the page number you in- 
dicate, and determine the number of lines 
printed on each page. 

Designed for use with the MX-80 printer, 
Wordsmith provides several functions re- 
lated to that printer's capabilities, includ- 
ing specified print density, emphasized 
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strike, and double strike. I was unable to 
print the text I wrote with Wordsmith. ABS 
provided me with the MX-80 control codes, 
but I use my TRS-80 primarily for writing 
and bookkeeping; I cannot write programs 
or make program changes without written 
guidance, so I was unable to modify the 
program to print through my Daisy Wheel 
II. Prospective Wordsmith purchasers 
who do not own the MX-80 should be 
aware that they will have to modify the 
program so that it will work with their own 
printers. 



Wordsmith provides no way of exiting 
the program. You can press Break, of 
course, to reenter Disk Basic. To return to 
TRSDOS, however, you must press Break 
and then type NEW to erase the program 
from memory. Otherwise, Wordsmith will 
rerun each time you try returning to 
TRSDOS. If you use Wordsmith in lower- 
case, you must reboot or reset your com- 
puter to escape the lowercase driver 
which is part of the program. I found no 
other way to escape the driver. When I re- 
turned to TRSDOS and tried loading Scrip- 



sit, the screen exploded into chaos. 

In comparison with more expensive, 
more sophisticated word processing pro- 
grams, Wordsmith has little to offer. If you 
do not need one of those expensive pro- 
grams, or if you are not a fast typist and 
you would merely like to use your comput- 
er to write letters to friends or to make 
notes, then Wordsmith might be exactly 
what you are looking for. Its low price is 
hard to argue with. If you want to make 
serious use of microcomputer word pro- 
cessing, though, look elsewhere. ■ 



ICL (Interactive Control Language) 
XYZT Computer Dimensions, Inc. 
2 Penn Plaza, Suite 1500 
New York, NY 10021 
Models I & III, 32K 
$59 disk 

by Bruce Powel Douglass 

Those who have worked on mainframes 
need no introduction to a job control 
language (JCL). For the rest of the micro- 
world, a JCL is a language that controls 
how the computer processes programs 
and commands. A JCL supervises the 
operating system and controls its func- 
tion. This is important in time-sharing 
systems, but how useful is it in a one-user 
microcomputer? 

ICL Is a simple job control language for 
TRS-80 microcomputers with NEWDOS 
2.1 or NEWDOS80 and 32K or 48K RAM. 
ICL is an interpreted language, as any JCL 
must be. It controls various DOS com- 
mands and functions and allows you to 
program any order of their execution. The 
simplest example of a use for ICL is 
running batches of programs that require 
no intricate program intervention or 
supervision. Who wants to sit around and 
load programs and watch them execute? 
ICL frees you from supervising your 
computer. 

ICL can load and run DOS programs 
with interpretive control over their execu- 
tion, with as little as one command. As an 
example, those of you who have used 
BASCOM from Microsoft know how many 
commands it takes to compile a Basic 
program: write the program, store the pro- 
gram, run the compiler, specify the source 
and object file names, run the linker, link 
to BASLIB, and so on. That can take a long 
time. ICL allows you to enter, with a 
single command, all those commands 
and put them in a keyboard queue. When 
keyboard input is expected, ICL auto- 
matically loads whatever is in the key- 
board queue for keyboard input rather 
than require you to sit around and type in 



predetermined answers to the queries. 

A queue is a line. It is similar to a stack. 
A stack differs from a queue in that a 
stack operates with a last-in, first-out 
logic, whereas a queue has a first-in, first- 
out ordering. ICL lets you set up a 
keyboard queue, and then as keyboard in- 
put is required by some program (as in an 
input statement), ICL checks to see if the 
queue contains data. If so, it substitutes 
its data for a keyboard answer. 

But other programs on the market do 
that. IRV, from Programmer's Guild, and 
KBE from The Alternate Source, both have 
that capability. What makes ICL a 
language, rather than a macro-key defini- 
tion program (such as the other two pro- 
grams mentioned) is the implementation 
of control constructs. 

A control construct is a language ele- 
ment that controls the logic flow of a pro- 
gram, such as GOTO, If, and so on. KBE 
has a simple conditional control con- 
struct, which The Alternate Source refers 
to as conditional macro-key expansion, 
but this capability is limited. KBE is not 
meant to be a language; it is a full screen 
editor with some fancy capabilities. ICL, 
on the other hand, has full control con- 
structs making it a true, although sim- 
ple language. 

The Manual 

One of the first things I look at when I 
review a software package is the manual. 
It is here that most programs are made or 
broken. The ICL Manual is better written 
than most I have seen, although it is not 
the best. The writing is a bit terse, and I 
doubt that a relatively new computer user 
could follow all of it. Several examples 
are: a useable table of contents, an alpha- 
betical reference section of the com- 
mands and pseudo-ops, examples to aid 
learning the language, and an Advanced 
Techniques section for developing skill in 
more interesting uses of ICL. 

On the other side of the coin, the 
manual ought to be indexed, and the use 
of variables could bebetterexplained.The 
manual is a better reference than tutorial. 



As a tutorial, it lacks depth and breadth. 
The Programming Methods section could 
be expanded to benefit the user. 

ICL Cometh 

You must specify whether you have 
NEWDOS 2.1 or NEWDOS80 in order to 
receive the proper format disk, although 
the program actually works with both. 
Some of the programs are ICL32/CMD and 
ICL48/CMD (an interpreter for all 
seasons), L/ICL, EXEC/ICL, DEBUG/ICL, 
FGO/ICL, QDIR/ICL; and RNAME/ICL, 
MKILL/ICL, and LNK/ICL 

Except for the first two, all the pro- 
grams listed are example ICL programs. 
To begin using the ICL interpreter, you 
boot up and enter ICL32 or ICL48, depend- 
ing on your memory size. The interpreter 
performs a few house-cleaning chores 
and then returns with &DOS READY 
= 00 = . You may enter all DOS commands 
in the normal fashion, as well as execute 
ICL programs. The L/ICL program lists ICL 
programs, for example. To list LNK/ICL, 
you need only enter L LNK. 

The Language 

The five divisions of commands are I/O 
commands, I/O support commands, com- 
mands for ICL interpreter, commands ini- 
tiating execution, and commands han- 
dling control interception. 

ICL is a semi-structured language in 
that it supports procedures, labels and 
line numbers, as well as variables. Before 
a given ICL line is executed, all the 
variables are parsed and their values are 
substituted into the expression. Variables 
can be combined in interesting ways. A 
variable for ICL is preceded by an &. You 
can assign a variable a value in your pro- 
gram, or get the value from user input via 
an &READ command. You may have the 
line 10 &A = 1 100 or 20 &B = &A22. If these 
lines are both in the sample program, the 
value that is substituted for B in line 20 is 
1 10022. A bit different from Basic, at least. 
You can even assign numbers to be vari- 
ables, provided they are preceded with 
an ampersand. Thus, 40 &1100 = 
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+ + + + + + + + followed by 50 &TYPE 
&&A transforms line 50 (after substitution) 
into50&TYPE +++++++ +. The vari- 
ables may be used and substituted in a 
very flexible manner. 

ICL is a procedure-oriented language, 
which is also different from Basic. You 
may execute an ICL procedure either by 
entering it directly from DOS, or by calling 
it with an &RUN command from another 
procedure. Nesting your procedures adds 
greatly to ICL's power. 

Logic-flow statements within a pro- 
cedure are the &GOTO, &IF, &JUMP, 
&RESUME and &RUN. The &GOTO causes 
program execution to begin at some 
specified label. &IF is the conditional 
statement in ICL. Its format is &IF 
operand 1 condition operand 2 state- 
ment. The conditions are equal, not equal, 
greater than and so on. Interestingly, the 
writers of ICL chose not to use the more 
common Boolean operator symbols and 
used two-letter abbreviations instead. 
This may be to stress the point that all 
comparisons are arithmetical and not 
logical. 

As an additional illustration of how vari- 
ables are different than in a more classi- 
cal programming language, the variables 
are substituted into the expression before 
evaluation. If &A is a null variable, the ex- 
pression &IF &A EQ YES &GOTO -AD- 
DRES will be expanded into &IF EQ YES 
&GOTO -ADDRES, which is an invalid 
statement, since the &IF construct re- 
quires two operands. However, you can 
concatenate a character with the variable 
to make sure that the statement remains 
valid. The example given in the manual is 




&IF .&A EQ .YES &GOTO -ADDRES which, 
in the case of &A being a null variable, will 
expand into &IF . EQ .YES &GOTO -AD- 
DRES, which is valid. I think that this flex- 
ibility may make for some interesting pro- 
gramming tricks and short-cuts, once you 
become adequately acquainted with the 
syntactical possibilities. 

ICL has some other useful capabilities. 
You can display text messages, read data 
from the keyboard, clear the keyboard 
queue, cancel a running program, specify 
a number of options, output text to the 
printer, place text in the keyboard queue, 
or suppress display of text. The options 
mentioned above include: disable com- 
mon video display driver, toggle the 
display of the current ICL line being inter- 
preted, turn on/off the keyboard queue, 
allow for single-byte keyboard requests, 
copy display output to the keyboard 
queue, enable/disable non-alphanumeric 
characters to be present in data taken 
from the queue. ICL also returns an error 
code, displaying the execution state of 
the last procedure. 

The DQ, or direct output to queue, op- 
tion makes ICL a usable product. Since 
you have the &READ command, it is sim- 
ple to run a program and process the out- 



put differently depending on the nature of 
the output. Perhaps a simpler way to say 
this is that you can place a running pro- 
gram's output in the keyboard queue and 
then &READ it, giving you the ability to 
analyse the output of said program and to 
continue processing in a manner appro- 
priate to that output. 

For example, you may have the old 
water-powered disk drives that are, at 
best, flaky. BASCOM is a tedious compiler 
to use with such drives, since it takes a 
long time to run, and if it fails you must 
redo the process. If the problem is in the 
drive, it may just require that you recom- 
pile it, and then it may (or may not) store 
the program correctly. 

Manual control of BASCOM under such 
circumstances can be a real pain. But ICL 
allows you to read the output, and if the 
compilation was unsuccessful, you can 
recompile it until it works. You can further 
check for the type of error made. If it was a 
Fatal Error message, you can &EXIT the 
procedure, but if it was a Parity Error, you 
can retry the compilation process. Then, 
when it finally runs, you can go ahead and 
link it with the linker, and even execute 
your compiled program. All with no user 
intervention! 

ICL is an interpretive job-control 
language for disk operating systems. 
While the language is simple, it is suffi- 
ciently powerful to automate many of the 
more tedious procedures that we all have 
to perform in using our computer. After 
all, computers are supposed to save us 
from work, right? ICL is a good product, 
and may be just what you have been 
waiting for.B 



TDS/DFT 

Bob Withers 

Big Systems Software 

27574 Via Rosalie 

Mount Clemens, Ml 48043 

Models I & III, 16K 

$29.95 and $19.95 respectively 

$40 for both 

by Tim Knight 

If you have a modem for your computer, 
you should not be without TDS/DFT 
(Tape Downloading System and Direct 
File Transfer). 

These two programs are machine-lan- 
guage smart terminal utilities. TDS is simi- 
lar to many "smart terms" on the market, 
but it is extremely easy to use and comes 
with two supplemental programs which 
complement it well. DFT, on the other 
hand, is of a different sort; it can transfer 
machine-language programs directly. 



DFT uses a utility to transfer any kind of 
file without conversion. This is a plus for 
anyone who enjoys downloading and up- 
loading (the process of receiving a pro- 
gram through your modem, and vice ver- 
sa). DFT also has many extra features 
which will come in handy as your exper- 
tise develops. 

Before receiving TDS/DFT, I had never 
used a smart terminal before. Except for 
one initial problem, the well documented 
manuals explained the programs' use 
clearly. My only problem occurred when I 
first loaded TDS and attempted to call up 
the system. I had absolutely no results. I 
soon discovered that with a Model III and 
Lynx modem, I must enter the command 
POKE 16912,56 before using the program. 

TDS Features 

In addition to uploading and down- 
loading, I can access Basic directly by 
pressing Clear. After receiving a Basic 



program via downloading, I can go direct- 
ly to Basic and run, edit or save the pro- 
gram to tape. You cannot LPRINT it since 
LPRINT sends programs to the uploading 
computer. Other useful capabilities are: 
support of all ASCII control codes, in- 
cluding upper and lowercase; 10 different 
transmission speeds; and 10 user-defin- 
able control keys. 

One of the supplemental programs, 
SYSCVT, changes a machine-language 
program to an encoded Basic program. 
This Basic program will not work until you 
use SYSCVT to change it back to a ma- 
chine-language program. This procedure 
allows you to save the Basic version 
to tape. 

What good does this do? Very little if 
the computer operator at the other end 
does not have the TDS package. That 
other operator has to undo your conver- 
sion. If the operator does have TDS, 
transferring machine-language files is 
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Several months ago the Kromorfkrom Empire invaded our 
planet and stole some of our newly developed and highly 
efficient "Krotnium" Star Cruiser fuel cells. Your mission is 
to infiltrate the Kromorfkrom Empire and pass yourself off 
as the commanding officer of one of their fuel vessels. 
Eventually you will be discovered and then it's battle time! 
Sound and joystick control make this another winner. 



Cat. No. 3853 
Cat. No. 3854 



Mod. I&IH.16K, cass 
Mod I &lll,32K,disk 



$15.95 
$19.95 



STELLAR ESCORT 



Five billion light years from Kromorfkrom, Federation 
forces have been at war with the hostile Cretonian Empire. 
Unfortunately, the Cretonians attacked by surprise and now 
your forces are almost out of supplies. It's up to you, the 
Escort fighter pilot, to save the Federation. Sound and 
joystick option are included. 



Cat. No. 3855 
Cat. No. 3856 



Mod I & III, 16K, cass 
Modl&IM,32K, disk 



$15.95 
$19.95 



GALAXY INVASION 



Cruel and crafty invaders have been spotted in battle 
formation warping towards Earth. You must quickly 
eliminate the aliens as they swoop down upon you. In- 
cludes sound and joystick action. 



Cat. No. 3847 
Cat. No. 3848 



Modi &III, 16K, cass 
Mod IS III, 32K, disk 



$15.95 
$19.95 



ATTACK FORCE 



In this fast-paced machine language game, eight alien 
Ramships are warping toward your ship. You must dodge 
them and fire missiles to destroy them before they get you! 
Sound and Joystick options are included. 



Cat. No. 3849 
Cat. No. 3850 



Mod I &III, 16K, cass 
Modi & III, 32K, disk 



$15.95 
$19.95 




Evil robots from the planet Jidya have overtaken one of 
Earth's valuable Space Stations. Space Central is counting 
on YOU to invade the station and conquer the robots. You 
must act quickly and boldly in order to carry out your mis- 
sion. ROBOT ATTACK features sound effects and e^her 
keyboard or joystick control. 



Cat. No. 3851 Mod I & III, 16K, Cass. 
Cat. No. 3852 Mod I & III, 32K, disk 

COSMIC FIGHTER 



$15.95 
$19.95 



Draft those pesky aliens! Your mission is to clear the 
skies of the invading aliens. As soon as space is clear, 
along comes another set. Keep shooting but watch out, 
your fuel is getting low. Good luck. Includes sound and 
joystick capability. 

Cat. No. 3213 Mod I & III, 16K, cass $15 95 

Cat. No. 3213 Mod I & III, 32K, disk $19.95 

METEOR MISSION 2 

Emergency! Your astronauts are in trouble. You must 
maneuver through the asteroids and meteors in order to 
save your men and get them to the space station. Complete 
with sound and joystick option. 



Cat. No. 3214 
Cat. No. 3215 



Mod I &III, 16K, cass 
Modi & III, 32K, disk 



$15.95 
$19.95 



SUPER NOVA 



SUPER NOVA is a fast paced real-time game for one or 
two players. The object is to destroy as many asteroids and 
aliens as possible without getting destroyed. Hitting a large 
asteroid causes it to break into smaller asteroids. Aliens 
and their flagship will appear on the screen and try to shoot 
you out of the sky. 



Cat. No. 3845 
Cat. No. 3846 



Mod I &III, 16K, cass 
Mod I & III, 32K, disk 



$15.95 
$19.95 



TRISSTiCK 



Model I and Model III owners may now use a joystick for 
better response in those fast-action programs. The 
TRISSTICK is compatible with all BIG FIVE software and 
comes complete with instructions for easy implementation 
into your own programs. It features the famous Atari 
joystick and plugs right in to your machine. There's no 
modification or wiring needed! 



Cat. No. 3939 
Cat. No. 3929 



Model I 
Model III 



"EXTRA SPECIAL" SPECIAL 

Purchase any three or more BIG FIVE programs 

and take 10% off. Combined with FREE SHIPPING offer, 

it's just too good to be true. 




$39.95 
$39.95 



HOW TO ORDER 

Write or phone. Pay by check, M/C, VISA, or COD (add $1.50 for 

COD). (800) 423-5387 (213)886-9200. Offer expires June 30, 1982 
Mention this ad and we pay shipping (UPS ground only). 
HW Electronics 19511 Business Center Dr. Dept. V6 Northric 
CA 91324 



WHEN IN SOUTH 



CALIFORNIA, VISIT OUR RETAIL STORES 




19511 Business Center Dr. 
Northridqe, CA 91324 



2301 Artesia Blvd. 
Redondo Beach, CA 90277 



444 S. Indian 
Palm SDrinas, 



CA 92262 



BO REVIEWS 



fairly easy. You load the machine-lan- 
guage program, use SYSCVT to change it 
into Basic, save the Basic program, load 
the Basic program with TDS, and send the 
file to the other operator. That operator 
then reverses the procedure. The need for 
both operators to have TDS is a severe 
limitation though. 

The second complementary program is 



bypassing the need to log in manually 
with first name, last name, city and state. 
All I do now is press shift @. 

DFT 

The DFT system is primarily down- 
loading and uploading oriented. Direct 
File Transfer is a simple way of transfer- 
ring Basic and machine-language files as 



"The first option. . . Chat. . . can be used 

when logging on to the host computer, 

or to "chat" with other computer operators." 



AUTOL. This one is easier to understand 
than SYSCVT. After loading AUTOL, you 
type a log-in code (the code which gets 
you into bulletin boards such as Connec- 
tion 80), and use that code whenever it is 
needed. This cuts down time on-line by 



opposed to all the loading and saving re- 
quired by SYSCVT and TDS. After loading 
DFT, a menu is displayed. The first option 
is Chat. Chat can be used when logging on 
to the host computer, or to "chat" with 
other computer operators. 



The second option is the most useful: 
File Transmission. It requires no ASCII-to- 
hex conversion. You can send and receive 
files with File Transmission, and most of 
the procedure is performed by the two 
computers on-line. All you do is hit one 
key and the program either comes to you 
or your program is transferred to the host 
computer. Again, the disadvantage is that 
the host computer must also be DFT 
oriented. 

DFT is becoming more popular, though, 
with more bulletin boards using it. For ex- 
ample, Westside Downland of Detroit, Ml, 
maintained by Ralph Landry, uses the pro- 
gram. Westside Downland's number is 
(313)533-0254, and it is free. 

The third option changes the baud rate 
from 110 to 9,600, alters the Chat-mode 
duplex (half or full), and contains com- 
mands for input/output to the tape record- 
er or disk. A high/low cassette rate option 
is included in the Model III version of DFT. 

I recommend that you buy the two pro- 
grams as a unit; you will save money on 
some excellent utilities. ■ 



EPROM Programmer 
Model AN-551 
Design Solution Inc. 
Box 1225 

Fayetteville, AR 72701 
$99.95 

by Mel Patrick 

With the increasing number of devel- 
opment systems and add-on op- 
tions for the TRS-80 Model I you need an 
economical method of programming your 
own EPROMs. Low cost programming 
units have only recently become available 
to the occasional user. Before that only 
commercial programmers were available, 
but their cost was so high that the hobby- 
ist was hard pressed to justify the 
expense. 

I was only one of many in this position 
and had to have my EPROMs programmed 
by a local electronics firm. Since most of 
these firms charge by the hour for en- 
tering the data into the EPROM, program- 
mer cost is an important factor. I calcu- 
lated that after I had three EPROMs pro- 
grammed I could have purchased my 
own unit. 

The Model AN-551 EPROM program- 
mer manufactured by Design Solution Inc. 
is a simple unit that enables anyone to 
program their own EPROMs with a low- 
cost outlay. 

The Programming Unit 

The EPROM programmer comes as- 



sembled and tested with its own power 
supply and instruction manual. The unit 
will program the two most common EPROMs 
on the market today: the 2716, a 2K byte 
device, and the 2732, a 4K byte device. 

The instruction manual contains all the 
information on the concept, connection 
and programming. Two Basic programs 
enable the user to program the 2716 and 
the 2732 EPROMs. The user must enter 
the programs; they are not supplied on 
cassette or disk (programs are only 17 
lines long). The programs transfer data 
from the TRS-80 memory to the EPROM 
and verify the data to ensure its accuracy. 

Although the initial advertisement for 
the EPROM programmer stated that infor- 
mation could be copied from ROM to 
EPROM or load TRS-80 memory from 
either ROM or EPROM, the software 
listings do not include this facility. How- 
ever, since the programs are in Basic, this 
is fairly easy to accomplish yourself. 

The unit is in a plastic case measuring 6 
by 4 by 1 inches and has a 40-pin edge 
card connector protruding from one side. 
The user must construct a special cable to 
connect the programmer from this bus to 
his system. The cable is simply a ribbon 
cable that has a female 40-pin edge card 
connector on opposite sides of the cable. 
A standard extension cable will not work 
because of the configuration of the 
EPROM edge card bus. 

On the face of the unit are three switch- 
es that control the power on/off, 
write/read, and 2716/2732 mode option. 



Two LEDs indicate the status of these 
switches. There is a standard 24-pin 
socket for the EPROM. No zero insertion 
force socket is provided although the user 
could easily install one. A jack on the top 
of the unit provides a connection for the 
power supply. The power supply is 12 volts 
ac, not dc as you might normally expect. 
The programmer requires 26 volts during 
the programming mode and a dc adapter 
would not supply that, hence the reason 
for the ac transformer. 

Programming Operation 

To program with the unit, you must 
have a blank EPROM. To verify that your 
EPROM is blank simply read all the ad- 
dress locations and make sure their data 
is 0FFH or 255 decimal. If your EPROM is 
not completely blank you must erase it 
with an ultraviolet light. The lamp source 
should have a rating of 2537A (spectrum 
frequency) and deliver a dosage of at least 
12000uW/cm 2 . Using a source like this 
takes about 12-20 minutes to completely 
erase the EPROM. 

This method requires that you either 
have access to such a light or you buy 
one. These light sources are fairly expen- 
sive and hard to justify if you are not going 
to use it much. As an alternative I bought a 
light that is normally used for checking 
stamps. The lamp has two filters for differ- 
ent spectrums of the ultraviolet range. To 
use this lamp, remove the filters and the 
filter holder to expose the bulb. Place the 
EPROMs about 1/2 inch below the bulb 
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Computer experts 
(the pros) usually have big 
computer experience. 
That's why when they shop 
system software for Z80 
micros, they look for 
the big system features 
they're used to. And that's 
why they like Multi-User 
OASIS. You will too. 



DATA INTEGRITY: FILE & 
AUTOMATIC RECORD LOCKING 



The biggest challenge 
for any multi-user system 

is co-ordinating requests 
from several usei 

to change the.sartte-ree©rd 
at 



Without this control, 
unauthorized users could 
access your programs and 
data and do what they like. 
A frightening prospect 
isn't it? 

And multi-users 
can multiply the problem. 

But with the Lo< 
Password am 



memory is needed. Even 
if you have more than 64K, 
your pay-off is cost savij 
and more efficient use 



OASIS IS AVAILABLE FOR 

SYSTEMS: Altos; CompucorpiCromemco^ 

Delta Products: Digital Group; DigitaL 

Microsystems; Dynabyte: G odbou t; 

Index; Intersystems; I 

SD Systems: ' 

Graphic: Vorirt 




/ a.- tiles e, pr dbfe m s . 

'or example: normally 

jsers can view a 
particular record at the 
same time. But, if that 
record is being updated 
by one user, automatic 
record locking will ceny a! 
other users access to the 
record until the up-date is 
completed. So records 
are always accurate, 
up-to-date and integrity 
is assured. 

Pros demand file & 
automatic record locking. 
OASIS has it. 



;eep,a,nrsrory 
ser rias been 
■n, when and 
r how long. 
Pros insist on these 
•.cosrity features. 
OASIS has them. 



EFFICIENCY: 
RE-ENTRANT BASIC 



upports 
inals 
inWs little as 
ry. Or, with 
nk switching, as much 
s 784K. 

ulti-Tasking lets each 
user run more than one 
job at the same time. 

And there's our BASIC- 
a compiler, interpreter and 
debugger all in one. 
An OASIS exclusive. 

Still more: Editor; Hard 
& Floppy Disk Support; 
Keyed (ISAM), Direct & 
Sequential Files; Mail-Box; 



SYSTEM SECURITY: 
LOGON, PASSWORD 
& USER ACCOUNTING 



Controlling who gets on 
your system and what they 
do once they're on it is the 

essence of system security. 



A multi-user system 
is o'ten not even practical 
on computers limited 
to 64K memory. 

OASIS Re-entrant 
BASIC makes it practical. 

How? 

Because all users use a 
single run-time BASIC 
module, to execute their 
compiled programs, less 



Scheduler; Spooler; 
all from OASIS. 

Our documentation is 
recognized as some of the 

best, most extensive, in the 
industry. And, of course, 
there's plenty of 
application software. 

Put it all together and it's 
easy to see why the real 
pros like OASIS. Join them. 
Send your order today. 




OPERATING SYSTEM 

(Includes: 
EXEC Language; 
File Management; 
User Accounting: 
Device Dtivers; 
Print Spooler; 
General Text 
Editor, etc.) 
SINGLE-USER 
MULTI-USER 



RE-ENTRANT BASIC 

COMPILER/INTERPRETER/ 

DEBUGGER 



DEVELOPMENT PACKAGE 

(Macro Assembler; 
Linkage Editor: 

Derjjgge-) 



DIAGNOSTIC & 
CONVERSION UTILITIES 

(Memory Test; 

Assembly Language: 

Converters: File 

Recovery; Disk Test; 

File Copy Irom 

other OS: etc.) 



COMMUNICATIONS 
PACKAGE 

(Terminal Emulator; 
File Send & Receive) 



PACKAGE PRICE 

(All ol Above) 

SINGLE-USER 

MULTI-USER 



FILE SORT 



COBOL-ANSI '74 



60 CO 



Order OASIS from: 

Phase One Systems, Inc. 

7700 Edgewater Drive, Suite 830 

Oakland, CA 94621 

Telephone (415) 562-8085 
TWX 910-366-7139 

NAME 



STREET (NO BOX 


=■) 


CITY 




STATE 
AMOUNTS 


ZIP 



(Attacn system descript.on; 

add $3 for shipping; 

California residents add sales tax) 

D Check enclosed D VISA 
□ UPS C.O.D. □ Master-charge 

Card Number 

Expiration Date , 

Signature 



MAKES MICROS RUN LIKE MINIS 



SO REVIEWS 



and turn it on. It should take about 12 
minutes to erase the EPROM (which will 
get very warm, so allow it to cool before 
using it). The light source emits a light 
blue light; do not look at it. 

Once the EPROM is blank you have to 
enter the information you want to transfer 
into memory. The software listings will 
not load a program into that location for 
you. You will have to use a machine-lan- 
guage monitor or devise some other 
method of loading the program at 7000H 



(starting address for data transfer). 

Connect the unit to your computer. 
Place the switches in the proper positions 
and run the program. The software pro- 
grams the EPROM and verifies it for you in 
about 300 seconds. If during the verifica- 
tion process you obtain an error all you 
can do is erase the EPROM and try again. 
If errors are still present you may have a 
bad EPROM. 

You should place an adhesive label over 
the window on the EPROM once it is pro- 



grammed. This protects the chip from ac- 
cidental erasure and you can label it for 
reference. 

I have used the programmer for about 
three months and it has operated without 
fail. This excellent device needs a better 
software support program. It should have 
been written in machine language and in- 
cluded the options mentioned in the ad- 
vertisement. This EPROM programmer is 
ideal for anyone who wants to program 
his EPROMs at a low cost.B 



SDS80C Editor/Assembler/Monitor 

The Micro Works 

P.O. Box 1110 

Del Mar, CA 92014 

Color Computer, 16K 

$89.95 

by Howard Berenbon 

Anyone interested in developing soft- 
ware for a 6809-based microcomput- 
er system will be interested in The Micro 
Works editor/assembler/monitor pack- 
age—the SDS80C. Its price includes the 
software on a ROM pack cartridge, a com- 
pletely documented 41-page manual, and 
an MC6809-MC6809E eight-bit micropro- 
cessor reference card. 

This is an outstanding program pack- 
age for anyone interested in using a Color 
Computer for software development. The 
Micro Works people have realized the 
value of the Color Computer as an inex- 
pensive tool for the programmer. 

The Editor 

The Editor is screen oriented. What ap- 
pears on the display is what is in the text 
buffer. Editor constantly displays the 
amount of RAM left in the buffer, in 
decimal, at the top right corner of the 
screen. This number reduces as you enter 
text. Since the program is located at hex 
address C000 in ROM, most of the RAM 
memory is available for use by the text 
buffer. 

The Commands 

In order to enter a program for assem- 
bly into the text buffer, type L to enter the 
insert-line mode, next enter the program 
listing. Here is a sample program entered 
to test the editor function: 

NAM CLEAR 
START LDX #$800 START ADDR 

LDA #$00 LOAD 
UP STA 0,X STORE INDEXED 

INX INCREMENT 

CMPX #$900 END ADDR? 

BNEUP BRANCH NOT = 

SWI SOFTWARE INTERRUPT 

END 



This program clears memory by placing 
zeros in each byte, beginning with the hex 
address 0800 and ending with 0900. 

Labels are typed in starting with space 
one on each line, as with START in line 
two and UP in line four of the above pro- 
gram text. After entering a label, entering 
a space moves the cursor to the eighth 
column on your screen, where mnemonics 
are entered. If no label is required on a 
line, just type a space. The program 
moves the cursor to the mnemonic field. 
After entering the instruction, you may 
enter a comment after entering a space. 
Pressing Enter moves you to the next line. 

To get back to the Command mode, 
type Break. Once you're in this mode, you 
have the use of the single-key entry op- 
tions. A particularly useful feature of 
editor is the find-string functions. They 
allow searching through your text buffer, 
finding a desired string, and changing it. 
Other useful features are the move-the- 
block-of-text and the copy-block-of-text 
functions. They save editing time when 
moving a block of program text to another 
area in your buffer. 

Additional features include writing a 
file to cassette and reading a file from 
cassette. Finally, if you must reset the 
machine for one reason or another, you 
may recover your file after reset by enter- 
ing an & sign. 

The Assembler 

The Assembler accepts source state- 
ments in standard 6809 Assembly lan- 
guage and produces object code to tape 
or memory. It expects the source 
statements to be in memory in the format 
used by the Editor. Also, it can produce a 
listing of the source and object code to 
the screen or to a printer. The Assembler 
is entered by calling it from the Editor. 

The manual does not go into great de- 
tail when it comes to 6809 Assembly- 
language programming. It assumes that 
the user is familiar with the language. 
Some of its features and options are: sup- 
port of 6800 instructions for cross assem- 
bly, local labels, conditional assembly, 



and pause/break/speed control of listings. 
The assembler is accessed from the 
editor by entering an @ sign, then any of 
the options for assembly, in any order: 

L Produce listing 
S Produce a sorted symbol table 
M Generate object code to memory 
T Generate an object cassette tape 
! Start listing in single-step mode 

3 Send output to 32-column printer 

4 Send output to 40-column printer 
8 Send output to 80-column printer 
= Do not assemble; go to ABUG 

For samples of the program text assem- 
bled, type @ LM and press Enter when in 
the Editor. This accesses the Assembler 
and first produces a listing on your screen 
and then generates object code to 
memory. The following is displayed: 

0001 066D 

NAM CLEAR 

0002 066D 8E0800 

START LDX #$800 START ADDR 

0003 0670 8600 

LDA #$00 LOAD 

0004 0672 A784 

UP STA 0,X STORE INDEXED 

0005 0674 30001 

INX INCREMENT 

0006 0676 8C0900 

CMPX #$900 END ADDR? 

0007 0679 26F7 

BNEUP BRANCH NOT = 

0008 067 B 3F 

SWI SOFTWARE INTERRUPT 

0009 062C 

END 
ABUG: 

The ABUG Monitor 

ABUG is the monitor program that over- 
sees the execution of programs during de- 
bugging. It is entered from the Editor by 
typing @ = and pressing Enter. It may 
also be entered from the Assembler after 
an object program has been written to 
memory. 

In the above example, after the object 
code was written to memory, the display 
printed: ABUG: Now ABUG is in control. 
You may run the program by entering a G. 
After entering G, the program executes 
and the 6809 registers are displayed. This 
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is caused by the SWI instruction and com- 
mand returns to ABUG. You can verify the 
program has zeroed memory between 
0800 and 0900 by typing M to examine 
memory, and 0800 to display eight bytes 
of memory. 

The cursor may be moved up, down, left 
or right with the arrow keys to display the 
contents of the computer's memory. Hex 
data may be entered or changed in this 
mode. Examining the memory from 0800 
to 0900, by pressing the down-arrow key, 
verifies that all memory in that area has 
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Edit 

Southern Software 

Allen Gelder Software 

Box 11721 Main Post office 

San Francisco, CA 94101 

Models I & III 

$40 

by Tim Knight 



When I first received Scripsit from 
Radio Shack and began learning 
how to use it, I wished that the same easy 
editing capabilities in Scripsit were possi- 
ble with my Basic programs. Things such 
as cursor control, scrolling, and global 
find and replace were so neat to have, but 
were unavailable on the Model III. Well, my 
troubles and the problems of many pro- 
grammers are over now that Edit is avail- 
able in the United States. 

Edit was published originally by South- 
ern Software in England, and I ordered it 
through Allen Gelder Software in San 
Francisco. It will work on almost any 
TRS-80 computer system. 

From the moment I loaded Edit, I 
couldn't believe my eyes. I can now con- 
trol what my programs look like, and I 
plan to use Edit whenever I write a new 
program. 

Of course, the Edit command is avail- 
able in Level II Basic, but the Edit program 
is much more. After loading this machine- 
language program, the computer returns 
to a normal Ready prompt. I may go ahead 
and work with any program just as I al- 
ways would, except that if I want to ini- 



been zeroed. 

The object code may be saved to cas- 
sette by entering an S, the beginning ad- 
dress, the ending address, the starting ad- 
dress, and the file name. The tape can be 
loaded from Basic using CLOADM, and 
run by typing EXEC and pressing Enter. It 
may be loaded from ABUG by L and the 
file name. (During assembly you may gen- 
erate an object cassette, so it may or may 
not be necessary to save a program while 
in ABUG.) To return to the Editor, type an 
asterisk. 



tialize the Edit program, I type in System 
and the starting address of the program 
(specified before loading it). Suddenly, the 
edges of the screen are bordered, and my 
program is listed within. The last line, as in 
Scripsit, is reserved for commands. 

The Commands 

The cursor is mounted on the first char- 
acter of the first line. By pressing any of 
the arrow keys, the cursor moves in the 
corresponding direction. If an arrow key is 
held down, the cursor moves rapidly 
across the screen. 

There are also special keys available in 
the Edit mode. Hitting Break enters you in- 
to the special command mode, while a 
second Break returns you to Basic. Enter 
completes all operations made, while 
Clear erases all operations made after the 
Enter key was last pressed. Oddly enough, 
the"®" sign is the control key, just as it is 
in Scripsit. 

The keypad is very important in Edit, 
too. Pressing "@" and another numberto- 
gether completes functions such as cur- 
sor motions, deleting, inserting, and so 
on. The alphabetic keys are also vital 
since the majority of the commands are 
achieved by pressing the "@" control 
key along with a letter. Line commands 
are easy to perform, with commands for 
functions such as delete line, insert line, 
split line into two lines, or join two lines 
into one. 

One of the features I have found only in 
Edit is the replicate function. This makes 
anew line identical to the one the cursor is 
on. The replicating can be handy for 
things such as repetitive data statements. 
There are even commands to move or po- 
sition lines. 

Block functions are available, also. In 
case you don't know, a "block" is a group 
of program lines (such as lines 100 
through 210). Blocks may also be manipu- 
lated in various ways, which is great for 
large programs. 

Of course, one of the programmer's 



The manual contains some useful infor- 
mation including programming hints and 
techniques. Appendix 2 contains informa- 
tion on the Basic ROM entry points, with 
some of the more useful subroutine calls 
listed. Appendix 3 contains information 
and programs on timing loops, and appen- 
dix 4 contains information on interfacing 
a printer to the Color Computer. 

The Software Development System 
SDS80C is quite a useful software 
package. ■ 



"From the moment I 

loaded Edit I couldn't 

believe my eyes. " 



worst enemies is the dreaded bug. A bug 
is a problem in the program, causing the 
program to crash, not work, or the entire 
system to explode into radioactive frag- 
ments. The "Global Search and Find" fea- 
ture with the Edit program can track down 
and exterminate bugs quickly and effec- 
tively. By pressing Break (special com- 
mand) and typing G or F followed by what- 
ever you are looking for, the cursor goes 
to it. The F key stands for Find, whiletheG 
key stands for Global search and replace. 
For example, if I remember that there was 
a part in my program that didn't work, be- 
cause of some typographical error like 
"FOR 1 = 1 TO 1000: NEXXT" (NEXXT 
should be NEXT), I would hit Break while 
using Edit, and type in the special com- 
mand G NEXXT NEXT. Doing this, the 
NEXXT would change to a proper NEXT, 
eliminating the bug. You must admit, 
it is a lot easier than searching through 
the program, and then executing all of the 
regular editing functions to remove that 
extra X. 

Should I Buy It? 

If you are a programmer looking for an 
easier editing mode, the Edit is right for 
you. If you have used Scripsit before, 
Edits' commands are almost identical to 
Scripsit and you should have no problem 
at all. On the other hand, even if you have 
never worked with a computer before, the 
thorough documentation will teach you 
how to use this utility quite effectively. So, 
to answer the question "Should I buy it?," 
my answer is an emphatic "Yes!"B 
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A whole new generation of Epson MX printers 
has just arrived. And while they share the family 
traits that made Epson famous — like unequalled 
reliability and ultra-fine printing — they've got a 
lot more of what it takes to be a legend. 

For instance, they've got a few extra type styles. 
Sixty-six, to be exact, including italics, a handy 
subscript and superscript for scientific notation, 
and enough international symbols to print most 
Western languages. 



What's more, on the new-generation MX-80, 
MX-80 F/T and MX-100, you get GRAFTRAX- 
Plus dot addressable graphics. Standard. So now 
you can have precision to rival plotters in a reli- 
able Epson printer. Not to mention true back- 
space, software printer reset, and programmable 
form length, horizontal tab and right margin. 

All in all, they've got the features that make 
them destined for stardom. But the best part is 
that beneath this software bonanza beats the 



72 • 80 Microcomputing, June/July 1982 



heart of an Epson. So you still get a bidirectional, 
logical seeking, disposable print head, crisp, 
clean, correspondence quality printing, and the 
kind of reliability that has made Epson the best- 
selling printers in the world. 

All of which should come as no surprise, espe- 
cially when you look at the family tree. After all, 
Epson invented digital printers almost seventeen 
years ago for the 1964 Tokyo Olympics. We were 



the first to make printers as reliable as the family 
stereo. And we introduced the computer world 
to correspondence quality printing and dispos- 
able print heads. And now we've given birth to 
the finest printers for small computers on the 
market. 

What's next? Wait and 
see. We're already 
expecting. 



■^97 



EPSON 

EPSON AMERICA, INC. 







3415 Ka 


shiwa Street • 


Torrance, 


CA 90505 • (213) 


539-9140 


FEATURE 


ORIGINAL 

MX-80 


GRAFTRAX-80* 


ORIGINAL 

MX-100 


MX-80 MX-80 F/T MX-100 
with GRAFTRAX-I'lus 


Bidirectional printing 


X 


X 


X 


X 


X 


X 


Logical seeking function 


X 


X 


X 


X 


X 


X 


Disposable print head 


X 


X 


X 


X 


X 


X 


Speed: 80 CPS 


X 


X 


X 


X 


X 


X 


Matrix: 9x9 


X 


X 


X 


X 


X 


X 


Selectable paper feed 






X 




X 


X 


PAPER HANDLING FUNCTIONS 


Line spacing to n/216 




X 




X 


X 


X 


Programmable form length 


X 


X 


X 


X 


X 


X 


Programmable horizontal tabs 


X 


X 


X 


X 


X 


X 


Skip over perforation 






X 


X 


X 


X 


PRINT MODES AND CHARACTER FONTS 


% ASCII characters 


X 


X 


X 


X 


X 


X 


Italics character font 




X 




X 


X 


X 


Special international symbols 








X 


X 


X 


Normal, Emphasized, Double-Strike 
and Double/Emphasized print modes 


X 


X 


X 


X 


X 


X 


Subscript/Superscript print mode 








X 


X 


X 


Underline mode 








X 


X 


X 


10 CPI 


X 


X 


X 


X 


X 


X 


5 CPI 


X 


X 


X 


X 


X 


X 


17.16 CPI 


X 


X 


X 


X 


X 


X 


8 58 CPI 


X 


X 


X 


X 


X 


X 


DOT GRAPHICS MODE 


Line drawing graphics 








X 


X 


X 


Bit image 60 D.P.I. 




X 


X 


X 


X 


X 


Bit image 120 D.P.I. 




X 


X 


X 


X 


X 


CONTROL FUNCTIONS 


Software printer reset 




X 




X 


X 


X 


Adjustable right margin 






X 


X 


X 


X 


True back space 




X 




X 


X 


X 


INTERFACES 


Standard — Centronics-style 8-bit parallel 


X 


X 


X 


X 


X 


X 


Optional - RS-232C current loop w/2K buffer 


X 


X 


X 


X 


X 


X 


RS-232C x-on/x-off w/2K buffer 


X 


X 


X 


X 


X 


X 


IF.F.E-488 


X 


X 


X 


X 


X 


X 



•Tandy TRS-80 block graphics only available with GRAFTRAX 8 
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ftBCDEIF^ *3it=*czc*&-F&&CZ?4EJ cr **£><=: <*&*-*& ± 25456 
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by Jake Commander 



"There I was resting on my laurels. . . 
when suddenly it's time to write my column again." 



Ring. . .Ring. . .Ring. . .Click! 
"Hello, Jake here. . .Column, col- 
umn. What column? OH THAT column— 
oh yes... Urgent you say... Ready by 
when? You kidding or what? I only just 
finished the last one! ... OK it'll be ready 
by yesterday." 

Click. Silence. Dull uninspiring si- 
lence. Good grief! What happened? 
There I was resting on my laurels, think- 
ing how easy it is to write a magazine col- 
umn, when suddenly it's time to write my 
column again. And I've got to do this 
every month? I think I'll just wait here in 
front of the word processor until some 
revelation drops out of the sky. After all, 
I'm never short of ideas for programs, so 
why should mere words be a problem? 
Hmmm... still nothing. Where are all 
those thousands of ideas I had when I 
volunteered for this project? How do all 
those other authors do it? 

I'm starting to feel terribly guilty about 
all those manuscripts I've read for 80 Mi- 
cro and rejected. Think of all the time and 
effort that's been put into those articles 
only to be rewarded with a not-today- 
thank-you-note. It's all my fault too. Of all 
the things I do for the Wayne Green pub- 
lishing corporation, that's one of the 
most important. Reading and selecting 
articles for the magazine has a profound 
effect on the end result, so it's an awe- 
some responsibility. Now it's my turn to 
be on the keyboard end of things and feel 
the "blank paper" syndrome that has 
faced many an author whose work I've 
ploughed through until the early hours of 
the morning. 

Why would potential authors put them- 
selves through that mill? It must be the 
lure of fame and fortune, or maybe the 
desire to share the latest programming ef- 
fort. You get a really great idea for an arti- 
cle describing your best ever program- 
ming solution. You're sure it is going to 
turn the whole world on its head. You 
squirm in your chair playing at "engineer- 
ing with words" until a semblance of an 
article evolves. A paragraph added here, a 
sentence deleted there; and it's still too 
short. Rewrite the conclusion, rephrase 
the introduction; it's enough to drive you 
out of your tree. 



Eventually your masterpiece is ready to 
present to the unsuspecting public, so 
you cram it into the smallest envelope you 
can possibly stuff the paper into and send 
it to 80 Micro to let fate take its course. 
Fate, in this instance, is me. Not that I re- 
ject a particularly horrendous amount of 
unsolicited material. It's just that while 
I'm sitting here still waiting for some di- 
vine inspiration, I feel awfully bad for all 
the aspiring authors I may have nipped in 
the bud. Don't give up! What are all the 
things that can put off the guy dealing 
with all those submissions? Well I sup- 
pose I'm in an excellent position to tell 
you; and there's a lot to tell. 

Bear in mind that I can only tell you 
what I think on a personal level, since no 
matter how objective I try to be, I'm bound 
to show a bias. Neither do I purport to be 
an expert author who thinks he knows 
best; but I do know when a manuscript 
has been enjoyable reading and have 
some feel as to how that relates to our au- 
dience which now runs in excess of 
110,000 readers. And I'm not without a 
degree of compassion. I too have suffered 
the anonymous rejection slips from unap- 
preciative publishers; I'm especially proud 
of my rejections from Apple Corps— the 
past music publishing empire of the Very 
Beatles Themselves. Nevertheless I may 
be able to purge my conscience as 
regards those rejected articles. 

Considering the sweat involved in cre- 
ating an article (especially the longer 
ones), it's no wonder some people are an- 
noyed at a rejection; we've even had a cou- 
ple of disgruntled writers threaten to can- 
cel their subscriptions. One guy wrote and 
told me he'd analyzed the adhesive tape 
on the program cassette he'd sent and 
had come to the conclusion that we 
hadn't tried his program; ergo, we hadn't 
given his offering a fair crack of the whip. 
All that did was cause me to unseal every 
cassette box, juggle the tape around, 
leave a few fingerprints, get some dirt on 
the cassette case— and then reject the ar- 
ticle anyway. If you were confronted with 
an article which started, "I am an expurt 
on Proggraming," and became progres- 
sively worse and included sundry inaccur- 



acies, would you run the "Proggram" to 
give the "expurt" the benefit of the doubt? 
No. I'll tell you what you'd do; you'd unseal 
the cassette box, juggle the tape 
around. . . 

Of course I'm going from the sublime to 
the ridiculous to make my point. Even if 
the six thousandth home-budgeting pro- 
gram is well written, it may be such over- 
worked material that the cassette remains 
untouched anyway. So there's an impor- 
tant point: If what you have to say has 
been said a thousand times before, then 
why bother to say it again? Keep the ideas 
coming, but keep them new. The world of 
microcomputing as seen through the eyes 
of a TRS-80 user is so multifarious that 
there's no excuse for repetition. I'll repeat 
that. There's no excuse for repetition. One 
garden variety of personal financing pro- 
gram a year is more than enough, thank 
you. 

If you're serious about writing for 80 Mi- 
cro, you should get a copy of our authors' 
guidelines. This leaflet tells you all sorts 
of sensible facts about writing in general 
and how to submit your manuscript. If 
you're unsure whether your article will be 
novel enough to warrant careful consider- 
ation, write in beforehand with an outline. 
This may save hours of toil and "blank pa- 
per blues" like I'm now suffering. Novice 
authors sometimes ignore or misunder- 
stand some obvious facts in the authors' 
guidelines. These are the most important: 
Manuscripts must be in upper and lower 
case. Editors and typesetters cannot work 
with copy which is all uppercase as print- 
ed on old teletype machines. The manu- 
scripts also must be double spaced, 
which (in case you don't know) means that 
every line has to have a blank line below it. 
This is another must for editing purposes. 
And editing is something which will hap- 
pen to your work, so don't get bent out of 
shape when you get authors' proofs con- 
taining all manner of alterations. This is 
done by a staff of professionals to ensure 
the magazine has a consistent style, so 
when you get your proofs, check them for 
accuracy and make any comments you 
have regarding the editing— that's what 
they're for. 
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12 Intergraded Account Receivable Programs 
Tested In Service For Over 3 Years 

User's Comments: • menu driven* increased cash flow* saved over 50 hours a month in secretarial hours* almost completely 
eliminated billing errors • phone supported-ask for Ron. 

LYNN'S A/R SYSTEM WILL 



• print invoices 

• tell you your a/r total, number of invoices outstanding, 
average per invoice 

• tell you at any time how many invoices an individual 
account has open, the total amount owed, the average per 
invoice, the invoice date, and then invoice amount 

• total sales on account for a given month, number of invoices 
sent, average sale per invoice 

• how much an account purchased during month, how many 
invoices were sent, average invoice for month 



Aging Report 01/31 /82 Page 1 



• tell you what percent of sales an account is to total sales 
by month 

• tell you what percent of a/r an account is 

• print mailing labels for your accounts 

• print statements at any time you want them (either individual 
or all accounts) 

• print alphabetical hardcopy of accounts and account numbers 

• print all items sold for month 

• alphabetical sort of items sold by month 

• this set of programs can be custom modified by you or us 

• AND MUCH MORE!! 



Account 


Current 


30-60 Days 


60-90 Days 


90+ Days 


Total 


ABC Inc. 


S 249.00 


$ 65.20 


$ 00.00 


$00 00 


$314.20 


Old Co. Inc. 


00.00 


84.40 


165.20 


0000 


249 60 


New Co. Inc. 


97.75 


00.00 


00.00 


00.00 


97.75 


Deadbeat Inc. 


00.00 


00.00 


00.00 


345.00 


345.00 


Totals 


$346.75 


$149.60 


165.20 


345.00 


$ 1 ,006.55 



Aging reports can be compiled on a daily, weekly or monthly bases. 

\IN'S CHECKBOOK-rD 
LEDGER SYSTEM 

•Phone Supported Ask For Ron* 

• saves hours of posting to general ledger • almost 
completely eliminates mathematical errors • menu driven • 
200 expense fields* will handle 1,000 checks a month •will 
print checks with option to enter handwritten checks • will 
do reconciliation statement with hardcopy • will print 
hardcopy of field totals both by month, year to date and end 
of year • automatic account numbering • automatic field 
entry • will print hardcopy of checkbook register • debit and 
credit memo entry • alphabetical hardcopy of accounts 
payable and account numbers (machine language sort, very 
fast)* AND MUCH MORE! • 



**"*• 



perfect tool for storing and maintaining mailing list, 
inventories, menus, collection records, article references, 
important dates, client records • all functions menu driven* 
easy to interface to word processors and communication 
programs • sort in ascending or descending order (fast 
machine language sort)* compact storage with minimum 
overhead* go from data base to visicalcand return* sort and 
select visicalc lines!!* interface to Radio Shack's "advanced 
statistical package". 



LYNN'S 



Account Receivable System 
Account Receivable Aging Report 
Checkbook Ledger System 
Well's Data Base Manager 

Add $2.00 Freight and Handling. 

Illinois Residents Add 6% Sales Tax 

Send $10.00 Per System 

For Printouts and Documentation. 

Credit Given on Order 



$49 95 
$20 00 
$69 95 
$39 95 



or III, 



Equipment Needed: 48K Model 
Lineprinter, 2 Disk Drives. 

The above programs will workonTRSDOS 1 .2 and 
1.3 for the Model III. NEWDOS, NEWDOS80, 
NEWDOS80 V2.0, LDOS and MULTIDOS for the 
Model I and III. 














LYNN COMPUTER SERVICE * 

6831 W. 157 St. 

Tinley Park, Illinois 60477 

(312)429-1915 „n B 

JRS80 and TRSDOS are trademarks of TANDY CORP NEWDOS and NEWDOS80 are trademarks of APPARAT INC LDOS is a trademark of LOGICAL SYSTEMS INC 




^See List of Advertisers on page 386 
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As regards programs, send both a hard 
copy listing and a magnetic media version 
(preferably disk). The hard copy allows us 
to ascertain the quality of the program- 
ming at the time the article is reviewed 
and gives us a cross check to ensure we 
have an accurate load of what you sent. 
The disk or tape allows us to run the pro- 
gram and to make a camera-ready print- 
out using our own 80 Micro style. If you're 
a disk user, we'll love you even more if you 
send us a duplicate copy of the article on 
disk. This enables us to use the latest edit- 
ing and typesetting techniques with the 
articles we accept. Nevertheless, we still 
need a printout of the article for review, so 
don't exclude it in favor of a tape or disk. A 
disk can be difficult to read at one thirty in 
the morning under the light of a table lamp 
and besides, I don't have 20/20 magnetic 
vision. Not only that, but if we had to run 
off a hard copy of every article submitted, 
we'd never have time to read any. Which 
leads me to another thing. 

We sometimes get comments com- 
plaining about the anonymity of a rejec- 



tion. Unfortunately, this is something 
that's fairly standard in the publishing in- 
dustry, whether it be software, the written 
word, music or whatever. Any noteworthy 
publishing organization has to provide the 
courtesy of as fast a turnaround as possi- 
ble and if every rejection (or acceptance 
for that matter) were accompanied by a 
critique of the work, it would take four 
times longer to process manuscripts. "So 
employ more people," you say. Are you 
prepared to pay more for the magazine to 
pay the extra salaries? 

However, in some cases when an au- 
thor has a hot idea but has executed it 
poorly we may give some direction to get a 
second chance at the idea. All this talk of 
rejections is depressing me— and all be- 
cause I can't think of a topic for this 
month's column. Suffice it to say that hun- 
dreds of authors have received the happy 
news that we want to publish their stuff. It 
does give you a sense of pride and accom- 
plishment to see your creation appear in 
print. And just think: people will read it in 
England, Australia, and even California. 



Evervone knows that each copy of the 
magazine in California is seen by four peo- 
ple; one to read it, and three to share the 
experience. (Sorry, I just couldn't resist it.) 
Someone even sent us a photo of himself 
reading SO Micro on the beach in St. Tro- 
pez in the South of France. People actual- 
ly appear to prefer it to sunbathing. So 
now's the time to sharpen the electric pen- 
cil or load your favorite word processor 
and convince the world about your new 
applications, methods, theories or what- 
ever you think is interesting. 

Ah! The creative juices are beginning to 
flow. Now I'm getting a good idea for this 
month's column. How about if I cov- 
ered . . . What? You mean I got this far al- 
ready? But I only just started. I wanted to 
tell people about this genealogy package 
for the Model II, and what about that Mod- 
el II Star Trek program? Great! I finally get 
the idea for the column and now it has to 
wait until next month. Maybe I should ac- 
cept a few articles to make myself feel 
better. ■ 




A completely refurbished 

IBM Selectric Terminal \vitfa ^g^^ J^ 

built-in ASCII Interface . 



!$MKM 



*FOR YOUR TRS-80 WITH OR WITHOUT 
EXPANSION INTERFACE. AVAILABLE WITH 
CENTRONICS TYPE PARALLEL PORT. 



Features: 

• 300 Baud Serial 

• 14.9 characters per second 
printout 

• Reliable heavy duty Selectric 
mechanism 

• RS-232C Interface 

• Documentation included 

• 60 day warranty — parts and 
labor 

• High quality Selectric print- 
ing Off-line use as typewriter 

• Optional tractor Iced 
available 

• 15 inch carriage width 




Also works with Exa- 
tron's Stringy floppy, 

for fast loading of pro- 
grams. (Has RS232 

built in stringy) 

HOW TO ORDER 
DATA-TRANS lOOO 

1. We accept Visa, Master * 
Charge. Make cashiers checks or 
personal check payable to: 

DATA-TRAIVS 

2. All orders are shipped 
EO.B. San Jose, CA 

3. Deliveries are immediate 




Desk and table top models also available. 



For orders and information 

DATA-TRANS 

45277 Fremont Blvd., #7 ^ioe 
Fremont CA 94538 

Phone: (408) 263-9246 
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The saga continues* As a tone Warrior 



fflPP 



by Randatt Don Masietter 

dare to enter the KAIV in quest of an exquisite 



orrery. And you must defend yourself against the scores of hideous creatures that seek to make you 
just another heap of bones in a (onefy corner of . . .the KAIV. 




*^^i 



r«.. 



NXferriors of RAS is a role-playing series, written in machine language, with graphics. Games can be saved, as well as 
the characters you become. Characters may be used interchangeably between volumes 1 , 2 & 3. 



MODEL I OR 111,48k 



VOLUME 1, DUNZHIN 
VOLUME 2, KAIV 
VOLUME 3, THE WYLDE 
R LOCAL DEALER, OR CALL 1 " 



m 



8ffiae?sf? 



w$Em 
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- Disk Album $29.95 
- Disk Album $29.95 
liable July 15. 
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by David Busch 




In a stunning move likely to rock the 
microcomputing industry to its founda- 
tion, Kitchen Table Inc. has introduced a 
line of Mega Upgrades for the TLS-8E/ 
TRS-80 family of computers. These modi- 
fications are simple plug-in devices which 
literally turn any S80 computer into an en- 
tirely different machine. 

The new products were unveiled at the 
1982 Portage County (Ohio) Home Appli- 
ance Faire. Kitchen Table Inc. has chosen 
this forum for important new product in- 
troductions two years in a row. The ficti- 
tious company has found that as the only 
computer-related exhibitor, there is little 
risk of being upstaged by the competition. 

I found the new Mega ROM to be the 
most interesting item. To install this inno- 
vative item, the usersimply pries loosethe 
Level II ROM in a TRS-80, or the Level XXIII 
ROM in the TLS-8E, and substitutes the 
Mega ROM in the sockets. The new chip 
causes the S80 computer to emulate one 
of a variety of other machines, depending 
on the ROM selected. I chose the IBM 370/ 
145 Mega ROM. 

I'll admit that gaining the equivalent of 
an iBM 370 mainframe for the $49.95 ROM 
price appears to be an overwhelming bar- 
gain on the surface, but there are some 
hidden drawbacks. 

• NEWDOS80 and Drossdos 8E are not 
compatible with the Mega ROM's. Kitchen 
Table Inc. supplies a low-cost substitute 
with the new system, DOS/VSE. Although 
it lacks many of Drossdos 8E's features, it 
does have a nice Power spooler. This utili- 
ty allowed me to leave my computer oper- 



ating during my vacation, while it printed 
out 43,000 pages of text I had gotten a bit 
behind on. 

• When used with the stock Z80 or 
Z79A microprocessors, the IBM 370 emu- 
lator is a bit slow. This is due to the slight- 
ly greater power of the 370 CPU when 
compared to the Z-series chips. The eight- 
bit microprocessor has to do a great deal 
of work to simulate the larger mainframe, 
and the bottom line is s-l-o-w operation. 
In benchmark testing, my TLS-370 re- 
quired 48 hours to generate six random 
numbers between zero and 10. Some 
prompts can take more than 30 minutes to 
be printed on the screen. Telecommunica- 
tion is possible at no more than one micro- 
baud. 

• There is no provision with the TLS- 
370 or TLS-4341 for cassette data files. 
While DOS/VSE allows tape storage, for 
some reason the proper commands make 
my CTR80A run at about 1000 RPM. 



"In benchmark testing 
my TLS-370 required 
48 hours to generate 

six random numbers." 



• The vaunted capability of being able 
to attach IBM plug-compatible peripher- 
als to a modified TLS-8E is not of much 
practical use. Kitchen Table Inc. supplies 
no cables, so you have to make up your 
own for the plugs to be compatible. 
Worse, the IBM peripherals are more ex- 
pensive than those already available for 
S80 computers. 

For example, it is probably a better idea 
for a satisfied TLS-8E user to stick with his 
current 100-character per second dot-ma- 
trix printer. Although an impressive 10,000 
lines per minute non-impact printer is 
available, this unit costs more than 
$300,000. Most home computerists and 
many small business operators will not be 



prepared to make that kind of outlay. 

With disk drives, the comparison is 
even more unfavorable. The IBM people 
haven't adapted the 5 1 /4-inch minifloppy 
disk to their 4300 line, even though that 
format has been widely accepted as the 
standard of the industry! Instead, their 
mainframes (and the converted TLS-370 or 
TLS-4341) use some ridiculous disk pack 
device that resembles a trash compactor 
with an acrylic birthday cake inside. 

Even more laughable, these peripherals 
are not very portable. Kitchen Table Inc. 
graciously offered to install the printer 
and two disk drives in my office to demon- 
strate the capabilities of the TLS-370. The 
printer alone took up most of the space in 
my living room. Imagine unhooking this 
gear and trying to take it to a user's group 
meeting! 

If you decide to go this route, I'd recom- 
mend installing one of the Mega Upgrade 
CPU modifications described below. It 
makes little sense to have a 10,000 lines 
per minute printer when your computer 
takes three weeks to fill up its buffer. 

Convert Your Computer to 16-Bit Power 

Many of these problems can be solved 
with another Kitchen Table upgrade, the 
Mega Chip. This modification effectively 
turns the TLS-8E into a 16-bit or 32-bit 
minicomputer. Kitchen Table Inc.'s solu- 
tion is ingenious. To convert the micro in- 
to a 16-bit computer, the user merely pig- 
gybacks an additional Z79A chip onto the 
one contained in the TLS-8E. The result: 
all 8-bit registers become 16-bit registers, 
and all two-byte registers can hold four 
bytes. Adding two more Z79A chips (this 
stack can be as much as three inches 
high) results in a 32-bit mini. An elegant 
idea— I wonder why no one thought of it 
sooner? 

A KTI spokesperson pointed out the 
new 16 or 32-bit processor has the same 
instructions available in the 8-bit Z79A. 
That is because the microprocessor al- 
ready includes more than 40 instructions 
(such as JIGGLE, PLOP, and GROK) which 
the designers didn't know how to use. 
Imaginative programmers may find an ap- 
plication for these instructions. 

The next KTI Mega Upgrade is the Mega 
CHAR, a character generator which in- 
cludes every known alphanumeric, graph- 
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Professional/Scientific 





Since introducing QWERTY 3.0 in September, people 
have been calling to ask if we were making 
ludicrous claims. The answer is NO! QWERTY 3.0 
does all we claim it does and more! No other 
software of this type can match QWERTY 3.0, 



«?■ S. 



2 2 

g i J i + y n 

2 2 

i=i x i ^ - f e z 

It is the best. Period. We guarantee you will 
agree! If for some reason you find that this 
program does not meet your needs, return the 
entire package within 14 days for a prompt and 
cheerful refund. 

(Actual QWERTY text above) 



II II. I MUMJMBBEC 



SOME FEATURES OF QWERTY 3.0 

1. Automatically prints in proportional print, with a suitable format. Transitions between 
the three print styles are easy including all expanded print modes. 2. QWERTY 3.0 adds 75 
new symbols, including upper and lower case Greek letters, mathematical symbols such as 
integrals and summations, arrows, brackets, and probability symbols. 3. Any character can 
be used as a subscript or superscript, even simultaneously. Carats, bars, and tildes can be 
placed over any character, with precise position control. 4. Underlining, with or without 
underlining of spaces, including long ratios and mathematical expressions. 5. FOOTNOTES 
can be placed on any page so that they remain on the desired page, even if text is inserted 
later. 6. TABLE commands enable positioning of the print head anywhere on a line. 
Invaluable in printing neat mathematical layouts, tables, columnar material, etc., in 
proportional print. 7. PRETTY commands allow printing of repetitions of a chosen 
character. When combined with TABLE, decorative borders can be produced with ease. 8. 
FOUO format produces output in two or three columns per page, in either proportional or 
16.7 cpi mode. Ideal for newsletters. 9. Supplies a third output mode, in which only 
SCRIPSrT commands are obeyed. Allows printing of special QWERTY commands for future 
reference. 10. PAGE END indicates where pages will end, and the page number, without 
printing the text. One can prepare an almost error-free document without ever using 
paper. 11. Correction of SCRIPSfT's errors and inconveniences, extensive documentation, 
and much more! 

QWERTY 3.0 requires a TRS-80 Model I or Model III, at least one disk drive, a copy of 
SCRIPSIT, and one of the printers specified below. When ordering, please specify which 
model computer, number of drives, and printer you use. For cautious buyers, we offer the 
manual (over 70 pages) for $1 0. When you decide to buy QWERTY, we will credit the full 
manual price. 

QWERTY 3.0 

(for Lineprinter IV, Centronics 737, or Centronics 739) complete package .... $74.95 

BUSY (for Radio Shack Daisy Wheel II) complete package $74.95 

QWERTY 3.0 Manual (specify printer) $10.00 



■H*5= 



Now available 

THE PROGRAM STORE 

in Washington, D.C •* 



mi 



m 




P.O. BOX 3558 CHAPEL HILL, NC 275 
TO ORDER, CALL 1-800-334-5470 




KITCHEN TABLE SOFTWA1 



ic, scientific or imaginary symbol. With 
this mod installed it is possible to write in 
Russian Cyrillic, Greek, Japanese, Chi- 
nese, Sri Lankan and Martian. Symbols 
are included for types of calculus that 
haven't even been invented yet. Tiny Pac- 
men, flying saucers, and other images are 
included for games programmers. All of 
these may be printed in reverse video, as 
well. 

Plastic key caps are supplied, each 
printed with all 73 characters that key can 
invoke. The printing was a little small and 
hard to read, but KTI also thoughtfully in- 
cluded an 11 x 14-inch sheet of acrylic 
plastic. This resembles the magnifiers 
used to enlarge fine text print for the far- 
sighted. Placed on a stand and suspend- 
ed above the keyboard, the magnifier can 
be viewed by the user while typing. It is un- 
likely even the most proficient touch typ- 
ist will learn the keyboard for 73 different 
character sets. 

Mega CHAR has two drawbacks. 

First, it requires 64K of memory. Al- 
though it is in ROM, the Z79A chip can ad- 
dress only 72 thousand memory loca- 
tions, so only 8K of RAM can be used for 
programs with the character generator in- 
stalled. I would have liked to see some 
sort of bank-switching technique used so 
only one character set is available at a 
time. I see little use for being able to mix 
the Pi symbol with a picture of Daffy Duck 
in the same program. 

Second, by an oversight, the standard 
English character set was not included. 
When the Mega CHAR is installed, the 
user has no way of invoking the normal al- 
phanumerics. A minor setback, however, 
if one happens to know Russian or Japan- 
ese—simply write programs or text in 
those languages. 

Another new product was the Mega 
OCR, which turns any line printer into an 
optical character reader through the ap- 
plication of the little-known Reverse 
LPRINT command. This mod requires re- 
placing the print head of your printer with 
an optical sensing device. The change- 
over can take as little as a few seconds if 
you own an Epson MX-series printer, or as 
long as two hours for a Kitchen Table 
printer. Removing the KTI printhead in- 
volves a blowtorch and a hacksaw, and is 
not recommended for the beginner. In- 
stead, take your printer to any muffler 
shop and have it do the job. 

Once the attachment is in place, simply 
feed a document into the printer, type RE- 
VERSE LPRINT (or REVERSE LLIST if it is 
a program listing). Your printer will now 
accept the document, reading each line 
and feeding it back to the computer. Be- 
cause of the high intensity ultraviolet 



light, the original printing is bleached out 
and removed from the paper. It is quite 
amusing to watch the user feed docu- 
ments into the printer, and remove blank 
sheets of paper from the other side. 

I wouldn't have believed this possible 
had not KTI graciously showed me a mo- 
tion picture of the system in use. (No pro- 
totypes were available for a hands-on 
demonstration.) I watched with awe as 
sheet after sheet of blank paper emerged 
from the printer, and carefully folded itself 
in the box behind. Kitchen Table Inc. had 
obviously assembled this demo film in 
haste, because I noticed it had been edit- 
ed rather sloppily. The opening titles read 
"The End." 

I was also unable to test Mega Mod PC, 
which is a color-conversion kit for the KTI 
Pockets Computer. Watch for an in-depth 
report on this product when it becomes 
readily available, or whenever I can figure 
out a useful application for this capability. 

Other Products Foisted on Consumers 

Some minor products were also intro- 
duced at the trade show, which was 
sparsely-attended due to its unfortunate 
scheduling on Easter Sunday. One deser- 
vedly-overlooked item in the Mega Up- 
grade line was a hardware modification 
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that slows down the TLS-8E's clock speed 
to .1 megahertz. Once installed, the user 
can switch over to the slower speed by the 
command POKE 15360,256. Kitchen Table 
has dubbed the kit Slow POKE, and is mar- 
keting it as a way for inept Space Invaders 
players to finally win a game. 

Kitchen Table Inc. also showed ?Basic, 
which it describes as the first Basic Misin- 
terpreter (see 80 Micro, April 1982). The 
utility is designed for someone with a 
friend intolerably proficient at program- 
ming. ?Basic helps bring down haughty pro- 
grammers a peg by introducing bugs and 
syntax errors without their knowledge. It 
also scrambles (or removes) helpful Re- 
marks, changes variable names, and in- 
serts Parody Errors. 

When paired with Nonsense, a KTI-de- 



veloped language without keywords, syn- 
tax, or operators, and BASBOL, which 
combines the worst features of BASIC 
and COBOL, Kitchen Table has assem- 
bled quite an arsenal of unusual lan- 
guages. I've heard rumors from KTI 
PARQUE that several other high-level idi- 
oms are under development. These in- 
clude Crosstalk and LITHP. 

Kitchen Table is also reportedly work- 
ing on a massive state-of-the-art main- 
frame computer, to be called the 
KLUDGE-1. This new computer will rely 
heavily on what KTI calls "reverse engi- 
neering." The company originally applied 
the reverse engineering concept to the de- 
sign of its TLS-8E, when transistors and 
hard wiring were used in place of the 
"cheaper," less reliable integrated cir- 
cuits. 

With the development of the 
KLUDGE-1, this devolutionary trend has 
taken another step backward. Several pio- 
neering techniques are being considered, 
including an intricate application of vacu- 
um tubes in place of the transistors. 

A KTI spokesperson explained vacuum 
tubes have not been popular in recent 
years because of a shortage of vacuum. 
He blamed the shortfall on the increased 
consumption of vacuum in the engines of 
downsized American cars. In addition, the 
overthrow of the government in Hooveria, 
chief supplier of vacuum to the free world, 
has led to a volatile market for the strate- 
gic non-gas. 

However, Kitchen Table has filled the 
void in the supply lines, and located a reli- 
able Asian source for full-time vacuum 
tube production. 

Some of these products should be arriv- 
ing at your local computer store about the 
time this issue of 80 Micro hits the stands. 
I'd recommend making your purchases 
quickly, because Kitchen Table products 
never remain on the shelves long. Most 
are stocked for a week or two then 
shipped back.B 
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ture continues. The graphics, wizardry of 
d the deadly imagination of William Denman 
have once again joined forces to produce a world of evil 
genius. Hordes of maddened army ants will pick your 
bones. Killer clowns will send you screaming. Clever 
guards will tax your ingenuity. And a hundred other 
confrontations with a nightmare world may leave you a 
babbling idiot. 

Graphics are instantaneous and three-dimensional. 
The building has over 1500 locations. Full English sen- 
tences may be entered, with comprehension surpassing 
the legendary Asylum I. 



, lum I in order to master 
Asylum II. You will need cunning and stealth to survive 
this newest world of insanity. 

The industry greeted Asylum I with one word. Incred- 
ible. For Asylum II, only one word is required . . . 

awesome! ^,.# : :^^3 : ^£^ 

TRS-80 Model I/Model III / Tape: B 19.95/Disk: 822.95 



P.O. BOX 3558, CHAPEL HILL, NC 27514 
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From the man who wrote the book on it. 
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Frank J. Derfler, Jr. 
P.O. Box 691 
Herndon, VA 22070 



Ever wonder what modems and message 
systems are all about? In this article, Frank 
Derfler, "Dial-Up Directory" columnist for 
Microcomputing magazine, presents an in- 
troduction to data communications. If you 
are interested in more information, Frank's 



latest book, TRS-80 Data Communications, 
is being released by Prentice-Hall books 
this summer. — Eds. 

When 80 Micro asked me to write an 
article introducing computer commu- 
nications, I considered several approaches. 
I thought about telling you of the new and 
exciting technologies and careers that are 
springing out of the marriage of communi- 
cations and computers. This kind of ap- 
proach would allow me to throw around 
words like Telematics, Compunications, 




Photo 1. The Lynx is a versatile and proven bus-decoding modem which operates with ei- 
ther the Model I or Model III. When used with a Model III, the address of the modem can be 
easily changed so it can be used in addition to or instead of an RS-232C port. If the standard 
port address is used, the Lynx operates with all types of TRS-80 terminal software. The 
Lynx provides complete auto-dial and auto-answer capabilities. It sells for about $300 with 
terminal and host software. The Lynx is available from computer stores and retailers. 
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and many others which have only been 
coined in the last two years. 

I also thought about dealing with the fun- 
damentals of communications: signaling, 
data alphabets, and data transfer. We could 
investigate ASCII, EBCDIC, RS-232C and 
handshaking protocols. 

Finally, however, I had a blinding flash of 
insight (provided by a phone call from the 
editor) which told me to keep it simple. This 
article will describe the reasons why you 
might want to give your TRS-80 a data com- 
munications capability and A?owyou can go 
about it. 

Why Communicate? 

There are two basic reasons why you 
would benefit from providing your TRS-80 
with a serial port, modem and communica- 
tions software: to exchange files and to re- 
ceive information and messages. 

I don't have to tell TRS-80 owners about 
the limitations of exchanging programs and 
files on cassette tape or floppy disk. Tapes 
require good recorder head alignment or 
some special equipment to ensure a reli- 
able information transfer. The various DOS 
packages and disk arrangements can cre- 
ate great confusion when disks are used to 
transfer information. 

There is one way to transfer programs 
and files that doesn't care what DOS you 
are using or even if you have a disk drive. 
Using a serial RS-232C port (or, as I'll de- 
scribe later, a bus-decoding modem) to ex- 
change data does away with disk, DOS and 
cassette compatibility problems. It also al- 
lows the transfer of data files (such as text 
files) between any other kind of computer 
and your TRS-80. 

The second reason for providing your 
TRS-80 with a communications capability is 
to allow you to receive information and ex- 
change messages over the information util- 



ities and electronic message systems avail- 
able around the nation. 

There are several information utilities 
available to private individuals. The three 
most common are The Source, Compu- 
Serve and the Dow Jones Information Ser- 
vice. The Source and CompuServe have very 
similar information features. These include 
the latest news stories from various wire 
services and media sources, discount shop- 
ping plans, stock prices and analysis, spe- 
cial interest newsletters, a real-time com- 
munications capability, and an electronic 
mail service. Both of these systems use 
mainframe computers to provide these ser- 
vices. Customers can also use the comput- 
ing power of these systems to run large pro- 
grams or to use computer languages not 
normally available on microcomputers. 

The customers connect into the comput- 
ers over data-communications carriers 
reached through their home telephones. A 



"Using a serial RS-232 port to exchange data 

does away with disk, DOS and 

cassette compatibility problems." 



major consideration when selecting one of 
these systems to subscribe to is the avail- 
ability of a communications carrier entry 
point within your local telephone calling 
area. The Source uses either Telenet or 
Tymnet to reach its customers. Compu- 
Serve uses its own carrier network or Tym- 
net. These carriers do not cover the same 
geographical areas. Many parts of the na- 
tion are not served at all. If there is no entry 
port within your local telephone call area, 
then the cost of a long-distance phone call 
must be added to the basic charge for the 
use of the information utility. This basic 
charge can run from $4.50 to $25 an hour 
(about $6 average) depending on the time of 
day and the way you enter the utility. 

Each of these systems has features and 
faults. CompuServe stresses a menu-driven 
approach which is friendly to the new or in- 
frequent user, but frustrating to the experi- 
enced user who wants to get to a service 



quickly. They have instituted a series of di- 
rect commands which improve the move- 
ment through the data bases for experi- 
enced users. The Source started with no 
menus. It stressed the direct command 
mode which provided great flexibility for ex- 
perienced users, but which could leave be- 
ginners faced with mysterious and frustrat- 
ing error messages. They have installed a 
menu system which is a big help to new 
users, but can be quickly bypassed when 
experience is gained. Both systems contin- 
ue to add features and to try new formats to 
improve their services. 

The Source and CompuServe offer stock 
quotes and various kinds of information. 
But if you have a special interest in invest- 
ments, you might consider the Dow Jones 
Information System. The service provides 
news from the Wall Street Journal, 
Barron's, and the Dow Jones News Service. 
It has several very nice functions including 
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"The program download services allow users 
to withdraw programs from a library 
and capture them for their own use." 



a data base dating back to 1979 which can 
be searched by words, phrases or dates. 
This service is more expensive than The 
Source and CompuServe, but for certain 
persons it is a good investment. 

If you are interested in subscribing to one 
of these information utilities, check the list 
of manufacturers and suppliers for their ad- 
dress and phone number. Be sure to get the 
details about gaining access from your lo- 
cal area. 

Electronic Message Systems 

You may have heard a bewildering bliz- 
zard of buzzwords associated with micro- 
computer communications such as CBBS, 
ABBS, Forum 80, Connection 80 and the 
like. These names all refer to electronic 
message systems which are run by private 
clubs and individuals and are usually avail- 
able to all callers with no charge. At last 
count, there were nearly 300 of these sys- 
tems available throughout the United 



MODEM-80 

(Reviewed in June/July '82 Issue) 
Now available for TRS-80* I 8. HI 

APPLE* * and PET* * * 
FEATURES 



Direct Connect &. Auto Dial/Answer 
No RS232 Interface Required 

Full-function TERMINAL software 
included which works with most BB 
&. time-sharing systems. 
Unique program/data transfer soft- 
ware included allowing TRS-80s 
and APPLEs to talk to each other 
with auto line error detect and re- 
transmit. 



Price: U.S. $289 ($359 CDN) 
TRS-80 Cable Extra 



DEALERS: INQUIRIES WELCOME 

For dealer nearest you. write ICROM Enter- 
prises Ltd., Mllllken. PO Box 2 I 8, Milliken. 

Ontario. Canada LOH I KO or phone 
4 1 6-293- 1 344 

Western Canadians contact Rain- 
bow Software Services. 7070B Far- 
rell Rd SE, Calgary. Alberta T2H 0T2 
or phone 403-253-6 I42. 

* Tandy Corp Trademark 

* * APPLE Computers Inc Trademark ^ M 

* * * Commodore International Trademark 



States and Canada and about six in Europe. 

The first successful electronic message 
system in the country was the Computer 
Bulletin Board System (CBBS) developed in 
Chicago by Randy Suess and Ward Chris- 
tensen. This started out as little more than 
an electronic replacement for the cork bul- 
letin board maintained by the local comput- 
er club. It was a place where people could 
post notes and answer them. It was quickly 
followed by the Apple Bulletin Board Sys- 
tem developed by Craig Vaughan and Bill 
Blue. Bil] Abney wrote the software for the 
Forum 80 systems which use TRS-80 Mod- 
els I or III as system hardware. Connec- 
tion-80 is another system for the TRS-80 
Model I available from B.T. Enterprises. 

These systems' features have grown con- 
siderably since the first "tack it up" sys- 
tems were brought on line. Modern mes- 
sage systems may include automatic sign- 
on for frequent users, automatic sorting of 
messages by name or subject, password 
protection of certain messages, sub-groups 
or conferences containing special interest 
information, and even program upload and 
download services. 

The program download services allow 
users to withdraw programs from a library 



and capture them for their own use. Upload- 
ing allows users to add their own programs 
to the central library. Obviously, this pro- 
vides a convenient way to exchange pro- 
grams and files without worrying about disk 
formats and other incompatibilities. 

If you are interested in a list of available 
message systems, you can write to Jim 
Cambron, P.O. Box 10005, Kansas City, MO 
64111. Jim publishes the On-Line Computer 
Telephone Directory. It is impossible to 
keep a completely accurate directory of all 
of the available message systems (I tried!), 
but Jim has one of the best available. Be 
sure to include $2.85 for the latest issue. 

So far, I have given you a very brief why of 
computer communications. There are many 
sophisticated uses for communications 
systems, but the broad generalizations of 
program transfer and information access 
cover most of the common uses. Now, let's 
see how you would go about giving your 
system this capability. 

How? 

There are three basic ingredients needed 
to convert your TRS-80 into a data commu- 
nications terminal: a modem, a serial port, 
and terminal software. In some cases, the 




Photo 2. The Microconnection modem comes in several different models. The most com- 
plex device attaches to the expansion port of a Model I and provides it with a modem and 
RS-232C capability. Other versions attach to existing RS-232C ports for more conventional 
operation. Microconnection prices start at about $200 and run to over $300. The Micrope- 
ripheral Corporation maintains a bulletin-board service for their customers on Compu- 
Serve. 
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"A modem converts the electrical signals 

used inside your computer into sound 

so they can be sent over the telephone lines." 




Photo 3. COMM80 from Micromint is not a modem. It attaches to the expansion port of a 
Model I and provides the computer with a full RS-232C serial port capability without the use 
of an expansion interface or serial card. Optionally, it can be used with an expansion inter- 
face and serial card to provide another RS-232C port a t a different da ta address for use with 
a printer, plotter or other serial device. 




Photo 4. The CAT modem from Novation has become a standard in the industry. It is cer- 
tainly the most widely used acoustically coupled modem. Several different manufacturers, 
including Radio Shack, have marketed the CA T with their label. In operation, the telephone 
handset is placed in the rubber cups on the modem. All coupling to the phone line is done 
with sound. This method of coupling is handy for portable or temporary operation if loud 
outside noises are avoided. Decorator-style telephones with different handsets cannot be 
used with a CA T. The CA T modem is often available for under $150. 

^See List of Advertisers on page 386 



serial port and modem may be combined in- 
to one unit. 

The word "modem" comes from the com- 
bination of the words "modulator" and "de- 
modulator." A modem converts the electri- 
cal signals used inside your computer into 
sound (modulator) so they can be sent over 
the telephone lines. It translates the re- 
ceived sounds into electrical signals your 
computer can use (demodulator). It hooks 
between the telephone line and your com- 
puter and translates between them. 

Modems with several different features 
are available for TRS-80 systems. These 
features relate to both how the modem 
hooks to the telephone lines and how it con- 
nects to the computer. Let's look at the tele- 
phone end first. 

A modem which connects directly to the 
telephone line with a wall plug is called a di- 
rect-connection modem. Another common 
kind of modem holds the telephone handset 
against a small speaker and receiver and 
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How much is a picture worth? You can turn your 
EPSON MX-80, MX-80 F/T or MX-100 printer with 
GRAFTRAX into an exquisite curve plotting 
instrument with a graphics resolution of 480 x 
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and AUTOPLOT plots your functions or tabulated 
data automatically — yes, even VISICALC or 
SCRIPSIT files. By pressing a few extra keys you 
can select from many options as explained in the 
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"Connection to a serial port is as simple 

as plugging one end of the cable into the modem 

and the other end into the computer." 




Photo 5. The D CAT is a direct-connection version of the CAT. It lists for about $200, but is 
available for about $170. An auto-answer option adds about $80. Both the CAT and D CAT 
require the computer to have an RS-232C serial port for interface. CAT modems are avail- 
able from computer stores and retail dealers. 




Photo 6. The Prentice Star modem has been providing some competition in the acoustically 
coupled market. It has deep cups to help suppress outside noise and four light-emitting di- 
odes which provide a visual picture of the data flow. It is available from 80 Micro advertisers 
such as The CPU Shop for $125. 



couples to the telephone line using sound. 
This is known as an acoustically coupled 
modem. Acoustically coupled modems are 
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susceptible to interruption from loud local 
sounds, but they provide good portable op- 
eration and may be a bit less expensive 



than direct-connection devices. Direct-con- 
nection modems may have other optional 
features such as auto-dial and auto-answer. 

On the computer side of the modem, the 
most common devices connect to the com- 
puter through the RS-232C serial port. This 
kind of port is optionally available on the 
Models I and III, but comes standard on the 
Color Computer and Model II. Connection 
to a serial port is as simple as plugging one 
end of the cable into the modem and the 
other end into the computer. The Model I 
needs an expansion interface to use the 
standard serial-port circuit card. 

There are alternative ways to hook a mo- 
dem to a Model I or III. The first way is to 
substitute some device for the serial card 
and expansion interface for the Model I 
which provides the RS-232C signaling, 
avoiding the cost of an expansion interface. 
One device which does this is the COMM80 
from Micromint, Inc. COMM80 can be used 
on a Model I instead of a serial port and ex- 



"... the term direct 

connection refers to 

how they hook to the 

telephone lines. " 



pansion interface. It provides an RS-232C 
port at any one of 16 data addresses. If you 
have a requirement for more than one RS- 
232C port you could stack up to 16 
COMM80S on a Model I. 

A second way to connect to the computer 
without buying the serial port is through the 
use of a bus-decoding modem such as the 
Microconnection or Lynx. These modems 
are also called "in the bus" modems, or 
sometimes integrated modems. They are 
also called direct-connection modems for 
the wrong reason by people who don't real- 
ize that the term direct connection refers to 
how they hook to the telephone lines. Inci- 
dentally, all bus-decoding modems are di- 
rect connection. 

A bus-decoding modem attaches directly 
to the data bus of the computer and 
changes the parallel data addressed to it on 
the bus into modem tones. No serial port 
card is required. In another operation mode, 
the bus-decoding modem can be attached 
to the data bus while a standard serial card 
serves a printer or other RS-232C device in a 
normal manner. 

The choice of what kind of modem is right 



"Dumb terminal software only allows 

the TRS-80 to display the received data 

and transmit characters typed on the 

keyboard out through the RS-232C port." 




Photo 7. The Kesa Dataspeak modem is a new entry into the direct-connection modem 
field. This is an RS-232C direct-connection modem with two major features: size and price. 
This small modem soils for $129 I he use of dual phone-line jacks allows the modem to be 
put in series with the telephone and avoids purchasing a separate dual connection for the 
telephone wall plug. This makes installation easier. Some direct-connection modems such 
as the Lynx and D CAT also have this feature, but many do not. The Dataspeak sells for $129 
and is available from the Kesa Company and selected dealers. 



for you depends upon your use, the system 
you have, and the price you can pay. 

Software 

The final critical portion of your commu- 
nications system is the software which 
makes your computer look like a data-com- 
munications terminal to the remote system 
you are working with. There are two kinds of 
data communications terminal software: 
dumb and smart. There is no firm definition 
for these categories. Dealers and distribu- 
tors define smart in different ways. 

Essentially, dumb terminal software only 
allows the TRS-80 to display the received 
data and transmit characters typed on the 
keyboard out through the RS-232C port. It 
will not store or capture the data. When the 
received data scrolls off the screen, it is 
gone. A dumb terminal program usually pro- 
vides the TRS-80 with the ability to transmit 
special characters called control codes 
which signal certain functions in the remote 
systems and printers. TRS-80S do not have 
keyboard keys for these codes, so the pro- 
grams use combinations of keys such as 

sSee List of Advertisers on page 386 



the shift and up arrow to designate control 
characters. Some terminal programs pro- 
vide a lowercase transmission capability 
for the TRS-80. A simple terminal program 
usually allows the operator to change cer- 
tain transmission parameters. Most of this 
software is available on tape and will oper- 
ate with microcomputers containing a mini- 
mum of RAM. 

Radio Shack supplies a very simple dumb 
terminal program called Term with the Mod- 
el I RS-232C card. They market several dif- 
ferent videotext program sets which pro- 
vide dumb terminal capabilities for the 
Model I or III, the Model II, orthe Color Com- 
puter (catalog numbers 26-2200/1/2). These 
packages include membership and one free 
hour in CompuServe and the Dow Jones In- 
formation Service. They sell for $29.95. The 
programs come on cassette tape, but they 
are easily saved on disk. These videotext 
packages contain smooth running simple 
terminal programs which are a very good 
value. 

The Microconnection and Lynx bus-de- 
coding modems also come with simple and 



MICROSETTE 

DISKETTES CASSETTES 




Microsette's reputation for quality and 
credibility has made us the leading 
supplier of low cost, short length cas- 
settes. Now, we also offer 5'/4-inch sin- 
gle sided, soft sector diskettes in 
single or double density. We give the 
same attention to quality and realiabil- 
ity for our disks as we do for our cas- 
settes. 

LOOK AT OUR PRICES 
includes boxes and shipping 



rwfSSsJirsciriwsfwswrwi 


Item 


10 Pack 


50 Pack 


C-10 


$ 7.50 


$ 32.50 


C-20 


9.00 


39.00 


C-60 11.00 50 00 


C-90 15.00 70.00 


DISKETTES 5V4-inch 


MD-5 $25.00 


$110.00 



UPS shipment in Cont. USA incl. 
We can not ship to P.O. Boxes 



Length 


Qty. 


Price 


Total 


















SUBTOTAL 




Calif. Cust. add Sales Tax 




TOTAL 





Shipping address enclosed D 

Check or money order enclosed □ 
Charge to: Visa □ MasterCard □ 

Account No. 

Expiration Date 



SIGNATURE 



MICROSETTE CO, 

475 Ellis St., Mt. View, 
CA 94043 (415)968-1604 
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"A dumb terminal program 
could meet the needs of a data- 
communications user for years." 



- 







years. The simplicity of a dumb terminal is 
very appealing. There are some functions, 
however, which frequent data communica- 
tions users find convenient and which call 
for a much more complex program. These 
functions include capturing programs and 
files as they come in through the data port 
and transmitting stored programs and files 
out the data port. The smart terminal func- 
tions also include transmitting frequently 
used strings of characters such as those 
found in passwords and sign-on codes by 
simply touching one or two keys. 

The program capture and transmission 
functions provide an easy way to exchange 
software. But these functions also provide 
the ability to save items gained from the in- 
formation utilities (such as stock histories) 
in text files and to prepare electronic mail 
messages for fast, accurate and economi- 
cal transmission to a message system or in- 
formation utility. 



Photo 8. The Racal-Vadic Modemphone is a unique device which combines a modem and 
telephone into one unit. Installation and operation are simple and the combined package 
takes only the space of a regular telephone. The list price is between $250 and $350 depend- 
ing on the options, but it is often discounted. 



reliable terminal software. These programs 
are in an easy-to-use menu-driven format. 
The Emterm program which comes with the 
Lynx has some features, such as the ability 



to send and receive Basic programs, which 

might qualify it as pretty bright if not smart. 

A dumb terminal program could meet the 

needs of a data-communications user for 



Omniterm 

Omniterm is a very powerful program 
written and distributed by David Lindbergh. 
Instant Software's Super Terminal is a re- 
packaged version of Omniterm. Omniterm 
is loaded with features and a full descrip- 
tion would require a complete software re- 
view, but it has become the standard for 
TRS-80 terminal software. It provides full 
data-capture and data-transmission fea- 
tures. These include the ability to transmit 




ABS Suppliers 

3352 Chelsea Circle 

Ann Arbor, Ml 48104 

(313) 971-1404 



B17 TAPE OPERATING SYSTEM will let you 

• Save & Load programs 6X faster than Model-1. 

• Save & Load Data Arrays over 800X faster. 

• Backup standard System tapes that load-n-go. 

• Certify cassette tapes for B1 7 use. 
$24.95 Specify Model 1/3 16K/32K/48K RAM. 
Inexpensive Upgrades available. 3rd year of sales. 

B1 7 DISK/BAS is a Disk version. Lets you save any 
disk file to cassette at 3000 baud. Inexpensive way 
to backup your files. Works with any DOS. Includes 
tape certifier. Requires 32K RAM-up. 
$19.95 Specify Model 1/3. 

WORDSMITH Word-processing program in BASIC. 
A 'Trainer' for more complex W/P programs. Easy- 
to-use. Specify Tape/Disk version. Tape version 
requires B1 7 Tape Operating System (above). Disk 
version requires 32K RAM-up. UsesMX-80 Printer. 
$19.95 Specify Model 1/3. 

Add $1.50 postage/handling per item. *-173 



TRS-80 MODEL I™ 

GOLDPLUG-80 

Eliminate disk re-boots and data 
loss due to poor contact problems 
at card edge connectors. The 
GOLD PLUG - 80 solders to the 
board card edge. Use your ex- 
isting cables. 
CPU/keyboard to 

expansion interface $18.95 

Expansion interface to disk, prin- 
ter, RS232, screen printer 

(specify) $9.95 ea 

Full set, six connectors. . . $54.95 



EAP COMPANY 

P.O. Box 14, Keller, TX 76248 

(817)498-4242 

*TRS-80 is a trademark of 

Tandy Corp. 



-216 



VECTOR/FIX 

MODEL I/III 

• Puts machine language programs on 
cassette to disk and adds a patch to 
make them run! 

•Ideal for programs which wipe out 
DOS such as Deathmaze, Eliza, 
Galaxy Invasion, etc.* 

•Scan in uppercase & lowercase ASCII, 
or HEX — send to printer. 

•High speed string search. 

• Even patches programs saved to disk 
by other load module programs (above 
81FFH). 

• Either version will dump the ROM & 
DOS area to printer in ASCII or HEX. 
Min. Req. 32K, 1 disk drive, TRS-80** 
Model I Disk $19.95 
Model III Disk $23.95 

Includes Shipping and Handling 
Send Check or Money Order To: 

MICRO-MEDIA 

P.O. Box 538, Linden, MI 48451 " 

• Not designed to load protected' lapes. 

* 'TRS-80 is a trademark of Tandy Corporation 
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files in the line-by-line mode required by 
many message and mail systems. It has a 
buffered printer port so you can print the re- 
ceived data as it comes in. 

The program allows the one-key trans- 
mission of a pre-stored sign-on code. This 
code and the special operating parameters 
for various remote systems can be stored in 
special command files. Unique features of 
the program include a received-text buffer 
which allows the user to review received 
data that has already scrolled off the 
screen and a graphic picture of a bell which 
appears on the screen whenever an atten- 
tion bell signal is received from the remote 
system. The receive buffer review capability 
makes the program especially nice for the 
electronic mail users. It is much easier to 
formulate a reply when you can look back at 
the incoming mail to see what was said. 
Omniterm has a very nice menu display 
which makes it easy for both experienced 
and novice users to operate. 

The documentation for Omniterm is ex- 
cellent. The manual runs over 75 pages and 
includes a complete glossary, index and ta- 
ble of contents. The Omniterm program 
costs about S100. 

There are several other smart terminal 
packages available for TRS-80 computers. 
One of the first on the market was the ST80 
series written by Lance Micklus. These pro- 
grams have several different levels of capa- 



"It is much easier to formulate a 

reply when you can look back at the 

incoming mail to see what was said." 




Photo 9. The Hayes Stack SmartModem is a new modem device which has leaped into pop- 
ularity in the past year. It is called smart because it provides many capabilities that were 
provided by computer software and hardware in the past. In fact, this modem contains its 
own Z8 microprocessor and internal programming. The unit receives commands by moni- 
toring the data line from the RS-232C serial port of the computer or terminal. It will auto- 
dial, auto-answer, provide for speaker monitoring of the data, and perform other functions 
on command. This very versatile modem lists for about $300, but it is often available at dis- 
counts of about $50. 



DISCOUNT 



TRS-80 ™ Model I & III 
External Mini Disk Drives 



• Tandon 40 Trk Disk Drive, w/pwr supply & case . • $259 

• Tandon 40 Trk Bare Disk Drive ...... . ........ $220 



Verbatum DataLife (Box of 10). ... ... . $29 



• 2 Drive Cable, Model I or III . . . 

• 4 Drive Cable, Model I only . ... . I , «, , > 



We accept Master Card, Visa, cashier's check, & money orders. 120 DAY 
WARRANTY & FREE Shipping & handling on orders delivered in con 
tinental U.S. For Foreign, FPO or APO orders add 15% for shipping. Texas resi- 
dence add 5% sales tax. TRS-80 is a Trademark of Tandy Corp. 



13010 Research Blvd., 

Suite 207 
Austin, Texas 78750 

• 252 



v'See List of Advertisers on page 386 
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"In full duplex a host system echoes 
characters back to the remote terminal. In 
half duplex the terminal displays its own 
transmitted characters on the screen." 



bilities. They are available from Lance Mick- 
lus or from the Small Business Systems 
Group. 

Two smart terminal programs, Uniterm/ 
80 and Modem80, are worthy of special 
mention because of their unique features. 

Uniterm/80 

Uniterm/80 was written by Pete Roberts 
and is distributed by Apparat, Inc. It is a 
powerful smart terminal with all of the fea- 
tures listed above for Omniterm except the 
bell and review buffer. Uniterm/80 has a 



unique capability to configure itself to the 
data-communications port being used by a 
Model I or III. When the program is initial- 
ized, it examines the data bus to determine 
if devices like the Microconnection or Lynx 
are available for use. Then it looks for the 
RS-232C standard port address. This capa- 
bility provides great flexibility and it elimi- 
nates the need for specially addressed soft- 
ware to use devices like the Microconnec- 
tion. 

Uniterm/80 is designed to be used with 
Apparat's NEWDOS80 operating system, 



Computer Communications Terms 



acoustic coupling: Coupling to the 
telephone line through the use of 
sound. The telephone handset is usu- 
ally physically held over a small speak- 
er and transmitter on the modem or 
data coupler. 

answer: (see originate/answer below) 

ASCII: American Standard Code for In- 
formation Interchange. A data alpha- 
bet which gives meaning to strings of 
0s and 1s. 

auto-answer: The modem automatical- 
ly picks up the phone line when it rings 
and provides an answer tone to the 
calling party. 

auto-dial: The modem automatically 
dials the telephone in response to a 
command from the terminal or micro- 
computer serving as a terminal. 

baud: A measure of transmission 
speed. Three hundred baud is the most 
commonly used. 

direct connection: Connected electri- 
cally to the telephone line. 

duplex: Capable of transmitting and re- 
ceiving at the same time. It also has to 
do with the echoing of characters from 
a host system. In full duplex a host sys- 
tem echoes characters back to the re- 
mote terminal. In half duplex the termi- 
nal displays its own transmitted char- 
acters on the screen. If you are receiv- 
ing two or more characters, then some- 
thing (your modem or terminal soft- 



ware) is in half duplex. Full duplex is 
the standard operating mode. 



IEEE-488: An electrical signaling stan- 
dard used in Commodore computers 
and commonly found in test equip- 
ment. Not compatable with the more 
common RS-232-C standard. 

originate and answer: The two sets of 
tones used by a modem to communi- 
cate over a telephone line. Microcom- 
puters serving as terminals operate in 
the originate mode. If two individuals 
are communicating together, one must 
be in the originate mode and the other 
must be in answer. 

parity: A method of error detection and 
correction used in commercial and mil- 
itary data communications. Seldom 
used in microcomputer communica- 
tions. Parity is usually set to off. 

RS-232C: A standard method of volt- 
age signaling. Voltages range between 
plus and minus 12 volts. A voltage 
change indicates a digital or 1 . These 
0s and 1 s are encoded by a data alpha- 
bet (see ASCII). 

serial: Transmission of data in a serial 
stream as opposed to the parallel 
stream found on the computer's data 
bus. 

word length: The number of bits used 
to transmit one character. Usually set 
to 7 in microcomputer communica- 
tions. 



but it will function with other operating sys- 
tems while retaining most of its features. 
The program has a good operating manual 
and sells for about $90. 

Modem80 

Modem80 is unique in that it provides the 
TRS-80 with a very accurate means of trans- 
ferring files that was previously available 
only to users of the CP/M operating system. 
It has all of the features commonly associ- 
ated with smart terminal software, but it 
also transfers files using a unique error-de- 
tection and correction format. This special- 
ly formatted file transfer can only be ac- 
complished with another Modem80- 
equipped TRS-80 or with a CP/M system 
running a common program called Modem, 
but it still provides a unique and valuable 
capability. Non-format file transfer is also 
available. 

Modem80 was written and is distributed 
by Leslie Mikesell. It is available for an 
amazingly low $39.95. 

TRS-80 Message Systems 

There are several message systems soft- 
ware packages available for the TRS-80 
which allow your system to receive, store 
and transmit messages or information to 
anyone calling in. They range from simple 
and essentially free to very sophisticated 
and costing several hundred dollars. All of 
these software packages require an auto- 
answer modem. 

A simple and free system comes as a util- 
ity with Les Mikesell's Modem80 program 
described above. Hostl turns any TRS-80 
Model I or III into a remote operation system 
which allows callers to operate the host 
system to run, load or transfer data. Hostl 
doesn't have any sophisticated passwords 
or data protection, but it is a very effective 
utility program. A similar program, called 
Host, comes on a cassette with the Lynx 
modem. 

The Small System Business Group sells a 
number of more sophisticated message 
programs with different capabilities. These 
include ST80 message programs written by 
Lance'Micklus. ST80-X10 integrates the mo- 
dem port with the computer operating sys- 
tem. It is a simple host program that is re- 
quired for the operation of the other ST80 
message system software. ST80-X10 sells 
for $50. ST80-PBB is an elementary bulletin- 
board system that operates from either disk 
or tape and sells for about $40. ST80-CC is a 
more sophisticated disk-based system sell- 
ing for $100. 
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A Computei 




rograms 



What will they think of next..? 



Your computer is fantastically fast, once it knows what 
to do. You probably realize that a computer is really 
the combination of hardware and software, working 
together smoothly, to give you what you want. Either 
one alone is useless. Software is really the key. ..the 
"mind" of a computer system. Every project or task 
you want to do requires a new specific software ap- 
plication to make it behave exactly the way you desire. 

Of course, you may be able to "force-fit" an application 
into some existing canned program you have, but to 
really get results, you need a separate application 
program to run on your computer. 

Until now, that meant you were forced to pay money 
for application software off the shelf, or if you could 
afford it, have it custom written for you, or, if you are 

qualified, do it yourself. ..spending endless hours 
figuring it out and writing it. Now, your computer can 
write individual application programs for you. These 
programs are each separate, unique software programs 
that run in standard Basic on your computer. 

A company named FutureSoft has developed this ex- 
citing and long awaited remarkable working tool for 
you. There are two versions called Quikpro+Plus and 
standard Quikpro. Both of them create unique separate 
Basic programs for you. ..to do exactly, precisely, what 
you want to do. And listen to this. ..you create a new 
program in minutes instead of hours. 

You can quickly generate a new program when you 
want it. You can generate thousands of different 
unique programs, each one standing alone as a com- 
plete program that runs in Basic. Best of all, you do not 
have to be a programmer to do it. The Quikpro soft- 
ware becomes your personal programmer, waiting to 
do your work for you any time of day or night you 
choose to use it. 

The custom programs you generate from this software 
provide for: Data Entry, Additions, Changes, Record 
Locating & Searches, great variety of Computations, 
and Report Printing (if you have a printer). It lets you 
decide what data to manipulate and how to manipulate 
it. It lets you decide the formats you want to appear on 
your screen and/or to print out in a report. It lets you 
use differing formats on the same data base. It lets you 
make calculations from data within records without 
altering the data base. It lets you report results with or 
without including the base data from which results 
were calculated. 

All this is included in the ability/power of the program 
you create. You do it by simply answering questions 
that appear on your screen. Instantly, the Qui'lcpro soft- 
ware instructs the computer to perform complex and 




error free instructional sequences. You get the im- 
mediate benefits of professionally written software for 
your application. 

The resulting custom program is truly a separate Basic 
program. You can list it, you can modify it, you can ac- 
tually see what makes it tick. You can even ask it to 
print out its own operating instruction manual so others 
can run it for you. Finally, you can really tap the speed 
and power of your computer the way you really want. 
You can create new programs for every use you have in 
Business, Science, Education, and Hobby areas. And 
you can start now. 

The software is available immediately from the 
creators. It comes in two versions. If you want to 
generate separate Basic programs with all the data 
handling plus Calculations and Report Printing 
features, you want Quikpro+Plus. Specify to run on 
TRS80 Model I and Model III at only $149; to run on 
TRS80 Model II at $189. 

If you do not need Calculation ability or Report Print- 
ing in the separate Basic programs you will create from 
this program generating software, then standard Quik- 
pro will do the job for you. Standard Quikpro to run on 
TRS80 Model I or Model III is $89; to run on TRS80 
Model II is $129. (Later on you can always trade up to 
the Plus Versions for only the cost difference between 
the two). 

Both programs are available to run on many other 
computers besides TRS80. Details are available by 
calling or writing. 

You can order right now by phone or mail. If you have 
Visa/Mastercard, call toll-free from: 

All States except CA-AL-HI 1-800-824-7888 OP# 441 

From California call 1-800-852-7777 Op# 441 

From Alaska/Hawaii call 1-800-824-7919 Op# 441 

Operators on duty 24 hours daily. Operators can not 
answer technical questions. If you need technical in- 
formation or want to order from Canada or other 
nations, call 1-904-269-1918 during office hours, Eastern 
Time, Mon.-Fri. 

Send mail orders with check, money order or credit 
card information to: FutureSoft, P.O. Box 1446-D, 
Orange Park , Florida 32073. FutureSoft gives you a 
satisfaction or your money refunded guarantee for 10 
days from delivery. You can run the software yourself 
on your own computer and see with your own eyes 
what it can do for you. Order now. ^66 
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"Terminal software, a serial port, and a modem can 
open a new world of electronic information and 
information for business, education or pleasure." 



The Connection-80 message system soft- 
ware for the TRS-80 is growing in popularity. 
It is available from B.T. Enterprises for 
about $200. 

The top of the line in TRS-80 message 
systems is the Forum 80 software. This pro- 
gram package requires two disk drives in 



the Model I and three in the Model III. Check 
with the Small Business Systems Group for 
more details. It sells for $350. 

Putting It All Together 

Providing your microcomputer with a 
data communications capability gives you 



many good answers when someone asks, 
"but what do you do with a computer?" 
Adding some terminal software, a serial 
port, and a modem to your TRS-80 can open 
a new world of electronic information and 
information for business, education, or 
pleasure. ■ 



Suppliers and Services 


Communications Software Suppliers 


Kesa Company: Dataspeak modem 


Apparat, Inc.: Uniterm/80 
4401 S. Tamarac Parkway 
Denver, CO 80237 


774 San Miguel Ave. 
Sunnyvale, CA 94086 
(408) 746-2738 


Toll Free (800) 525-7674 




B.T. Enterprises: Connection-80 
171 Hawkins Road 
Centereach, NY 11720 
(516)981-8568 


Micro Mint: Comm80 RS-232C port 
917 Midway 
Woodmere, NY 11598 
(800) 645-3479 


Instant Software: Super Terminal 
Peterborough, NH 03458 
(800) 258-5473 


Microperipheral Corporation: Micro- 
connection modem 
P.O. Box 529 


Lance Micklus, Inc.: ST80 Software 
217 South Union Street 


Mercer Island, WA 98040 
(206) 454-3303 


Burlington, VT 05401 




Leslie Mikesell: Modem80 


Novation: The CAT modem 


32466 SR541 


18664 Oxnard Street 


Walhonding, OH 43843 


Tarzana, CA 91356 


Lindbergh Systems: Omniterm 




41 Fairhill Road 
Holden, MA 01520 
(617)852-0233 


Racal-Vadic: Modemphone and other 

modems 

222 Caspian Drive 


Radio Shack: Videotex Communica- 


Sunnyvale, CA 94086 


tions Packages 




All stores and computer centers 


Radio Shack: Modem I and Modem II 


Small Business Systems Group: 


All stores and computer centers. 


ST80 and Forum 80 Software 
6 Carlisle Road 


Information Utilities 


Westford, MA 01866 


CompuServe 


(617)692-3800 


Personal Computing Division 
5000 Arlington Centre Boulevard 


Modem Hardware Companies 


Columbus, OH 43220 


Emtrol Systems, lnc.:i.YNX Modem 


Dow Jones information Services 


123 Locust Street 


PO Box 300 


Lancaster, PA 17602 


Princeton, NJ 08540 


(717)291-1116 


(800)257-5114 


Hayes Microcomputer Products: 


Source Telecomputing Corporation 


Smartmodem 


1616 Anderson Road 


5835 Peachtree Corners East 


McLean, VA 22102 


Norcross, GA 30092 


(703) 734-7500 
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■Ml dK«^£Hi 

Buy direct from the manufacturer and save on high performance 
disk systems and other enhancements for Model I, II, and III. 



Whether your TRS-80 is a Model I, II. or III, 
you've probably wished for more disk capacity. 
Now Lobo gives you that— and much more— at 
low, manufacturer-direct prices. With uncom- 
promising quality, and the protection ofLobo's 
unique 1 -year warranty 




Special for Model I owners: 
the LX-80 Expansion Interface 

Radio Shack may have forgotten you, but 
Lobo hasn't! Our LX-80 expansion interface 
(plus LDOS operating system) gives your 
Model I more features and more expandability 
than a Model II or III. The sturdy steel enclosure 
fits under your monitor and adds: 

• 32k additional RAM 

• Interfaces for standard Radio Shack mini- 
floppy drives and Lobo high-performance 
diSK systems 

• Ccnt r onics-type printer port plus sceen 
Drinter port 

• Two RS-232C serial ports (optional) 

• Plus a real-time clock, sockets for custom 
ROM, and a heavy-duty power supply for your 
keyboard unit 

Discover the real power and potential of 
your Modei I, with the bargain-priced I oho 
LX-80 1 
LX-80 with LDOS 

operating system (required) $510.00 
LX-80 without LDOS 

(for current LDOS users) $460.00 

Dual RS-232C serial 

port option $100.00 



LDOS: the ultimate TRSDOS- 
compatible operating system 

One of the few software products ever to 
receive a perfect box score from Infoworld 
magazine. Fhe reviewer said: 'I DOS 5.1 is 
awesome! ... It performs nearly perfectly . . . 
a straightforward and simple system to use 
... the best manual for software I've ever 
seen or reviewed, bar none ... This DOS takes 
she TRS-80 from the hobby category and 
endows it with features that many a so-called 
business system does not have. . . . LDOS 
offers unparalleled versatility and function." 

LDOS includes a powerful extended disk 
BASIC, smart terminal emulator, and many 
other useful utilities that make it worth far 
more than its low price. It -ens on any Model 
I or Model III with at least one disk drive. 

LDOS operating system 
(specify Model I or Model III) $ 1 29.00 




Add-on 8 floppies for Model II 

Why pay Radio Shack prices to expand your 
Model ll's disk capacity? The Lobo 8202C2 
adds two 8" double-density floppy drives, for a 
total of 1 .1 megabytes of additional storage. 
Installation and operation are identical, and 
you get the added benefit of Lobo's 1 -year parts 
and labor warranty 8202C2 dual-drive 
8" floppy system for Model II $1 269.00 



8" floppy systems for Model I 
and Model III 

These rugged dual-drive systems attach to 
any Model I with LX-80 expansion interface, or 
any Model III, and add the mass storage you 
need for the big jobs. Double density recording 
stores 535kB on one side of the disk. Using the 
LDOS operating system (required) you get full 
compatibility with standard TRSDOS plus 
greatly increased capabilities. 

8202C3 two single-sided drives 

(1.1 MB total) for Model III $1625.00 

8202CX same as above, for Model I 

with LX-80 (sold separately) $1249.00 

5202C3 two double-sided drives 
(2.2 MB total) for Model III $2025.00 

5202CX same as above, for Model I 
with LX-80 (sold separately) $1 749.00 



Add-on minifloppy drives for Model I 

Completely compatible with all Model I 
hardware and software, but with an extra 5 
tracks tor data storage. Requires a Mode! I with 
either the Radio Shack expansion interface or 
the Lobo LX-80 (see left) 
4401 C Add-on 5Ya" drive 
for Model I $305.00 

High-capacity minifloppy for LX-80 

An economical way to get a big storage 
boost foryour LX-80-equipped Model I. The 
double-sided, 96 track/inch drive stores 720 
kB. and eliminates most tedious disk swapping. 
Model 4801 C high-capacity 5V*" drive 
for LX-80 $465.00 




Winchester disk systems for 
Model I and Model III 

The ultimate mass storage devices! Enor- 
mous capacity and impressive speed give your 
system a dramatic performance boost. Add the 
impressive file-handling capabilities of LDOS 
(included), and you can outperform systems 
costing far more. IMPORTANT: Many Winchester 
disks now being sold have no provision for file 
backup. Lobo systems include a built-in high- 
density floppy drive that can store the entire 
contents of the hard disk on just 6 or 7 floppies. 
rhis backup dove is also usable for additional 
on-line storage of programs and data. 



5Va" Winchester System 

Compact and exceptionally reliable, with 
4.8 megabytes of high-speed Winchester stor- 
age plus a 720 kilobyte floppy drive. The value 
i easier in mass storage. 
950T for Model III or Model I 
with LX-80 (sold separately) $3633.00 

8" Winchester System 

Over 9 million bytes of storage accessible in 
milliseconds: 8.2 MB on an 8" Winchester drive 
and another 1.1 MB on the backup floppy drive. 
Unsurpassed for maintaining very large data 
bases. 

1850T for Model III or Model I 
with LX-80 (sold separately) $4459.00 



Ordering Information 

A! 1 prices include shipping and handling 
California residents add 6% sales tax. Credit 
card orders shipped within 24 hours. Personal 
checks require 2-3 weeks for clearance before 
shipment. 



The Lobo Warranty 

All Lobo hardware products carry a lim- 
ited 1-year parts and labor warranty. Call or 
write for complete warranty statement. 



TRS-80 and TRSDOS are trademarks ol Tandy Corporation. 

(ci 1982 Lobo Drives International 

Infoworld quote © 1982 Popular Computing/lnc 

Subsidiary— CW Communications/lnc. 

TOLL-FREE ORDER NUMBERS: 
U.S. (except California); 

800-235-1245 

In California: 800-322-6103 or 

800-322-61 04 Hours: 7AM-5PM Pacific Time 
Write f or free catalog: 

Lobo Drives 
International 

Dept. MC6 

358 S. Fairview Ave. 

Goleta, CA93117 



"clrii/es 

INTERNATIONAL 



& 



• 535 



■See List of Advertisers on page 386 
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Our sophisticated 
programs make sight 
and sound seem 
simultaneous — you're 
never disappointed when 
you select a program 
from us. And, our 
customer service is 
unparalleled in 
excellence. 




Everyone 

Whether you want 
games, adventure 
programs, word 
processing enhancement 
programs, teaching 
programs, utility 
programs that help 
serious programmers 
improve their 
programming and get 
more out of their 
computers . . . 
Acorn has them all. 








mm 




Instant 
Sort/Seai 



By Gordon Hatton 

An easy-to-use fast information manager 
for home, personal or small business use. 
Even a novice can make full use of this 
program and it's extremely "user-friendly" 
in helping minimize operator errors. ISS 
comes in 3 parts: (1) lets you create, 
examine and save your custom-formatted 
data base; (2) sorts and searches the data 
base so you can pick out and print just the 
information you need; (3) provides powerful 
editing commands so you can modify and 
update your existing data files. Also 
includes "DEMO", a 500 record demonstra- 
tion data file that lets the first time user 
familiarize himself with the command set. 
ISS handles both alphabetic and numerical 
data in a variety of combinations. 

16KTape 

or 32K Disk. 

TRS-80 I & III 

plus $2.00 shipping and handling 



TRS-80 is a Registered 
Trademark of Tandy Corpora- 
tion. Atari is a Registered 
Trademark of Warner Commu- 
nications. IBM is a Registered 
Trademark of International 
Business Machines. 



System Savers 

By Tom Stibolt 

Two machine language utility programs 
designed to make your use of SYSTEM 
format tapes easier and more enjoyable — 
you can make backup copies of standard 
SYSTEM tapes on either tape or disk. 
System Savers has two different programs 
on the cassette: FLEXL and TDISK. 
FLEXL lets you merge two or more SYSTEM 
tapes into a single tape, merging machine 
language routines into one file. On the Model 
III, baud rates can be changed, allowing low 
baud rate tapes to be re-written to take advant- 
age of the Model Ill's high baud rate. FLEXL 
enables the user to make and verify backup 
copies of programs written in the TRS-80 
SYSTEM format. 
TDISK allows the user to save programs 
from SYSTEM format tapes onto disk. It's 
specifically designed to allow saving and 
running disk programs that reside in the 
same location as TRSDOS. TDISK will 
automatically load programs with non- 
contiguous blocks. 

16K Tape (transferable to disk) 

TRS-80 

Model I & III 

plus $2.00 

shipping and 

handling 



Money 
Manager 

By Andrew Bartorillo 

In today's economy, we all need to 
monitor our expenses more closely. 
Money Manager will help you keep track 
of your income and expenses and give you 
an easy way to manage your budget. You 
define the categories according to your 
needs, including tax-deductible expenses 
... a great help at tax time. You can also 
reconcile your checkbook with the bank's 
balance. Full lineprinter capability allows 
you to print items by each category. 

32K (Minimum) Disk. 

TRS-80 I & ni;<fcQQ QT 

Atari; IBM PCyUViW^ 

plus $2.00 shipping 

and handling 



$19.95 



V \Vjl 



4^M 



II 



NEW! 




Your Mysterious 
Adventures Begin 
With Arrow of 
Death, Part I. 

By Brian Howarth 

Acorn searched the world until we found a 
SUPERIOR Adventure Series in MACHINE 
LANGUAGE. We discovered this exciting new 
series in England — and because the author 
uses "proper English," you'll find the entire 
series a new mental challenge. 
Arrow of Death, Part I is the first in this 
brand new Mysterious Adventure Series with 
all the popular features of TRS-80 Adventures 
but even more challenging. 
In Arrow of Death, Part I, a mysterious blight 
has fallen on your land. It seems to come 
from the Golden Baton, once good but now a 
source of evil incarnate. Rain has destroyed 
the crops, friends are at each other's throats, 
depair and hatred fill the hearts of the 
people. The King implores you to aid his 
sorcerer, Zardra, in banishing this evil from 
the land. You agree, and the adventure 
begins. You'll face constant danger, possibly 
death— but you'll also have the opportunity 
to perform heroic tasks. 
All Mysterious Adventures have a "save the 
game" feature. Arrow of Death, Part I is com- 
plete in itself. . .but we think you'll find it so 
challenging, you'll want to continue with 
Part II. 

16KTape 

or 32K Disk. ^ 4 A AC 
TRS-80I&III^> I9i99 
plus $2.00 shipping 
ind handling 




Lost Colony 

By David Feitelberg 



You are the Economic Manager of the 
world's first space colony. The next 
support ship from Earth isn't due for 
another 15 years and you have 
instructions either to make things go 
better or get out of office in shame. 
You must assure the survival of this 
struggling space colony — it's all up to 
you. You'll be presented with the human, 
natural and industrial resources of the 
planet. You must allocate labor, explore 
new territories, decide on production 
quotas, determine pay scales and taxes 
for the most productivity —you're armed 
with maps and charts. 10 levels of 
difficulty. "Save the game" feature on disk. 

16KTape 

or 32K Disk. 

TRS-80 I & III; plus $2.00 shipping 

Atari; IBM PC and handling 



$29.95 




Everest Explorer 

By William Godwin 
& Don Knowlton 

Will you be one of the daring few to make 
it to the pinnacle of Mount Everest? 
Or will you succumb to the lack of oxygen, 
the unexpected violence of the storms, the 
incredibly rough terrain? You, as the leader 
of the Everest expedition, will have to 
choose the route, choose the timing, make 
sure your climbers are well-rested, set up a 
chain of camps and, if you reach the 
summit, get your followers back down to 
base camp. You'll have to manage money, 
climbers, Sherpas, tents, oxygen, food and 
fuel. Danger lurks at every step— can you 
get to the summit and return? "Save the 
game" feature on disk. 

IBKTape 

or 32K Disk. ^ A Q A E 
TRS-80 I, III, W ■ 5J«5Jw 
Color Computer; Atari; IBM PC 
plus $2.00 shipping and handling 




Acorn 



Software Products, Inc. 

634 North Carolina Avenue, S.E. Washington, D.C. 20003 

We've Grown On You. 

And, our selection of programs for your TRS-80 I & III expands with a new program monthly. 



,-73 



Shop Acorn 
by mail! 
Mail this 
coupon today 
for your 
FREE Acorn 
catalog. 



Mail to: ACORN SOFTWARE PRODUCTS 

634 North Carolina Avenue, S.E. 
Washington, D.C. 20003 



NAME 



ADDRESS. 



CITY. 



STATE ZIP. 



S-6 
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TUTORIAL 



Make friends on CompuServe's CB simulator. 



Breaker 19 



David D. Busch 
70060, 137 
"Charlie Chaplin' 



Almost without fail, every time I run 
CompuServe's CB Simulator I see mes- 
sages on the order of: "Hi there, I'm new! 
How do I work this, anyway?" Though help 
is available at the press of a few keys, most 
first-time users of this exciting time-sharing 
gabfest wander around aimlessly, trying to 
figure out what Talk is, or at worst, how to 
end the session. 

I would like to provide a few tips and ex- 
plain some of the more esoteric features. 
This discussion applies directly to CB Simu- 
lator Version 3(26). New features and com- 
mands are added at intervals, but the 
basics I will describe have remained stable 
for a long time. 

Why CB? 

There are many reasons why the CB Sim- 
ulator has attracted so many participants. 
You may find sparkling conversation or 
downright sillyness at times. Somebody is 
likely to know somebody who can solve 
your most pressing problem. It is like elec- 
tronic mail, but in real time. CB also resem- 
bles a wild, long-distance conference call, 
except that you type instead of talk. You 
can talk across the country for about eight 
cents a minute. 

Using the CB is unlike using the tele- 
phone. Because you cannot hear the speak- 
er's voice, you do not know if you are talking 
to a male or female, youngster or oldster. 

Some people use CB to meet others, and 
eyeball meetings are common. More isol- 
ated types find that the simulator is their 
only direct contact with other computer 
hobbyists. Whatever the reason, CB is 
good, clean fun. 

You Can Get There From Here 

If you have used the CompuServe In- 
formation Service (CIS for short) you know 
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that both menu-oriented functions(DISPLA) 
and Micronet Personal Computing are of- 
fered. From the menus, you can go directly 
to CB by typing GO CIS 39, which points to 
the page at which CB's entry point resides. 
From the Personal Computing area, you 
can get there by typing R CB. 

Once you get hooked, you may want to 
run the DEFALT program and specify that 
every time you log in to CIS, you will go dir- 
ectly to CB after the current bulletins are 
displayed. DEFALT may be accessed by 
choosing menu option "Change Terminal 
Parameters" from the customer infor- 
mation page. DEFALT interactively leads 
you step by step through the options— you 
may also want to change to transmitting 
lowercase as well as upper if you have that 
capability in your machine. In DEFALT, you 
may also request that menu options within 
CB (and certain other special interest 
groups) not be displayed every time you are 
asked foracommand. Dothisonlyafteryou 
no longer need to be reminded which entry 
is needed for which feature. 

Another option for the veteran user is to 
log in to the system by adding a handle. 
This name is then displayed under the user- 
status table within CB. The procedure is as 
follows: USER ID: 70060,137,C Chaplin. 

You can enter more characters as a han- 
dle, but only 11 are displayed in the table 
(more on that later). 

Once you enter CB, you are asked for a 
handle (if you have not logged in with one), 
and told the number of channels in use and 
the users tuned in to each. There are 36 
channels available, but only a few are used 



at any given time. Here is a typical prompt: 

(Channel) users tuned in 
(10)4,(19)2,(33)4 
Which channel: 

Enter 10, and you are in business. Your 
screen will display a sometimes fast-mov- 
ing series of quips and comments from the 
residents of that channel. The channel num- 
ber, and handle of each speaker is dis- 
played first: 

(10,C Chaplin) Hello there. Anybody home? 
(10,** Null **)Hi, CC. How are you? 

As you can see, handles may include 
characters other than letters or numbers. 
Certain handles are reserved by CIS, and 
you should follow good taste. To change 
your handle, type /HANDLE, or /HAN for 
short. Commands can be abbreviated to 
three letters, and should be preceded by the 
slash character. The system will respond: 
What's your handle: Charlie Chaplin. 

Your log-in handle will remain in the user 
table. I always sign in with the short version, 
and then change when I get into CB. What is 
the user table, you ask? When you type 
/USTAT, the system scrolls through a list of 
all users presently participating in the Mul- 
tiplayer Host (see Table 1). 

The actual USTAT table is usually much 
longer than this, with 20 or more users list- 
ed. Note that there are many blanks in the 
Account ID column; those users did not 
sign in with a handle. Anyone looking at this 
table can see at a glance who is using the 
system, what channels they are tuned into, 
their nodes (originating city), and user ID 
number. Some will not be using the CB. 



Job 


User ID 


Prog. Talk Account ID 


Node 


5 


70060.137 


CB 10 C CHAPLIN 


TO1AKR 


7 


70000,000 


DECWAR 


T1 ISFA 


15 


70000,001 


MPHOST SUPERMAN 


r03PIT 


22 


70000,002 


TALK any ANONYMOUS 


1 02A ! L 


25 


70000,03 


CBIG 

Table 1 


T04HOU 



They might be visiting CBIG (CB Interest 
Group), playing DECWAR, having a one-on- 
one talk, or just idling in command mode 
(MPHOST). 

You may tune into any channel you wish 
by typing TUN xx, where xx is the channel 
number. To go from channel 10 to channel 
19, simply type /TUN 19. How do you decide 
where to go? Most users watch what activ- 
ity is going on in all the other channels by 
entering /STA. That command gives you the 
status of the other channels and how many 
are tuned in at the present time. 

You may also monitor two additional 
channels. The messages for these appear 
on the screen simultaneously with those of 
the channel you are tuned to. To monitor, 
enter /MON 19, and so on up to the limit of 
two. To cancel this, type /UNMON 19. Then, 
/STA will mark your status by placing a 
pound sign next to the channel you are 
tuned to, and an asterisk next to one that is 
being monitored: 

/STA 

(10)6M19)12*,(21)3,(33)8 

During busy times, your screen will rap- 
idly fill with messages, and you must 
be quick to keep up with them. Here is 
a brief rundown on all the commands avail- 
able in the release of CB Simulator in use at 
the time this article was prepared (we have 
already discussed /TUN, /MON, /UNMON, 
and /STA): 

• /WHO— This returns the User ID number 
(called PPN in jargon, for Programmer 
Project Number) of the last speaker in the 
CB system. If you see a message from 
Charlie Chaplin, and want to know who 
he is, type /WHO, and you will see: Char- 
lie Chaplin/70060,137. If you are not fast 
enough, however, you may see the PPN 
of some other talker on a different chan- 
nel. Keep trying until you find out what 
you want to know. Getting the PPN al- 
lows contacting the user individually for 
a talk, to determinetheir node(out of curi- 
osity) if their handle is not displayed in 
USTAT, or for sending EMAIL. 

• /HAN— Change your handle. 

• /SCR xyz— Scramble on key "xyz." This is 
used by individuals who wish to talk as a 
group, but privately. Only those who have 
typed in the /SCR command followed by 
the correct combination code can see or 
transmit these messages. 

• /XCL xyz— You transmit unscrambled, so 
everyone may read what you enter, but 
you can receive scrambled transmis- 
sions. 

• /UNS— Turn off scramble. 

• /HELP— Display list of CB commands. 

• /SOU abc— Squelch handle "abc." If a 
weird 12-year old gets on your favorite 
channel and tries to monopolize it, you 
can turn off that individual. Entering 

.-■See t ist ol Advertisers on page 386 





Now. . .from Dr. David Lien, 
the master of making the 
difficult simple, comes the 
complete way to 

HARNESS 
TRS-80 <* 

Face it. Until you can talk to and 
understand your Model I, II, III or 
16 Tandy TRS-80* it's nothing 
more than a mass of microcir- 
cuits in a plastic box. 

You need help to harness your 
TRS-80 and makeil work for you. 
And that's just what you get from 
Learning TRS-80 BASIC. 

Written by David Lien, author of the popu- 
lar TRS-80 User's Manual for Level I, Learning Level II and The 
BASIC Handbook, Learning TRS-80 BASIC is at once entertaining, 
informative and easy to understand. It's the perfect guide to 
entering the world of microcomputers. 

In Learning TRS-80 BASIC, David Lien gives you simple, step- 
by-step instructions, including programs you can use in business 
or home finance, for entertainment, or to help troubleshoot prob- 
lems. You'll even learn to write your own custom software. Ideal for 
the classroom, too. 

Included are short Question and Answer sections which help 
make sure you understand everything you've learned — it's almost 
like a correspondence course . . . without the correspondence! 

No matter if you own the Model I, II, III or 16, Learning TRS-80 
BASIC is one book no TRS-80 owner should be without. 

Available a: better computer ana 
book stores, 

or can (800) 854-6505 

In California (7 14) 588-0996 

Ask about the Basic Handbook, too. To 

order by mail, send check or money 

order for $19.95 {California residents 

add 6%), plus $1.65 shipping 

and handling. Overseas 

orders send $19.95 plus 

$2.50 surface shipping 

ana handling. 





^365 



1050-E Pioneer Way, Dept. F, El Cajon, CA 92020 

TRS-80 is a registered trademark of the Tandy Corporation. 
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"Another evening, I had a cogent 
discussion of Taoism with a devotee. 



/SOU IDIOT, means that all transmis- 
sions by the person with the handle Idiot 
are ignored by your system. Everyone 
else can see his ravings, however, until 
they apply /SQU on their own. The system 
works by PPN, so changing handles will 
not help; Idiot by any other name still re- 
mains invisible to your tired eyes. 

• /TALK— go to two-person talk. This is a 
one-on-one private discussion, not using 
the public CB "airwaves." 

• /SPCWAR— go to the SPACEWAR game. 

• /EXIT — leave the CB program. 

You may also exit CB by typing Control C. 
Once you leave, you will be presented with 



the Multi-Player Host menu, which looks 
something like this: 

Welcome to the multi-player host. 
Options: 

help 

1 list other users 

2 run CB 

3 run SPCWAR 

4 talk to another job 

5 return to primary computer 

6 log oft the system 

7 CBIG (CB Interest Group) 

8 run DECWARS 

Option 1 gives you a look at USTAT. You 
may see a user (Job) you wish to talk to, or 
be told that a Job has requested to talk with 
anyone. You can enterTalk by responding Y 




The best disk emulator you'll find anywhere. It's a single 
512K byte memory board. (1 Megabyte on special order) It 
operates like a disk, except far faster. Your software is 
compatible with no modifications. 

No strings attached. No need for a special CPU, DMA, I/O, 
or disk controller. No need to return your operating system 
disk. No changes to your present hardware. 

SemiDisk doesn't interfere with memory space, which is 
left totally free for the operating system or user programs. If 
you have an 8080, 8085. or Z80 CPU with CP/M 2.X on S-100, 
you can use it right now. (Available soon for TRS-80 Model 2 
and IBM Personal Computer.) 

Unmatched Performance: 

• 30 to 300 times faster than 8" floppies 

• Much faster than hard disks 

• Expandable to 8 Megabytes 

• Only 0.6 amps (typ) supply current for 512K 
(0.9 amps for 1 Megabyte) 

SemiDisk is the least expensive disk emulator per byte of 
storage. At $1995 for 512K, it's less than a third the cost of the 
closest competition. 

So compare price, performance, hardware requirements, 
flexibility, storage density, and expandability, and you'll 
select SemiDisk! 



SemiDisk 

Systems 



^372 



P.O. Box GG 

Beaverton, OR 

97075 



(503)- 
642-3100 



TRS-80 trademark of Rad'o Shack — CP/M Trademark of Digital Research 



to the "Do you wish to talk?" prompt (if 
asked), or by entering menu option 4. 

In talk, you communicate directly with 
the other user, chatting or shooting the 
breeze as you wish. Exit this module by typ- 
ing Control Z. 

Enter option 2 and you are back in CB. 
Numbers 3 or 8 take you to one of two 
games available, while entering a 7 trans- 
ports you to the strange world of CBIG, run 
by an interesting East Coaster named 
CHRISDOS, who reigns as SYSOP for the in- 
terest group. The games and CBIG are too 
complex to get into here. Each has their 
own extensive documentation. 

You may also go back to the Micronet 
Personal Computing Area by entering 5 at 
the prompt, or log off the system entirely by 
inputting a 6. 

What Can You Expect? 

I like CB because it is so varied. I meet 
many talented and interesting people. One 
evening, I carried on a lengthy conversation 
with one user in Swedish, even though I 
don't speak the language. The pauses in the 
conversation (while waiting for answers to 
be typed) were sufficient to allow me to look 
up phrases in a Swedish dictionary I keep 
by my desk, and then compose answers 
from a ready-made phrase book. 

As a writer, I keep many reference vol- 
umes in my office, and they come in handy. 
Another evening, I had a cogent discussion 
of Taoism with a devotee who did not know I 
was madly reading my encyclopedia to de- 
cipher his or her meaning between ques- 
tions. 

Other sessions have been silly. One 
night, in my guise as Charlie Chaplin, I in- 
sisted on pantomiming my communica- 
tions by using character keys to denote var- 
ious words or phrases. Another evening, the 
users of one channel dressed up as rabbits 
(by changing handles to things such as Ras 
Rabbit, or Charlie Chapbunny) and going 
hop hop for several minutes. It sounds 
weird, but it is a fun way to blow off steam, 
trying to think of cute ways of topping the 
other users. 

When I was having trouble using a 
1200-baud modem with a certain operating 
system, I inquired on CB, and discovered 
that one of the participants was an engi- 
neer with AT & T, knew modems and the 
DOS, and was well equipped to help me 
solve my problem. Other CBers have ex- 
plained a sticky Assembly-language point 
to me, or advised on the relative worth of the 
latest software releases. 

I use the Charlie Chaplin handle as well 
as Kitchen Table, Inc., and I am most fre- 
quently found on CB on weeknights after 1 1 
p.m. Eastern Time. I hope to see many of 
you there. ■ 
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Tired of typing in all 





Save time 
and money! 




ALL THE 

MAJOR PROGRAM 

LISTINGS FROM 

EACH ISSUE OF 

80 MICRO 

$9.97 

Plus $1.50 ea. Postage & Handling 



SAVE HOURS OF 



Sign up for a subscription to LOAD 80. Save up to 30% off the monthly price. 
Begin your subscription with the June/July 1 982 cassette or disk. 

disks are TRSDOS 2.3 formatted, single density and flippy-sided. They will not contain an operating system. Single 
drive users need a single drive copy utility; Model III users need the TRSDOS 1.2/1.3 Convert utility. Source code files may not 



be useable on the Model III. 

"Frankly, after hundreds of hours of frustration, I 
seldom ever try to keyboard a published program. In- 
evitably, I mess it up when I keyboard it. Who needs the 
aggravation? 

"This is why I started a new series of cassettes called 
LOAD 80. Each cassette will have program dumps of the 
listings in an issue of 80 Micro. These listings are direct 
from the authors and tested by the 80 Micro staff. All 
but the very short program listings will be on the LOAD 
80 cassettes. Thus, you will be able to save hours of 
inputting programs and even more of debugging your 
keyboard errors." 



Wayne Green 

Pubtlthw, K Micro 




The LOAD 80 cassette is simply the program listings 
that appear in the articles in 80 Micro. It was created to 
save you the time involved in typing the listings yourself. 
Successful loading of the programs depends on reading 
the documentation in the articles. If you have your current 
magazine at hand when you load the cassette or boot up 
the disk, you should have no difficulty. If you still have 
problems, please return the tape or disk for replacement. 

LOAD 80 began with the April 1981 issue. To order back 
issues, look for the bak issue advertisement in this 
magazine or ask your local dealer. 

To order LOAD 80, fill in the attached card and we will 
send you your LOAD 80 cassette or disk for the major pro- 
grams in this issue. If the card is missing, fill in the coupon 
below (a photocopy is acceptable) and mail it to: LOAD 80, 
80 Pine Street, Peterborough, NH 03458. 



Yes, I want June/July LOAD 80. 



YES, I want the June/July 1982 LOAD 80 on disk for 

$19.97 each (plus $1.50 per disk for postage and 

handling). 

YES, I want to save money. I'll subscribe to LOAD 80 

on disk beginning with the June/July 1982 issue. . . 

$199.97. 



□ Visa □ Am. Ex □ MasterCard 
□ Check/Money order 



I YES, I want a cassette of the June/July 1982 LOAD 80 

for $9.97 each (plus $1.50 per tape for postage and 

handling). 
C YES, I'll save 30%. Sign me up for a year of 

beginning with the June/July 1982 cassette.. .$99.97 

for 12 issues. 



Name: 

Address: 

City: 

Signature: 

LOAD 80 Is manufactured by Instant Software, a subsidiary of WAYNE GREEN INC., 80 Pine St., Peterborough, NH 03458 There is no warranty 
expressed or Implied that LOAbaO will do anything other than save you typing. Foreign air mai I, please inquire. 



.State: 



_Card#. 



-Zip: 



Exp. Date: 



HOME/HOBBY 



You can't wrap fish in it, but. 




Electronic 
xperiment 



Jay Chidsey 

205 E. Adams St. 

Green Springs, OH 44836 



A fascinating experiment in electronic 
publishing has been underway in the 
small northwest Ohio county-seat town of 
Tiffin since February 1. "You can't wrap fish 
in it," noted Editor and Publisher, a major 
publishing industry magazine, but if the 
videotext Advertiser-Tribune were trans- 
ferred to newsprint, with a normal comple- 
ment of advertising, it would land on your 



doorstep with a thump much like that of a 
big-city daily. Currently offering over 650 
32-character by 16-line video pages, the 
daily publication is equivalent to 150 paper 
pages of over 35,000 words. 

Both Advertiser-Tribune Editor/Publisher 
Kaj (pronounced Kai) Spencer and Video- 
text Version Manager and Editor Sherry 
Skufca insist that the video version should 
not be thought of as an electronic twin of 
the print version. "We are doing everything 
we can to dispel the idea that we are an 
electronic newspaper," says Skufca. "We 
are an instant electronic information ser- 
vice. We don't have permanence, you can't 
browse through our pages, there is no room 




Videotext Advertiser-Tribune Assistant Editor Steve Dillon prepares a file for update on 
the two-disk Model II editing computer. To his left is the line printer which shares the output 
of the Compugraphic system data banks (the two tall cabinets seen beyond the Model II). 
Back to back with the editing computer is a four-disk Model II (the video version data bank), 
and next to that the eight-line Tandy Multiplexer. Out of camera range at right is a Videotex 
terminal used to check video output. 
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for long commentaries. We have no art or 
pictures." She adds, "A new Japanese cam- 
era system which captures pictures on disk 
rather than film could bring pictures to 
videotext systems soon, though." 

Available at start-up only to Radio Shack 
Videotex terminal owners and to TRS-80 
Color Computer owners who purchased 
Tandy terminal software, new software writ- 
ten by Gary Sams of Tiffin's Computer Club 
now permits access by TRS-80 Models I and 
III. No other computers or terminals are 
served thus far. 

What makes this experiment so exciting 
to journalists and TRS-80 owners is that this 
is the first known attempt on the part of a 
small-town newspaper to integrate local 
and world news and national information 
bases into an information service for town 
and farm people. It is also one of the first 
such services to be initiated by the news 
publisher, as opposed to a big-city daily 
making its news available to an indepen- 
dent information provider. 

Starting from a newspaper base offers a 
significant advantage. Local, area and 
state news is typed directly into Compu- 
graphic computers in the paper's news- 
room by print staff people, and national and 
world news comes in from United Press In- 
ternational (UPI) via satellite in Compu- 
graphic form. So convenient is this comput- 
er base that most of the material intended 
only for the video version, such as school 
news or public service information, is typed 
in on Compugraphics in the newsroom by 
the video staff rather than being entered di- 
rectly on the two-disk Model II editing com- 
puter. Skufca estimates that fully 95 per- 
cent of the content of the video version's 
data bank comes down the line from Com- 
pugraphic storage rather than from direct 
entry. Late-breaking world and local news, 
just-in sports scores, weather warnings and 
updates, and winter school closings are 
usually entered directly on the editing com- 
puter, 
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". . . the economics of electronic 
publishing are radically different 
from those of print publishing." 



The area news and UPI material is edited 
on the Compugraphics, and sent directly to 
the Tribune's typesetting computer to be 
printed in cold-type columns for offset print 
reproduction. Sending it to the editing com- 
puter is not quite so simple. There is provi- 
sion in the Compugraphic use codes for 
sending the characters to a line printer, and 
the video version makes use of this output. 
The Compugraphic sends a 43-character 
line, inserts a line feed, sends another 43 
characters, and so on. 

The two-and-a-half-person staff (two edi- 
tors and one half-time newswriter) spend 
much of their time formatting the Compu- 
graphic output to 32-character, 16-line 
units, and even inserting a Model II text-be- 
gins ASCII symbol for every page. After for- 
matting, each item is assigned a menu des- 
ignation and sent to a second Model II. This 
four-disk unit is the data bank. Though 
there is room for up to 2,70X) pages, the Tri- 
bune now uses over 650. Of these, 1 70 or so 
are what Skufca calls floats— weekly items 
which stay on line until replaced. Cafeteria 
menus (for 22 schools), the Friday money 
fund report, and the weekly Chicago grain 
market summary are examples. There are 
450 to 500 new pages every day, and as 
many as 200 of these are updated once or 
twice again during the course of each day. 

To gain access to the data bank, the sub- 
scriber must have a Tandy Videotex termi- 
nal, or a TRS-80 Color Computer plus Tandy 
software and a modem, or a Model I or III 
plus an RS-232 and modem. (A Model I re- 
quires an Expansion Interface also.) The 
user loads a short software program (30 
seconds at 500 baud) that asks which menu 
items are desired. The software also pro- 
vides handshaking and protocols request- 
ed by the Tandy eight-line Multiplexer. The 
Tribune provides a Videotext Listings Guide 
(a menu) with over 100 entries from which 
the user may select. 

During the set-up period, there was a 
problem with the Videotex software. It had 
been written by CompuServe and marketed 
by Tandy. The Advertiser-Tribune was star- 
tled to discover that Tandy Videotex would 
not connect a Tandy Color Computer or any 
TRS-80 with a Model II data bank. Conster- 
nation! Tandy modified the Videotex soft- 
ware to work with the Color Computer, and 
the Tribune commissioned connection soft- 
ware (free to subscribers) for Models I 
and III. 

A 4K Videotex terminal or Color Comput- 
er owner can select no more than eight 
pages from the menu, but a 16K Model I or 
III owner can select up to 24 pages. Soft- 
ware on order will make up to 58 pages pos- 
sible to TRS-80s with 32K memory. After se- 
lecting, the subscriber enters a password 
and an identification number and then dials 
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the access telephone number with the mo- 
dem on line. The subscriber's machine is 
now in contact with a Radio Shack Multi- 
plexer. 

The Multiplexer calls up the menu pages 
requested from the data bank computer at 
9,600 baud, stores them in its 64K internal 
buffer, and sends them at 300 baud via tele- 
phone line. Once the information transfer is 
complete, the Multiplexer terminates the 
phone call, and the subscriber can use up 
and down arrows to scroll the information 
for reading, or he can print it. 

How fast is information transfer? Skufca 
gave me the figure of eight pages in 40 sec- 
onds; one subscriber estimated two min- 
utes for eight pages. Each character re- 
quires a start bit, eight character bits, and a 
stop bit; 10 in all. At the 300-baud transfer 
rate (300 bits per second), 30 characters are 
transmitted each second; I timed an eight- 
page NYSE (New York Stock Exchange) 
closing report at about two minutes' trans- 
fer time. 



The Future 

In thinking about a system like this, and 
about its potential for setting patterns for 
the future, it is important to recognize that 
the economics of electronic publishing are 
radically different from those of print 
publishing. 

It costs money to print every page, and 
thus every column inch, of a print newspa- 
per. Print editions can be squeezed for 
space; video versions aren't. It would be 
unthinkable for a print paper to carry the 
same story every day for a week: the week- 
ly "What's New in Stocks?" or the "Friday 
Mutual Fund Report" for example. Rerun- 
ning an article doesn't cost the video ver- 
sion a dime. Fast-breaking print newspa- 
per stories are no longer updated in extra 
editions by newsboys shouting "Huxtry, 
Huxtry" on city streets— not since radio 
and tv stole that show. The video version 
can steal some of it back with a Scripsit 
paragraph deletion and a direct rewrite in- 
sertion of late-breaking world or local 
news, weather warnings, winter school 
closings, and so forth. 

There are long NYSE and AMEX and over- 
the-counter stock reports and farm price 
quotations which Spencer sees as being of 
great interest to area business and agricul- 
tural people, but which the print paper can't 
afford to publish every day. The video ver- 
sion, by contrast, carries 15 major stock 
and bond listings plus another dozen busi- 
ness commentary sections and 10 agricul- 
ture sections, many of them replaced or up- 
dated daily. 

With a combination of Compugraphic-set 
news from the print paper newsroom and 



relatively inexpensive wire service feed in 
Compugraphic-ready form, the video ver- 
sion is two or three times the size of the 
26-page newsprint version using 1/4 of its 
data bank capacity. 

That is the good news for the electronic 
publisher: virtually unlimited space and in- 
expensive information. The bad news is 
that advertising, which is the financial 
backbone of printed newspaper publishing, 
will have to be rethought if the whole cost of 
the news and information offered by an 
electronic information service is not to be 
borne by the subscriber alone. 

Print media thrust the advertising at the 
reader by putting it on the same page with 
the news and features. Television and radio 
intermixed it with the programs. Neither 
method works for a medium which is menu- 
driven, where the user can choose exactly 
what he or she wants to see. 

Spencer calls the solution "Market 
Place." If advertising is to have a significant 
role in paying for the subscriber's use of the 
medium, then that subscriber must be per- 
suaded to ask for the advertising. A half- 
time advertising sales person has joined 
the video staff, and the target is the sale of 
"yellow page ads." These are half-page ads 
listing the name, address, phone number, 
and services of a business, categorized by 
type of business. An advantage for advertis- 
ers is that new services or products, 
changes of address or phone number, can 
be made in seconds rather than in next 
year's phone book. Available now are video 
classified ads, with an option to list in both 
media for a few cents more. 

Spencer is optimistic about the potential 
of charts and graphics in the video publica- 
tion; Skufca is more restrained. The differ- 
ent TRS-80s and the Videotex terminal han- 
dle graphics input differently, she points 
out. What is a circle to one is a flattened 
oval to another. X-Y axis curves are affect- 
ed in the same way. Bar graphs are no prob- 
lem, but pie charts are somewhere beyond 
the next hill. 

Spencer is also enthusiastic about the 
concept of on-demand publishing. Software 
is being written to determine which menu 
items are most frequently requested by sub- 
scribers. Despite the enormous amount of 
unused capacity, least requested items will 
be dropped. "We want to use our limited for- 
matting time on the items people are look- 
ing at," Skufca explains. 

The videotext Advertiser-Tribune is an ex- 
periment, one that is planned to run at least 
three years. It is an attempt to combine the 
electronic news services available to all 
news media with the local focus of a rural 
area and small circulation newspaper. Can 
a video news and information service sur- 
vive in a small Ohio town, population 
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"The Tribune expects to 
operate in the red for at least a 
couple of years on this project. " 



20,000, print newspaper circulation 11,500? 

Spencer and Skufca insist that the video- 
text version is not an electronic newspaper, 
and they are only too right. In its present 
form, the videotext Advertiser-Tribune is a 
data bank which offers much information 
not carried in the print edition plus short 
news items and summaries which have the 
effect of directing the subscriber to the 
print newspaper for the full story. It does 
have the potential, however, of becoming 
an electronic newspaper. 

There are tens of thousands of kilobytes 
of unused space in the existing system; 
more than enough room for every word that 
now goes into the print newspaper. And 
every word is directly available in Compu- 
graphic form. There is space to carry items 
in two sizes: a short version of only the lead 
paragraphs as well as a complete version of 
the story. There are at least three problems 
associated with a policy of full news cover- 
age. 

First, the 43-characters-per-line output of 
the Compugraphic is manually reformatted 
to the 32 character line required by TRS-80s. 
Carrying every story from the print version 



would greatly increase the time required for 
such formatting if it were to be done manu- 
ally. There are at least two fixes for this out- 
put problem. New software could be creat- 
ed to transform the 43-character Compu- 
graphic output to word-sensitive 32-charac- 
ter lines, or the Compugraphic itself could 
be set to output 32-character lines. Such an 
adjustment would interfere with the Com- 
pugraphic's feed to the typesetting comput- 
er, but if there is a time when all the type is 
set for the day's edition, the video version 
could still have the news first in the sub- 
scriber's home. 

Second, the system is not interactive; it 
does not offer a menu on screen, accept 
user choices, and then deliver requested 
material all in one operation. The subscrib- 
er chooses from a printed menu (the List- 
ings Guide) and requests items from that 
list. This is a tougher problem. Menu selec- 
tion prior to connection is essential to the 
low flat-rate subscription which makes this 
service so attractive. Interactive connection 
would require time-on-line charging— a 
quite different kind of service. 

Finally, it is difficult to escape the im- 



pression that newspaper people have a 
print bias. An electronic newspaper worth 
buying in its own right could be threatening 
to them. I'm convinced that print-oriented 
publishing people will have to recognize 
and work through this bias if a newspaper- 
based video news facility is ever to become 
popular, or profitable. 

Is It Profitable? 

The Tribune expects to operate in the red 
for at least a couple of years on this project. 
Projected three-year operating costs, ac- 
cording to best estimates, are around 
$140,000, of which $25,000 is up-front equip- 
ment cost (mainly two Model Ms with disks 
and a RadioShack eight-line telephone Mul- 
tiplexer). The rest goes for supplies and 
staff. Income will be from' subscriptions at 
$6 per month, just about equal to newsprint 
edition price, and some (it is hoped) from 
advertisers. 

Subscribers can call in 24 hours a day. 
The Multiplexer will handle up to four calls 
at once, and is expandable to eight. Sub- 
scribers outside Tiffin pay long-distance 
charges, but at off-peak hours these are 






What is The Alternate Source? 

TAS is your one-stop supplier for software and information for 
the TRS-80 Models I and III. (We support only these two 
systems.) We provide... 

1) ...A comprehensive periodical featuring a variety of 
valuable information for the Model I and III that can help 
solve the day to day problems inherent to personal computing. 
We focus on improving your programming abilities. As more 
people enter into this fascinating market, the potential for 
using personal computers is increasing many-fold; we invite 
you to share our growing library of knowledge. Remember! 
We guarantee your satisfaction completely. If, after examining 
your first couple of issues, you decide TAS is not for you. we 
urge you to return your invoice for a full refund. Safest 
guarantee we've ever made. TAS is published eight times a 
year. Twelve issues are 821. North America only. Ask for a 
complimentary copy of TAS if you've never seen one before. 

2) ...A wide selection of top quality software to assist vou in 
getting full use of your TRS-80. including: 

MOUKM K» - A complelr low -cost. high-u,ualitv terminal package 0'J9.9.->). 

THAKCKSS - The superior tool for disk data manipulation (821.95). 
I ASORT - A sort ulil.lN designed for ea»> interfacing and maximum utilitv 
(819.93): available for jour commercial applications, too! 

CHII'CHKK - A RAM i,-sl i|,al points to the defective chip (89.93). 

TASVION - The user-approved monitor package for Z80 programming 

(829.93). 

KBK - ke.v hoard control like vou've never seen (839.95). 

THK A l)\ KM I KK SYSTKM - \ comprehensive tool for games or educational 

design (839.93). The Adventure Svslem is now available for fKk tape systems! 

3) ...A wide selection of software from a variety of vendors, 
including Soft Sector Marketing (Lazy Writer). Big Five 
(Stellar Escort, now in stock). Adventure International 
(Eliminator and Armored Patrol), Med Systems (Laser 
Defense) and Cornsoft (Scarfman and Space Castle). Microsoft 
(EDTASM Plus for Tape or Disk) and many others. We 



constantly monitor our inventory, discontinue the bad and 
add the good. 

1) ...A growing line of quality products. Our latest addition: 
The Arranger, a disk librarv program that allows vou to read 
everything (LDOS, NEWDOS/80. DOSPLL'S and TRSDOS, 
Model I and III versions) if you are running double density. 
Allows updating for diskettes already on file (instead of 
redoing the entire library), won't hang if an unrecognized 
format is encountered and includes standard features such as 
sorting, searching for files or free grans, printing, etc. The 
Arranger was written by Dan Foy with consultation by Jesse 
Bob Overholt from Circle J Software (designer of the original 
software package to support double density). The Arranger is 
829.95. Please specify single or double density version. 

5) ...An 800 number for your convenience: (800)218-0281. 

Put The Alternate Source to work for you! Request our 
information flyer for detailed information about our complete 
line of quality products. Do it today! Dealers: We're at your 
service, too! 



- 1-800-248-0284 




704 North Pennsylvania Avenue 

Lansing. Michigan 18906 

Phone 1-517-182-8270 or 1-800-218-0281 
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"The initial subscription 
response has been encouraging. 



small, even for the subscriber in Seattle, 
Washington. From there, and after 11 p.m., 
a direct dial call costs 22 cents for the first 
minute and 16 cents for each additional 
minute of connection. Wherever you live in 
the continental U.S., you might want to 
check out this electronic service; just send 
$6 to The Advertiser-Tribune, Tiffin, OH 
44883. 

Spencer estimates, based on national 
data, that there are 200 to 300 home com- 
puters in the Tribune's service area now. He 
projects subscriptions at 600 to 800 in the 
next three years, and the lower estimate 
would cover operating costs plus equip- 
ment amortization. The initial subscription 
response has been encouraging. After a 
month and a half into the experiment, there 
were 25 subscribers: two farmers, a few 
people monitoring the system with an eye 
to opening a similar information service, 
and about eight TRS-80 hobbyists and eight 
area businessmen. 

The success of this experiment will de- 
pend upon several factors: 

• There must be a significant increase in 
the number of computers (and terminals) 



owned by area people during the next three 
years. Industry estimates for new micro 
sales in 1982 are nearly three million. If this 
growth trend continues, and if Tandy holds 
its market share, that means a lot of new 
TRS-80s in use; many of them in the Trib- 
une's service area. 

• The Tribune must add service to non- 
Tandy rigs. Software for the Model II, Apple, 
and IBM computers is now in the planning 
stage. 

• A major barrier to many potential sub- 
scribers is the cost of the Expansion Inter- 
face, RS-232, and modem. The Tribune is 
hoping to develop software which will elim- 
inate the need for any peripheral except a 
modem. 

• The service must be worth subscribing 
to. A full-coverage news service will be pos- 
sible if and when the Tribune gets software 
(it is under study) which will permit direct 
feed from Compugraphic to the editing 
computer without manual formatting. Since 
there is no practical space constraint, many 
UPI stories and features which the print ver- 
sion does not use could be added, once the 
formatting problem is solved. ■ 



Coordinated 
Business Software 

D.B. Software Co. announces a new 
line of coordinated business software 
designed for the Model III TRS-80. 
The BASE system consists of a Gen- 
eral Ledger System with Accounts 
Receivable and Accounts Payable. 
Other modules can be purchased 
and added as needed. 

BASE System (GL-AR-AP) $200.00 

Coordinated Modules: 

Payroll $ 75.00 

Order Entry $125.00 

Inventory $129.95 

Purchase Order Entry $1 25.00 
Inventory (special for 

Auto Parts Suppliers) $1 29.95 

Also available: 

Job Costing with GL and AP 

(Payroll optional) $500.00 

Mailing Lister $100.00 

Coming soon: 

Apartment Management System, 
Fixed Assets System, Manufacturing 
Inventory Management System 

Send S.A.S.E. for more information 
D.B. Software Co. 

1 1840 NE Brazee, Portland, OR 97220 

Phone (503) 255-7735 

DEALER INQUIRIES INVITED 

TRS-80 is a trademark of Tandy Corp. 




It's your choice: 

do it the hard way, or 
get the information you need from 



feSii .*??* 






VOLUME I 

The most complete book yet 
on the math routines of the 
BASIC ROM, Models I & III. 
Contains a wealth of detail 
about integer, single and dou- 
ble precision formats, advanc- 
ed math, data manipulation, 
and assembly language inter- 
facing, with examples. In- 
cludes commented listing 
(0708H-1607H), plus a highly 
detailed map of the ROM and 
reserved RAM. 



I&ll 

Comprehensive Guide to TRS-80* Assembly Language Routines 

Each Volume Priced At $14.95 Plus $1.50 Shipping/Handling 
VA residents add 4% tax • Foreign: send U.S. funds, add $4 ea. for overseas delivery 

"Trademark of Tandy Coro. 



INSIDERS SOFTWARE CONSULTANTS, INC. 

P.O. Box 7086, Dept. SUM3 • Alexandria, VA 22307 

Please send THE BOOK: C Volume I u Volume II 

Name 

Address 

City 



1 



State 



Zip 



Enclosed is fl check D M.O. for $ 

Charge to my □ VISA D MasterCard Bank Code . 
Exp. date: Card No. . 

Signature 



VOLUME II 

Packed full of useful informa- 
tion on the model I input/ 

output routines, with de- 
tailed listings to illustrate the 
commented source code. 
Learn to control and 
manipulate the keyboard, 
video, printer port, and 
cassette port. Essential for 
assembly language program- 
mers, you caf write youi own 
routines or use the many pro- 
gramming examples included. 



■See List of Advertisers on page 386 
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GRAPHICS 



You've gawked at the result— now learn the technique. 



Spiromania— Part II 







Program 


Listing 1. Machine Code Routine 


0001 


0600 






NAM SPIRALS 




0002 


0600 






SETDP 




0003 


0600 






ORG $7C00 




0004 


7C00 


BDB3ED 


STRT 


JSR 5B3ED 


USR ARG TO D 


0005 


7C03 


8E02D0 




LDX #360*2 


#DEGS EVEN 


0006 


7C06 


C501 




BITB #1 


EVEN ARG? 


0007 


7C08 


2703 




BEQ A§ 


IF SO 


0008 


7C0A 


8E0168 




LDX #180*2 


#DEGS ODD 


0009 


7C0D 


AF8C48 


A@ 


STX <CIRC+1,PCR 




0010 


7C10 


9E8A 




LDX <$8A 


•CONSTANT ZERO 


0011 


7C12 


4F 


STEP 


CLRA 


IGNORE MSB 


0012 


7C13 


3416 




PSHS A,B,X 


LOBES/ANGLE 


0013 


7C15 


BD9FB5 




JSR $9FB5 


D*X TO Y,U 


0014 


7C18 


1F30 




TFR U,D 


RSLT TO D 


0015 


7C1A 


1700A1 




LBSR SIN1 


SIN(LOBES*ANG) 


0016 


7C1D 


8600 




LDA #0 


# TIMES 


0017 


7C1F 


2706 




BEQ B@ 


IF NONE 


0018 


7C21 


5A 


A a 


DECB 


OR WHATEVER 


0019 


7C22 


12 




NOP 




0020 


7C23 


12 




NOP 




0021 


7C24 


4A 




DECA 


DONE ALL? 


0022 


7C25 


26FA 




BNE A? 


NO 


0023 


7C27 


3404 


Be 


PSHS B 


SAVE RADIUS 


0024 


7C29 


8D32 




BSR XY 


GET COORDS 


0025 


7C2B 


3261 




LEAS 1,S 


RSTR STK 


0026 


7C2D 


2108 




BRN DOT 


USE BRA FOR DOTS 

Program continues 



by Jake Commander 

80 Micro Technical Editor 



Eds. note: This is the second part of a 
two-part series on color graphics. Part one 
appeared in the May issue of 80 Microcom- 
puting. 

The machine code routine in Listing 1 
works by performing the sine/cosine 
evaluations for a complete spyrographic 
loop. Each point is plotted at half-degree 
increments in order to increase the resolu- 
tion of the final pattern. This is why the 
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Photo 2. Hearts 



'. . . 256 lobes produces a delicate resemblance 
of a souffle prepared with too much milk." 



table is 180 bytes long— one entry for each 
half-degree from zero to 89.5 degrees. De- 
spite the fine resolution, dots soon appear 
with gaps between them at fast-changing 
portions of spirographs. This can be used to 
great effect to produce some nice interac- 
tions between apparently unrelated dots, 
but if it irks you (as it sometimes did me) I 
have provided an option that will join the 
dots using the line-draw routine in ROM. 
This is the same technique as the Circle 
command produces patterns with no gaps 
between the dots. Be aware that with some 
patterns, using lines tends to fill the screen 
too fast, detracting from otherwise more 
delicate possibilites. Let your own taste 
decide. 

Machine Code Run-down 

Here's how the machine code works with 
reference to the line numbers in the source 
listing: 

Line 4 uses a ROM routine to pick up the 
number of lobes called for in parentheses in 
the USR call from Basic. This is returned in 
register D of the 6809. (Register D is 
registers A and B used together as a 16-bit 
pair.) 

Lines 5-9 set up the number of degrees 
required to complete a spirographic loop. 
For patterns with odd numbers of lobes 180 
degrees does the job, for even numbers 360 
is required. Both these numbers are multi- 
plied by two to facilitate plotting at half- 
degree increments. You should note that 
patterns using even numbers produce 
designs with twice the number of lobes as 
the number you input; 4 produces 8 lobes, 
and so on. 

Line 10 initializes the plotted angle to zero. 
Advantage is taken of the fact that Color 
Basic uses RAM location $8A as a 16-bit 
zero constant. Change location $8B to a 
one and Basic gets all its sums wrong! 

Line 11 ensures no more than 256 lobes 
are allowed. This is a more than adequate 
number, even with the highest resolution 
attainable. The maximum of 256 lobes pro- 
duces a delicate resemblance of a souffle 
prepared with too much milk. 

Lines 12-15 get the sine values of the 
number of lobes multiplied by the current 
plotting angle. This is the simulated circular 
motion of the small wheel inside the larger. 
The number returned determines how the 
radius changes as the pattern is spun 
through 360 degrees. 

Lines 16-22 are for your self-indulgent 
pleasure. You can process the radius in reg- 
ister B with any code you like for your own 



Program continued 












0027 


7C2F 


AE62 




LDX 2,S 


; ANGLE 


0028 


7C31 


260D 




BNE C@ 


,-IF NOT 1ST 


0029 


7C33 


97C4 




STA <SC4 


; SETUP LINE STRT 


0030 


7C35 


D7C6 




STB <$C6 


;Y LINE STRT 


0031 


7C3 7 


97BE 


DOT 


STA <$BE 


;X DOT COORD 


0032 


7C39 


D7C0 




STB <$C0 


;Y DOT COORD 


0033 


7C3B 


BD9374 




JSR $9374 


;SET PIXEL 


0034 


7C3E 


2013 




BRA D@ 




0035 


7C40 


3406 


ce 


PSHS A,B 


;X,Y COORDS 


0036 


7C42 


96C4 




LDA <SC4 


;PREV LINE STRT 


0037 


7C44 


D6C6 




LDB <$C6 


; DITTO Y COORD 


0038 


7C46 


97 BE 




STA <$BE 


;LINE STRT X 


0039 


7C48 


D7C0 




STB <$C0 


;LINE STRT Y 


0040 


7C4A 


3506 




PULS A,B 




0041 


7C4C 


97C4 




STA <SC4 


;LINE END X 


0042 


7C4E 


D7C6 




STB <SC6 


;LINE END Y 


0043 


7C50 


BD94A1 




JSR S94A1 


;DRAW LINE 


0044 


7C53 


3516 


D@ 


PULS A,B,X 


; LOBES/ANGLE 


0045 


7C55 


3001 




LEAX 1,X 


,-BUMP ANGLE 


0046 


7C57 


8C02D0 


CIRC 


CNPX #360*2 


;DONE CIRCLE? 


0047 


7C5A 


25B6 




BCS STEP 


;NOT YET 


0048 


7C5C 


39 




RTS 




0049 


7C5D 


EC65 


XY 


LDD 5,S 


;CRNT ANGLE 


0050 


7C5F 


8D5A 




BSR SIN 


;SIN TO B 


0051 


7C61 


A662 




LDA 2 , S 


; RADIUS 


0052 


7C63 


8D1B 




BSR SRAD 


; GYRATE X 


0053 


7C65 


8D38 




BSR SCL 


; SCALE FOR VID 


0054 


7C67 


CB20 




ADDB *32 


;RSTR CENTER 


0055 


7C69 


3404 




PSHS B 


;SAVE X COORD 


0056 


7C6B 


EC66 




LDD 6,S 


;CRNT ANGLE 


0057 


7C6D 


8D49 




BSR COS 


;COS TO B 


0058 


7C6F 


53 




COMB 


;INVRT FOR VID 


0059 


7C70 


A663 




LDA 3,S 


; RADIUS 


0060 


7C7 2 


8D0C 




BSR SRAD 


; GYRATE Y 


0061 


7C7 4 


8D29 




BSR SCL 


; SCALE FOR VID 


0062 


7C7 6 


CB00 




ADDB *0 


;Y OFFSET 


0063 


7C7 8 


C1C0 




CMPB #192 


;> MAX? , 


0064 


7C7A 


2502 




BCS A@ 


;NO 


0065 


7C7C 


C0C0 




SUBB #192 


;WRAP AROUND 


0066 


7C7E 


3582 


A@ 


PULS A, PC 


;GET X & RTS 


367 


7C80 


3402 


SRAD 


PSHS A 


; RADIUS 


0068 


7C82 


4D 




TSTA 


;>127? 


0069 


7C83 


2B01 




BMI Ay 


;YES 


0070 


7C85 


43 




COMA 


;MAKE > 127 


07.1 


7C86 


8080 


A@ 


SUBA #128 


;GST 0-127 


8072 


7C88 


3404 




PSHS B 


;CRNT SIN/COS 


0073 


7C8A 


5D 




TSTB 


;>127? 


0074 


7C8B 


2B01 




BMI B@ 


; YES 


0075 


7C8D 


53 




COMB 


;MAKE > 127 


0076 


7C8E 


C080 


B@ 


SUBB #128 


;GET 0-127 


0077 


7C90 


3D 




MUL 


; (7 BIT) 


0078 


7C91 


58 




LSLB 


;GRAB 


0079 


7C92 


49 




ROLA 


; EXTRA BIT 


0080 


7C93 


8B80 




ADDA #128 




0081 


7C95 


1F89 




TFR A,B 


jRSLT TO B 


0082 


7C97 


3582 




PULS A 


;CRNT SIN/COS 


0083 


7C99 


A8E0 




EORA ,S+ 


;RADIUS SIGN 


0084 


7C9B 


2A01 




BPL C@ 


;SrGNS SAME 


0085 


7C9D 


53 




COMB 


;ELSE RVRSE RSLT 


0086 


7C9E 


39 


C@ 


RTS 




00 87 


7C9F 


86FF 


SCL 


LDA #255 


; SCALE FACTOR 


0088 


7CA1 


8DDD 




BSR SRAD 


; SCALE RADIUS 


0089 


7CA3 


5D 




TSTB 


;=0? 


0090 


7CA4 


2601 




BNE A@ 


;NO 


0091 


7CA6 


5A 




DECB 


;ELSE -1 


0092 


7CA7 


1F98 


Ay 


TFR B,A 




0093 


7CA9 


8403 




ANDA #3 


;SAVE LO BITS 


0094 


7CAB 


3402 




PSHS A 


;TC STK 


0095 


7 CAD 


54 




LSRB 


J 1/2 


0096 


7CAE 


54 




LSRB 


;i/4 


0097 


7CAF 


3404 




PSHS B 




0098 


7CB1 


EBE4 




ADDB ,S 


;2/4 


0099 


7CB3 


EBE0 




ADDB ,S+ 


;3/4 


0100 


7CB5 


EBE0 




ADDB ,S+ 


;+ LO BITS 


0101 


7CB7 


39 




RTS 










♦ENTRY 


D=ANGLE*2 (DEGS 


<=65536) 








*EXIT 


B=SIN. - 255 




0102 


7CB8 


C300B4 


COS 


ADDD #90*2 


; COSINE EP 


0103 


7CBB 


C30000 


SIN 


ADDD #0 


; ANGULAR OFFSET 


0104 


7CBE 


3416 


SIN1 


PSHS A,B,X 


Program continues 
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MODELS I & III 
DISK BASIC PROGRAMS 

RANDOM ACCESS PAYROLL VER. 1.1 



• No complicated initials. 

• EDIT & LIST 

• NO SPECIAL CHECKS 

• USES NEB 9020 checks 

• PAY any employee anyt 

• STATE-FICA— FED TAXES — SAVINGS 



• SALARIED or hourly 

• SPECIAL PAY -special hours 

• TWO SAVINGS— including RIA 

• CLASSED by occupation or depl 

• PAYSTUB shows Year toDato 



SEND YOUR STATE TAX SCHEDULE- 
FREE— customized to your state tax 

Documentation Jto 00 
Disk S Documentation $95 00 

RANDOM ACCESS DEPRECIATION 

• LISTS any one year s depreciation 

• OR complete list of all property 

• PRINTOUT shows— ID. Number— description— 

• Yt. purchased— life— method— 
1st yr. additional depreciation— 

• Reg. deprec — deprec prior yrs— balance 

• SUMMARY — total value prop -additional 1st yr 

• REGULAR deprec —deprec prior yrs 

• PERMANENT records tor your taxes 

Documentation SI 5 00 

Disk S Documentation $195 00 

MIN 32K- 1 DISK-PRINTER/132CPI 

TERMS. Personal checks require 3 weeks to clear 

USE— VISA— MASTER CHARGE— MONEY ORDERS 

TEL T PM-9 30 PM EASTERN— (617) 359-2364/63/0 

SEND. SASE tor additional information 

MEDFIELD COMPUTER SOFTWARE 

39 GREEN ST. MEDFIELD. MA 02O52 ^215 



EDUCATIONAL 
SOFTWARE 

For TRS-80* Color Computer, PET, Apple II, 



ELEMENTARY 

SCIENCE 

GEOGRAPHY 

ECONOMICS 

FOREIGN LANG. 

GRAMMAR 



MATH 
HISTORY 
ACCOUNTING 
BUSINESS ED. 
FARM RECORDS 
COIN INVENTORY 



Write for FREE Catalogue: 
MICRO LEARN1NGWARE^209 

BOX 2 1 34. N. MANKATO MN 56001 
507-625 2205 



VISA «. MASTER CHARGE ACCEPTED 

We pay I 5*0 royalty for Eclucarional 

Programs listed with us 

Apple is a trademark of Apple Computer Co. 

TRS-80 Is a registered trademark of TANDY COUP. 

Pet Is a trademark of Commodore Bus. Machines. 



PILE FORCE 

A Disk File Program Designed lor the Small Businessman 

File Force is designed to readily keep track ot all your bus 
and programs By utilizing all the power ol your TRS-80 
Basic This program is specially designed to cc— — "■" - 
disk utility the speed ot random access and 
general database manager 

File Force will automatically read the in'— 
allow you to search the masterlile by 

the name ot the disk 



any e«tenson such as a date CMO «-* 310 

Other special features include easy updating Where 
houses have protected their disks to make them u. 
Force will lei you assign a disk name and enter those 
names It will also create a master printout ol all business 
records on your disks lor sale keeping and better manage 
your resources 

System Requirements TRS-80 Model I 48K One Oisk Drive 
TRSOOS Version 2 3 S19 95 Please add S2 tor handling and 
postage S5 overseas lor your convenience you may phone in VISA 
or M/C orders 

SOFTWAREHOUSE INTERNATIONAL 

We've Moved! P.O. Box 1383 • '»nd»co.p 

Clovis. CA 93613: (209) 2517877 
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0105 


7CC0 


830168 


A@ SUBD 


*180*2 


;ANGLE>180? 


0106 


7CC3 


24FB 


BCC 


A§ 


;SUB TIL < 180 


0107 


7CC5 


C30168 


ADDD 


#180*2 


;THEN READJST 


0108 


7CC8 


108300B4 


CMPD 


#90*2 


; ANGLE > 907 


0109 


7CCC 


2507 


BCS 


B@ 


;IF ANGLE < 90 


0110 


7CCE 


3406 


PSHS 


A,B 


; ANGLE TO STK 


0111 


7CD0 


CC0168 


LDD 


#180*2 


;180 DEGS 


0112 


7CD3 


A3E1 


SUBD 


,S++ 


; MINUS ANGLE 


0113 


7CD5 


308C1C 


B @ LEAX 


<SINTBL 


PCR ;=> TBL 


0114 


7CD8 


3A 


ABX 




;»> SIN VAL 


0115 


7CD9 


E684 


LDB 


,X 


;GET SIN VAL 


0116 


7CDB 


3510 


PULS 


X 


; ORIGINAL ANGLE 


0.117 


7CDD 


3404 


PSHS 


B 


;HOLD SIN 


0118 


7CDF 


1F10 


TFR 


X,D 




0119 


7CE1 


8302D0 


Ce SUBC 


#360*2 


;ANGLE > 360? 


0120 


7CE4 


24FB 


BCC 


ce 


;SUB TIL <360 


0121 


7CE6 


C302D0 


ADDD 


#360*2 


; READJUST 


0122 


7CE9 


10830168 


CMPD 


#180*2 


;ANGLE >180? 


0123 


7CED 


3504 


PULS 


B 


;RSTR SIN 


0124 


7CEF 


2501 


BCS 


D@ 


;IF < 180 


0125 


7CF1 


53 


COME 






01 26 


7CF2 


3590 


D6 PUL£ 


X , PC 


;RSTR X & RTS 


0127 


7CF4 


80 


SINTBL FCB 


128 




0128 


7CF5 


81 


FCB 


129 




0129 


7CF6 


82 


FCB 


130 




0130 


7CF7 


83 


FCB 


131 




0131 


7CF8 


84 


FCB 


13 2 




0132 


7CF9 


86 


FCB 


134 




0133 


7CFA 


87 


FCB 


135 




0134 


7CFB 


8 8 


FCB 


136 




0135 


7CFC 


3 9 


FCB 


137 




0136 


7CFD 


8 A 


FCB 


138 




0137 


7CFE 


8B 


FCB 


139 




0138 


7CFF 


8C 


FCB 


140 




0139 


7D00 


8D 


FCB 


141 




0140 


7D01 


8E 


FCB 


142 




0141 


7D02 


8F 


FCB 


143 




0142 


7D03 


91 


FCB 


145 




8143 


7D04 


92 


FCB 


146 




014 4 


7D05 


93 


FCB 


147 




3145 


7D06 


94 


FCB 


148 




0146 


7D07 


95 


FCB 


149 




0147 


7D08 


96 


FCB 


150 




0148 


7D09 


97 


FCB 


151 




0149 


7D0A 


98 


FCB 


152 




0150 


7D0B 


9 9 


FCB 


153 




0151 


7D0C 


9 A 


FCB 


154 




0152 


7D0D 


9B 


FCB 


155 




01 53 


7D0E 


9D 


FCB 


157 




0154 


7D0F 


9F. 


FCB 


158 




0155 


7D10 


9F 


FCB 


159 




0156 


7D11 


A0 


FCB 


160 




0157 


7D12 


Al 


FCB 


161 




0158 


7D13 


A2 


FCB 


162 




0159 


7D14 


A3 


FCB 


163 




0160 


7D15 


A 4 


FCB 


164 




0161 


7D16 


A 5 


FCB 


165 




0162 


7D17 


A 6 


FCB 


166 




0163 


7D18 


A7 


FCB 


167 




0164 


7D19 


A 8 


FCB 


.16 8 




0165 


7D1A 


A 9 


FCB 


169 




0166 


7D1B 


AA 


FCB 


170 




0167 


7D1C 


AB 


FCB 


171 




0168 


7D1D 


AC 


FCB 


172 




0169 


7D1E 


AE 


FCB 


.1 7 4 




0170 


7D1F 


AF 


FCB 


175 




0171 


7D20 


B0 


FCB 


17 6 




0172 


7D21 


Bl 


FCB 


177 




0173 


7D22 


B2 


FCB 


178 




017 4 


7D23 


B3 


FCB 


179 




0175 


7D24 


B4 


FCB 


180 




0176 


7D25 


B5 


FCB 


181 




0177 


7D26 


36 


FCB 


182 




0178 


7D27 


B7 


FCB 


183 




317 9 


7D28 


B8 


FCB 


184 




0180 


7D29 


B9 


FCB 


185 




0181 


7D2A 


BA 


FCB 


186 




0182 


7D2B 


3B 


FCB 


187 




0183 


7D2C 


BC 


FCB 


188 




0184 


7D2D 


BD 


FCB 


1 89 




0185 


7D2E 


BE 


FCB 


190 




0186 


7D2F 


BF 


FCB 


191 




0187 


7D30 


C0 


FCB 


192 




0188 


7D31 


C0 


FCB 


192 




0189 


7D32 


CI 


FCB 


193 




0190 


7D33 


C2 


FCB 


194 




0191 


7D34 


C3 


FCB 


195 




0192 


7D35 


C4 


FCB 


196 




0193 


7D36 


C5 


FCB 


197 




0194 


7D37 


C6 


FCB 


198 




0195 


7D38 


C7 


FCB 


199 




0196 


7D39 


C8 


FCB 


200 




0197 


7D3A 


C9 


FCB 


201 




0198 


7D3B 


CA 


FCB 


202 




0199 


7D3C 


CB 


FCB 


203 




0200 


7D3D 


CC 


FCB 


204 




0201 


7D3E 


CC 


FCB 


20 4 




0202 


7D3F 


CD 


FCB 


205 




0203 


7D40 


CE 


FCB 


206 




0204 


7D41 


CF 


FCB 


207 




0205 


7D42 


D0 


FCB 


208 




0206 


7D43 


Dl 


FCB 


20 9 
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THE 
SWITO 

SWITCH T0 5 '^8"DOUBLE DENSITY 

IKDtmbler S/S 



FEATURES 

• 5- and 8-inch* disk drives 

• Single- & double -density 

• Any size and density in any mix 

• Read Model I, II* and III disks 

• 5- or 8-inch* system disk 

• Single & double sided disk drives 

• DOS+ 3.3.9 included, with Disk 
BASIC. 

• 6 month warranty 

• Up to 3.75 megabytes online 

• Easy installation - plug-in & run 

• Analog phase lock loop data 
separation 

• Precision write precompensation 

• Regulated power supply 

• Guaranteed operation at 4MHz 

• All contacts gold plated 

• Solder masked & silk screened 

• Runs under DOS+ 3.3.9, TRSDOS 
2.3, NEWDOS 2.1, NEWDOS/80 
1.0, LDOS, NEWDOS/80 2.0 r 
and ULTRADOS 

• Reads 40- and 35-track disks on 
80-track drives 

• FD1791 controller + your FD1771 

• Fits Model I expansion interfaces 

• Fits LNW expansion interfaces 

• Track configurations to 80-tracks 

• 5 inch disk storage increased to: 

161,280 bytes - 35-track SS/DD 
322,560 bytes - 35-track DS/DD 
184,320 bytes - 40-track SS/DD 
368,640 bytes - 40-track DS/DD 
368,640 bytes - 80-track SS/DD 
737,280 bytes - 80-track DS/DD 

• 8 inch disk storage increased to: 



591,360 bytes - 77-track SS/DD 
1,182,720 bytes - 77-track DS/DD 
SS: single-sided DS: double-sided 
SD: single-density DD: double-density 

COMPLETE - The LNDoubler 5/8, 
switches your Model I or LN W-80 
into the most versatile computer you 
can own. The LNDoubler's switch 
allows you to boot from 5- or 8-inch 
system disks, and it's accessible from 
outside the interface. The LNDoubler 
5/8 comes with a double-density disk 
operating system (DOS+ 3.3.9), 
complete with BASIC and utility 
programs . . . ready to run your 
software NOW! 

VERSATILE - Whether you want 
single-sided, double-sided, single- or 
double-density, 5- or 8-inch operation, 
complete versatility is here today! 
Any combination of 5- and 8-inch disk 
storage is possible with the 
LNDoubler 5/8. Each of your present 
40-track, single-sided 5-inch drives 
will store up to 184,320 bytes 
(formatted storage) - that's an 80% 
increase in storage capacity for only 
half the cost of just one disk drive. 
With three 8-inch double-density, 
double-sided drives your Model I will 
have 3.75 Megabytes of online storage 
- that's more storage than a Model II 
or Model III! 

ADVANCED - The LNDoubler 5/8 
is the most technically advanced, 
tested and reliable double-density 



board you can buy. The LNDoubler 
5/8 has more features, more options 
and more software support than any 
other product of its kind. 

EASY TO INSTALL - The 

LNDoubler 5/8 is easy to install. 
There are no traces to cut, no wiring 
to do, just a screwdriver and a few 
minutes of your time is all that is 
required. The instructions are fully 
illustrated for all interfaces. In 
minutes you will be 'up-and-running', 
and enjoying your computer as never 
before. 

COMPARE - Compare features, 
compare quality, compare value, and 
make the SWITCH today! 
Immediate delivery from stock - at 
your dealer NOW for only 



219.95 



DEALERS - You too can 
make The Switch. 




USU^RESEARCH CORPORA TION 



2620 WALNUT Tustin, CA. 92680 (714)544-5744 (714)641-8850 

*8" drive operation requires special cable, 8" double-density requires 3.55MHz CPU speed-up modification or LNW-80 4MHz computer. TRS-80 is a trademark of Tandy Corporation. 
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0207 


7D44 


D2 


FCB 210 


0208 


7D45 


D2 


FCB 210 


0209 


7D46 


D3 


FCB 211 


0210 


7D47 


D4 


FCB 212 


0211 


7D48 


D5 


FCB 213 


0212 


7D49 


D6 


FCB 214 


0213 


7D4A 


D7 


FCB 215 


0214 


7D4B 


D7 


FCB 215 


0215 
0216 


7D4C 
7D4D 


D8 
D9 


FCB 216 
FCB 217 


0217 


7D4E 


DA 


FCB 218 


0218 


7D4F 


DB 


FCB 219 


0219 


7D50 


DB 


FCB 219 


0220 


7D51 


DC 


FCB 220 


0221 


7D52 


DD 


FCB 221 


0222 


7D53 


DE 


FCB 222 


0223 


7D54 


DE 


FCB 222 


0224 


7D55 


DF 


FCB 223 


0225 


7D56 


E0 


FCB 224 


0226 


7D57 


El 


FCB 225 


0227 


7D58 


El 


FCB 225 


0228 


7D59 


E2 


FCB 226 


0229 


7D5A 


E3 


FCB 227 


0230 


7D5B 


E3 


FCB 227 


0231 


7D5C 


E4 


FCB 228 


0232 


7D5D 


E5 


FCB 229 


0233 


7D5E 


E5 


FCB 229 


0234 


7D5F 


E6 


FCB 230 


0235 


7D60 


E7 


FCB 231 


0236 


7D61 


E7 


FCB 231 


0237 


7D62 


E8 


FCB 232 


0238 


7D63 


E9 


FCB 233 


0239 


7D64 


E9 


FCB 233 


0240 


7D65 


EA 


FCB 234 


0241 


7D66 


EB 


FCB 235 


0242 


7D67 


EB 


FCB 235 


0243 


7D68 


EC 


FCB 236 


0244 


7D69 


EC 


FCB 236 


0245 


7D6A 


ED 


FCB 237 


0246 


7D6B 


ED 


FCB 237 


0247 


7D6C 


EE 


FCB 23 8 


0248 


7D6D 


EF 


FCB 239 


0249 


7D6E 


EF 


FCB 239 


0250 


7D6F 


F0 


FCB 240 


0251 


7D70 


F0 


FCB 240 


0252 


7D71 


Fl 


FCB 241 


0253 


7D7 2 


Fl 


FCB 241 


0254 


7D73 


F2 


FCB 242 


0255 


7D74 


F2 


FCB 242 


0256 


7D7 5 


F3 


FCB 243 


0257 


7D76 


F3 


FCB 243 


0258 


7D77 


F4 


FCB 244 


0259 


7D78 


F4 


FCB 244 


0260 


7D7 9 


F4 


FCB 244 


0261 


7D7A 


F5 


FCB 245 


0262 


7D7B 


F5 


FCB 245 


0263 


7D7C 


F6 


FCB 246 


0264 


7D7D 


E6 


FCB 246 


0265 


7D7E 


F7 


FCB 247 


0266 


7D7F 


F7 


FCB 247 


0267 


7D80 


F7 


FCB 247 


0268 


7D81 


F6 


FCB 248 


0269 


7D82 


FB 


FCB 248 


0270 


7D83 


F6 


FCB 248 


0271 


7D84 


F9 


FCB 249 


0272 


7D85 


F9 


FCB 249 


0273 


7D86 


F9 


FCB 249 


0274 


7D87 


FA 


FCB 250 


0275 


7D88 


FA 


FCB 250 


0276 


7D89 


FA 


FCB 250 


0277 


7D8A 


FB 


FCB 251 


0278 


7D8B 


FB 


FCB 251 


0279 


7D8C 


FB 


FCB 251 


0280 


7D8D 


FB 


FCB 251 


0281 


7D8E 


FC 


FCB 252 


0282 


7D8F 


PC 


FCB 252 


0283 


7D90 


FC 


FCB 252 


0284 


7D91 


FC 


FCB 252 


0285 


7D92 


FD 


FCB 253 1 


0286 


7D93 


FD 


FCB 253 


0287 


7D94 


FD 


FCB 253 


0288 


7D95 


FD 


FCB 253 


0289 


7D96 


FD 


FCB 253 


0290 


7D97 


FE 


FCB 254 


0291 


7D98 


FE 


FCB 254 


0292 


7D99 


FE 


FCB 254 


0293 


7D9A 


FE 


FCB 254 


0294 


7D9B 


FE 


FCB 254 


0295 


7D9C 


FE 


FCB 254 


0296 


7D9D 


FE 


FCB 254 


0297 


7D9E 


FF 


FCB 255 


0298 


7D9F 


FF 


FCB 255 


0299 


7DA0 


FF 


FCB 255 


0300 


7DA1 


FF 


FCB 255 


0301 


7DA2 


FF 


FCB 255 


0302 


7DA3 


FF 


FCB 255 


0303 


7DA4 


FF 


FCB 255 


0304 


7DA5 


FF 


FCB 255 


0305 


7DA6 


FF 


FCB 255 


0306 


7DA7 


FF 


FCB 255 


0307 


7DA8 


FF 


FCB 255 


0308 


7DA9 




END 
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The Scott Adams 
Adventure Series 

AN OVERVIEW 






■ MM 



£ 



I stood at the bottom of a deep chasm. CooJ air 
sliding down the sides of the crevasse hit waves of heat 
rising /rom a stream of bubbling Java and /ormed a mist 
over the sluggish flow. Through the swirling clouds I 
caught glimpses of two ledges high above me: one was 
bricked, the other appeared to lead to the throne room 
I had been seeking. 

A blast of fresh air cleared the mist near my feet 
and like a single gravestone a broken sign appeared 
momentarily. A dull gleam of gold showed at the base 
of the sign before being swallowed up by the fog again. 
From the distance came the angry buzz of the killer 
bees. Could I avoid their lethal stings as I had managed 
to escape the wrath of the dragon? Reading the sign 
might give me a clue to the dangers of this pit. 

I approached the sign slowly. 

And so it goes, hour after hour, as you guide your 
microcomputer through the Adventures of Scott 
Adams in an effort to amass treasures within the 
worlds of his imagination. 

By definition, an adventure is a dangerous or 
risky undertaking; a novel, exciting, or otherwise 
remarkable event or experience. On your personal 
computer. Adventure is that and more. 

For the user, playing Adventure is a dangerous or 
risky undertaking in that you better be prepared to 
spend many addictive hours at the keyboard. If you 
like challenges, surprises, humor and being 
transported to other worlds, these are the games for 
you. If you dislike being forced to use your common 
sense and imagination, or you frustrate easily, try 
them anyway. 

In beginning any Adventure, you will find yourself 
in a specific location: a forest, on board a small 
spaceship, outside a fun house, in the briefing room of 
a nuclear plant, in a desert, etc. 

By using two-word commands you move from loca- 
tion to location, manipulate objects that you find in the 
different places, and perform actions as if you were 
really there. The object of a game is to amass treasure 
for points or accomplish some other goal. Successfully 
completing a game, however, is far easier to state than 
achieve. In many cases you will find a treasure but be 
unable to take it until you are carrying the right com- 
bination of objects you find in the various locations. 

How do you know which objects you need? Trial 
and error, logic and imagination. Each time you try 
some action, you learn a little more about the game. 
Which brings us to the term "game" again. While call- 
ed games. Adventures are actually puzzles because 
you have to discover which way the pieces (actions, 
manipulations, use of magic words, etc.) fit together in 
order to gather your treasures or accomplish the mis- 
sion. Like a puzzle, there are a number of ways to fit 
the pieces together; players who have found and 
stored all the treasures (there are 13) of Adventure #1 
may have done so in different ways. 

In finding how the pieces fit, you will be forced to 
deal with unexpected events, apparent dead ends and 
Scott's humor, which is one of the best parts of the 
puzzles. 

If you run into a barrier like not being able to 
discover more rooms, don't give up. Play the game with 
some friends; sometimes they'll think of things you 
haven't tried. 

While I pondered how to reach the throne room — 
which I was sure contained the treasures of Croesus — 
the fog grew thicker and the hours passed. I realized 1 
would not be able to outwit Adams today.. .but maybe 
tomorrow. I marked my present location on my tattered 
map and began the long trip to the surface. As I drag- 
ged myself off to bed, I thought about other possible 
Adventures. 

But enough for tonight. Tomorrow — another 
crack at the chasm. —by Ken Mazur 

Reprinted with permission from 
PERSONAL COMPUTING MAGAZINE, FEB. 1980 

Copyright 1980 PERSONAL COMPUTING MAGAZINE 
1050 Commonwealth Ave.. Boston, Mass. 02215 



The 12 Scott Adams Adventures " 19 

Adventureland • Pirate Adventure • Mission Impossible 
Voodoo Castle • The Count • Strange Odyssey • Mystery 
Fun House • Pyramid of Doom • Ghost Town • Savage 
Island-Part 1 • Savage Island-Part 2 • Golden Voyage 
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the seeker of lost treasures in an enchanted 
realm of magical beings? Perhaps you're an 
astronaut, thousands of light years from 
earth, searching the galaxy's rim for 
the fabulous treasures and ad- 
vanced technologies of a 
long-dead civilization. Maybe 
you're the plunderer of 
ancient pyramids in a 
maddeningly dangerous 
land of crumbling ruins, 
and trackless desert 
wastes. 
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you wish to soar to 
other worlds, to behold 
wonders never beheld 

by mortal eyes, to dream 

unrestrained to the 

furthest limits of your 

^imagination. 



©GLT3E? 

The ADVENTURE SERIES 

by Scott Adams has been 

reviewed by every major 

microcomputing magazine, 

receiving only the highest 

praise for its mind-puzzling 

challenge & refreshing originality. 

Tens of thousands of adults and 

children have matched wits with 

the Adventure Master. Now, it's your 

turn, if you crave the challenge and 

panorama of the exotic, touched with 

sparkling humor, then the Adventure Series is for you. 
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dventut€ 

INTERNATIONAL 
A DIVISION 01 SCOT! M)AM8 INC 

BOX 3435. LONGWOOD FL 32750 

(305) 862 6917 (QUESTIONS) 

ORDER FROM YOUR FAVORITE DEALER 

or CALL TOLL FREE (800) 3277172 

(ORDERS ONLY PLEASE 
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<£^ races? TOOTS 



Adventure Hint BooMAII 12] S 7.95 

Adventure Hint Sheet (Single) 1.00 

Commodore VIC (Cartridge) 39.95 

T I 99(4 (Tape or Disk) . . 29.95 

Requires Advoniure Command Module 

■Scott Adams Graphic Adventure Series 
Apple Oiskt-Full Color HiRes Grapni< 
1 12 Adventure Hint Book Incl 




: TRS-80 software? 
Here's a CHEAP CURE! 



The prescription for the Model I and III: 
CLOAD Magazine! 

A CASSETTE TAPE with 6 to 8 programs a month! 

Some past sensational medications 
Game — Caterpillar, Suns, CIA Adventure, Reversi. 
Practical — Securities, Energy, Tape Directory, Checkbook. 
Utility — Variable Dump, Display, Edit, Code It. 

Tutorial - Planets, Spell Eqq, Atomic Tabie, Geometry 

At about 75 cents a program, a subscription to CLOAD 
Magazine is just what the doctor ordered. 



The Bottom Line: 

1 year (12 issues) $42.00 

6 months (6 issues) $23.00 

Single copies 

Back 6SL.es $ 4.50 

Good Games #1 $12.00 

Adventures #1 . $ 1 3 CO 

•Temperature and prices rising July 1, 1982 

California residents add 6% to single copies 
North Amenca — First Class Postage Included 
Overseas — add $'0 to subscriptions, and 
$1 to single copies. Sent AO rate. 



The Fine Print 

All issues from Oct 78 on available 
— ask for list (24 Level I issues also). 
Programs are for I6K Level II, 16K 
Model III, and occasionally for disks. 
TRS-tO is a trademark of Tandy Corp. 

MasterCard/Visa welcome! 



W L. W H LJ Magazine Inc. 

PO. Box 1448, Santa Barbara, 

CA 93102 (805) 962-6271 

^102 



For the Extended BASIC COiJ 



POCKETBOOK SURGERY NOT REQUIRED 



Is your CoCo table-ridden, drinking 
up electrical juice but not getting any 
software solids? A prescription of 
CHROMASETTE Magazine will stop 
the hardening of the ribbon cables. 

The doctor explained that 
CHROMASETTE Magazine is a cas- 
sette tape with 6 to 8 quality programs 
on it. A healthy mixture of games, tuto- 
rials, utilities, and practical programs to 
nurture your computer every month 
No finger exercises necessary. Just load 
one! run 

Keep CoCo's health costs low A 
subscription to CHROMASETTE 
Magazine is good, cheap medication 
(under 75 cents a program). 



The Fine Print: 

All issues from July 81 on available 
ask for list. Programs are for the 
Extended BASIC model only. 

MasterCard/Visa welcome! ■ 



Magazine 




$ The Bottom Line: 

| 1 year (12 issues) $45.00 

| 6 months (6 issues) $25.00 

Single copies $ 5.00 

Calif, residents add 6% to single 

copies. 

North America — First Class Postage 

Included. 

Overseas — add $10 to subscriptions, 

and $1 to single copies. Sent AO rate. 

MasterCard/Visa welcome! 



RO. Box 1087 Santa Barbara, 
CA 93102 (805)963-1066 
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"Lines 16-20 are for your 
experimental delight" 

experimental delight. The code at this point 
is normally set up to bypass itself. If the 
byte at location $7C20 is changed to a value 
greater than zero your loop will be executed 
that number of times. I've tried shift and 
rotate opcodes to good effect. 

Lines 23-25 calculate the actual X and Y 
coordinates of the pixel to be set using the 
current angle in conjunction with the calcu- 
lated radius at that angle. 

Lines 26-43 use the available ROM rou- 
tines to either set the pixel or draw a line to 
that pixel. The option to draw a line or a dot 
is taken at line 26 with a "do branch always 
or do a branch never" instruction. This is set 
from within the accompanying Basic code. 

Lines 46-48 continue the pixel-setting 
loop until a complete pattern is drawn. At 
that point a return is made to Basic. 

Lines 49-66 comprise a subroutine to de- 
termine the X and Y coordinates, based on 
the current radius. The Y coordinate is 
closely watched to ensure it doesn't stray 
above 191. If it does, the routine wraps it 
back around to the top of the screen. 

Lines 67-86 perform the task of multiply- 
ing a number (either the radius or a scaling 
factor) by a sine-cosine value, as given in 
my trig table. As sines in normal trigonome- 
try take on values from minus one to plus 
one, and my table returns values from zero 
to 255, this routine ensures the calculations 
work out right with those non-trig values. 

Lines 87-101 are a kludge which allow the 
current X or Y coordinate to be scaled down 
even after it's been through the required 
sine/cosine calculations. There are two rea- 
sons for needing a scaledown routine. It 
allows you to compress the X and Y coordi- 
nates so they fit squarely inside a 192 by 
192 pixel grid. Anything above this would 
lose the pattern at the top and bottom of the 
screen. Also, the whole pattern may be re- 
peated at a smaller scale to give the effect 
of patterns within patterns. You'll see an ex- 
ample or two of this in the photographs. 

Lines 102-126 are the routine which ex- 
tracts the sine or cosine value from the 
table according to a given angle. The rou- 
tine determines which quadrant the angle 
lies in and alters the returned value as per 
the mirror-image idea previously discussed 
in Part 1 of this series. 

Lines 127 onward are the sine values 
from zero to 89.5 degrees in half degree 
increments. Remember, the sine of zero de- 
grees is zero, which I take to be the center of 
the screen on the X axis. Hence, I return a 
value of 128 for zero degrees and increase 
as the angle approaches 90 degrees. Let me 



"Let me reiterate that this is the wrong 
way around for normal Y axis plotting. " 




Photo 3 



Photo 4 



reiterate that this is the wrong way round 
for normal Y axis plotting. This is taken care 
of at line 58 in the source code. 

Crunched Numbers 

The machine code does the number- 
crunching required to do a fast single 
pattern. Once that's done, it returns to the 
Basic program. In the current setup it's 
the Basic program in Listing 2 that controls 
the parameters which are POKEd into the 
machine code program. 

The Basic program decides what sort of 



spirograph will be drawn. Each time the pat- 
tern is drawn by the machine code, the Ba- 
sic program can change one or more quali- 
ties of the spirograph and use the machine 
code to draw that variation, allowing layer 
upon layer to be put down with subtle or not 
so subtle changes. You also have the option 
to pause or break execution accord- 
ing to your artistic judgement during the 
times the Basic program is in control. Once 
the machine code starts it can't be stopped 
until it completes the loop. 
One of the fascinations of this design 



process is watching the changes occur and 
observing as unexpected features come 
and go. The creation of heart shapes in 
Photo 2 is an example of this. The hearts 
magically appear out of nowhere and final- 
ly disappear like Valentine's day. 

There's not much to explain regarding 
the workings of the Basic code, which sim- 
ply asks for the required parameters and 
POKEs them into the machine code. If 
changes are required between patterns, the 
program ensures no invalid numbers are 
POKEd by monitoring sensitive values at 




Photo 5 



Photo 6 
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". . . in the highest resolution mode, when using black 
and buff, the television gets confused. " 



lines 360 to 420. Like the program in the 
March issue ("The Editor's Choice," page 
78), this is meant to be an experimental 
setup— a computerized arts lab. 

If you really try hard you can crash the 
program especially in the machine code 
phase. Take extra special care with the 
user-defined radius modifications. These 
are contained in the Basic program listing 
as a Remark statement; be sure you have 
some idea of what you're doing before you 
unlock them. If the program starts drawing 
circles over the ceiling or the cat, it's 
probably crashed. Some of the photograph- 
ic examples — notably the butterfly 
shape— were obtained with the user radius 
modification, so you may get some ideas 
how to use this facility. 

Here's an overview of some points of in- 
terest in the program: Line 20 protects the 
machine code routine at hex 7C00 and 
above, defines the entry point of the routine 
and sets a scale factor. This scale factor 
determines the size of the first drawn 
design; it's normally set at 255 (maximum) 
but you can change it to lesser numbers to 
create smaller patterns. A Remark state- 
ment follows, containing the user repeat 
factor and opcode to use for your ex- 
perimental purposes. The X Step and Y Step 
entries change the center of each suc- 
cessive pattern by the number of pixels you 



choose. If you opt for no X Step, the 
spirograph will be drawn dead center; if you 
specify a step rate, it will be drawn starting 
at the left hand side. The Angular Offset en- 
try allows you to lay each pattern down at a 
different rotational angle from the 
preceding one. This can be a positive or 
negative number of degrees, respectively 
achieving clockwise or counter-clockwise 
steps. The Scaledown factor lets you 
reduce the size of each spirograph until it 
disappears and then reappears inside out. 
This is input as a pixel value; e.g., an input 
of five reduces each successive radius by 
five pixels or its diameter by 10 pixels. 

Those of you without an assembler will 
have to POKE in the machine code from a 
For. . . Next loop in Basic or from any 6809 
machine code monitor. You should start 
POKEing from hex address $7C00. The 
bytes to POKE are found in column three of 
the source code listing. You can use a dif- 
ferent origin if you like, as the code is writ- 
ten using the 6809's relocatable opcodes, 
but you'll need to change all the corre- 
sponding POKEs in the Basic program. 
Rather you than me. 

Color Arty-Facts 

In line 160 of the Basic program you'll see 
that I use PMODE 4,1 to get the highest pos- 
sible resolution. This can be changed to 



20 CLEAR50,&H7C00:DEFUSR=&H7C00:SC=255':UR=1:OC=87 

40 INPUT"* LOBES" ; NL 

60 INPUT"LINES OR DOTS ( L ,D) " ; LD$: IFLEFT$ ( LD$ , 1 ) ="L"THENPOKE&H7C 

2D,33ELSEIFLEFT$(LD$,1) <>"D"THEN60ELSEPOKE&H7C2D , 32 

80 INPUT"X STEP";XS:IFXS=0THENXO=32 

100 INPUT"Y STEP";YS 

120 INPUT"ANGULAR OFFSET" ;AO:AO=AO*2 : IFAO<0THENAO=720+AO 

140 INPUT" SCALEDOWN ";SD 

160 PMODE4,1:PCLS0:SCREEN1,1 

180 POKE&HB5,255 'COLOR BYTE 

200 POKE&HB6,0 'PMODE BYTE 

220 POKE&H7ClE,UR:POKE&H7C21,OC 'USER DEFINED RADIUS MODIFICATIO 

N 

240 'POKE&H7C65,32:POKE&H7C66,0 'DISABLES X-AXIS SCALING. 

141 & 31 REENABLE IT. 
260 IFAN>255THENPOKE&H7CBC, AN/256 : POKE&H7CBD ,AN-INT ( AN/256) *256E 
LSEPOKE&H7CBC , : POKE&H7CBD , AN 
280 POKE&H7C68,XO 
300 POKE&H7C77,YO 
320 POKE&H7CA0,SC 
340 X=USR(NL) 

360 XO=XO+XS:IFXO>255THENXO=XO-256 
3 80 YO=YO+YS : IFYO>255THENYO=YO-256" 
400 AN=AN+AO:IFAN>65536THENAN=0 
420 SC=SC-SD:IFSC<0THENSC=255 
440 'UR=UR+1 'USER'S MOD 
460 GOTO220 

Program Listing 2. Basic Code 
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PMODE 3 or less if you want to experiment, 
but the machine code doesn't take into ac- 
count any mode other than 4. Nevertheless, 
it's worth a try; I've produced some interest- 
ing patterns this way although I always 
revert to PMODE 4. 

Here's a thought: In PMODE 4 with 
Screen 1,1, there's supposed to be only two 
colors— black and buff. Where do all those 
blues and reds come from? I hate to say it, 
but I found the answer not from our friends 
at Radio Shack but from a piece of literature 
from Atari Inc. Those blue and red pixels are 
what's known as color artifacts; somewhat 
of a misnomer, considering that they're un- 
intended. It appears that in the highest re- 
solution mode, when using black and buff, 
the television receiver gets confused. The 
incoming video pixel information changes 
so fast and contains sc much high-fre- 
quency content that the color receiver 
thinks it has something to decode other 
than a luminance signal. It mistakenly inter- 
prets this high-speed video transition as a 
chrominance signal and decodes it as such, 
producing a color which at a given pixel lo- 
cation is not under control of the computer. 

This phenomenon occurs only during the 
video-voltage transition caused by a single 
pixel— once a number of pixels run into 
each other, the color decoder correctly rec- 
ognizes the chrominance information and 
displays the buff color. However, by spac- 
ing single pixels at every other interval, the 
overworked decoder thinks the color is 
something other than what it should be. By 
setting pixels at even dot locations you'll 
get one color, at odd locations you'll get the 
other. By placing two together you get yel- 
low, and as more are added, the color fades 
to buff. 

Color artifacts are something we can 
definitely use to advantage. By spacing our 
patterns two pixels apart, the dots will 
stretch out into lines of a definite color. By 
starting the same pattern from an odd or 
even dot position, the colors will be differ- 
ent in each pattern. Also, by judicious mix- 
ing of black, blue, red, yellow and buff, 
many other colors can be obtained. That ex- 
plains the myriads of colors appearing in 
some of my designs. Don't ask me to ana- 
lyze each individual color in those patterns, 
though; some of the color combinations de- 
fy easy analysis. Suffice it to say that some 
bedazzling combinations of color can be 
conjured from a palette of black and buff. 

Pep Talk 

I have a feeling some readers may have 



dropped out on the way. To those of you 
that made it this far: congratulations! 
Those of you that skipped the heavy stuff 
just to get to the icing on the cake— shame 
on you, but enjoy it anyway. I've derived 
some pleasure from sharing my enthusi- 
asm for a fascinating subject. 

Now for the best part: entering the code 
and trying out some of those creations for 
yourself. Table 1 lists the parameters to use 



"/ am acting under inspiration to 
take this one step further. . . " 



to recreate the designs we've published; to 
use the variables UR and OC, don't forget to 
remove the remark apostrophe in line 20 of 
the Basic code. Then enter the variables 
directly into the same line. 

As far as I'm concerned, that's only the 
start. I'm acting under pure inspiration to 
take this one stage further to a Spiro com- 
mand which would be executable from with- 
in a Basic program. The idea is to be able to 



create true spirographs of almost any 
shape and size by specifying the parame- 
ters from ordinary Basic variables. ■ 



A tape of the source and object code with 
the Basic program including data to run 
these and other patterns is available from 
the author for $15: P.O. Box 495, Peter- 
borough, NH 03458. 























Pholo# 

1 


Lobes 
7 


D/L 

D 


X Y 
Step Step 




Ang 
Offset 

5 


Scale 
Offset 

10 


Comments 

Pause when retouches 
edge 




2 


2 


L 


2 








39 loops 


3 


2 


L 


32 








To completion 


4 


6 


D 


16 








To completion 
(UR= 1:0C = 87) 


5 


2 


L 


16 








To completion 
(UR = 3:0C = 87) 


6 


7 


D 
D 








12 


16 loops 

(UR = 2:0C = 87) 


7 


2 








3 


15 loops 

(UR = 90:OC = 90) 






















Table 1. Design Parameters 
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PLUG BUG SYSTEMS 



FOR TRS-80 MODEL I 16K MACHINE 



c 



I2K. 



PLUG BUG PAKS PROVIDE INSTANT EXECUTION Or ANY PROGRAM TO UP 

NO CASSETTE LOADING - PROGRAMS ARE 'BURNEO' IN. 

PLUG BUG I PROVIDES A SMOOTH 6K MONITOR PROGRAM CONTAINING ALL NECESSARY 

FUNCTIONS TO CREATE AND DEBUG MACHINE LANGUAGE SOFTWARE, PLUS A TRACE 

MODE TO SINGLE OR MULTI STEP THROUGH ROUTINES AND DI SPLAY/LI NEPR INT THE 

PROGRAM COUNTER TRACE. 

PLUG BUG II PROVIDES 6K/12K OF EPROM MEMORY, FOR YOUR FAVORITE PROGRAMS: 
EDITOR ASSEMBLER OR ANY OTHER OF YOUR FAVORITE PROGRAMS. 



• OUR SERVICE PROVIDES PROGRAMMING OF PLUG BUG PAKS, 
TAPE SOFTWARE. 

• PLUG BUG III PROVIDES 6K OF READ/WRITE RAM FOR YOUR 
SOFTWARE DEVELOPMENT. A SWITCH PROVIDES READ ONLY 
OPTION FOR 'BOMB PROOF' OPERATION. 

• PLUG BUG BUS FOR USE WITH PLUG BUG I & 1 1 1 OR 1 1 & 1 1 1 . 

• PLUG BUG BURNER. 

•EACH PLUG BUG PAK HAS ITS OWN POWE- SUPPLY. 

• PLUG INTO WALL AND "GO". 

• COMPLETE PLUG BUG SYSTEMS INSTRUCTION MANUAL. 

• 10 DAY MONEY BACK WARRANTEE IF NOT SATISFIED. ^377 



FROM YOUR CASSETTE 



DPLUG BUG I 
DPLUG BUG II 




$84. 95 
6K-S84.95/12K-S94.95 



S94.95 
$99.95 
$24.95 
$14.95 



DPLUG BUG III 

DPLUG BUG BURNER 

DPLUG BUG BUS 

DRF.-PROGRAM SERVICE 

"0 ORDER YOUR PLUG BUG PAKS SEND 

CERTIFIED CHECK OR MONEY ORDER 

TO: RFC =3 BOX 300 

MT. K1SC0, NEW YORK 10549 



CITY. 



STATE 



.ZIP. 



CHECK /MONEY ORDER INCLUDED' FOR 

C.O.D. ON REQUEST. $ 

ADD $3.00 FOR SHIPPING 
NEW YORK RESIDENCE ADD 
OR PHONE 914/666-7672 



AND HANDLING. 
8' TAX. 



■See List of Advertisers on page 386 
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REVIEW 



From Computerware in California. 



Color Computer Utilities 



Power Pack and Color Diagnos- 
tics, Editor and Assembler 
Computerware 
Encinitas, CA 92024 
Color Computer 
$179.95 16K 

Scott L. Norman 
8 Doris Rd. 
Framingham, MA 01701 



Although Color Computer 
owners can be perfectly 
happy programming in Basic, 
eventually there comes the time 
todig into theother possibilities 
offered by the machine. You 
may want to experiment with 
machine language, or perhaps 
with word processing. If so, you 
are going to need at least some 
of the elements of a program- 
mer's tool kit— namely a moni- 
tor, editor and assembler; sever- 
al of these have recently be- 
come available. 

The Computerware system in- 
cludes both hardware and soft- 
ware elements for the 16K ver- 
sion. Owners of 32K machines 
or disk systems need different 
versions. 

The Power Pack and Monitor 

The heart of the system is its 
hardware component: a plug-in 
cartridge called the Power Pack, 
containing a monitor program in 
2K of ROM plus another 6K of 
static RAM (2716s and 2114s, re- 



spectively). The cartridge fits in- 
to the Color Computer's expan- 
sion ROM port. Since the ma- 
chine scans this port immedi- 
ately when turned on, it "wakes 
up" in the Monitor instead of in 
Basic; the prompt is MON: plus 
a non-flashing block cursor. 
There are commands to return 
you to Basic immediately so the 
Power Pack can be left plugged 
in all the time. Both ROM and 
RAM in the pack occupy loca- 
tions out of the range normally 
addressed by Basic: ROM, 
$C000-$C7FF (49152-51199 
decimal); RAM, $D000-$E7FF 
(53248-59391 decimal). RAM is 
available to Basic programs via 
POKE and PEEK commands and 
can also be used to hold pro- 
tected machine-language pro- 
grams if the proper loading ad- 
dress or offset is given. That is 
exactly what is done with the 
Color Editor. Like all monitors, 
the Color Monitor is a tool allow- 
ing the programmer to examine 
and change memory. This, 
augmented with additional com- 
mands, allows the Color Monitor 
to: have direct access to the 
6809's registers, save and load 
binary cassette files, use the 
RS-232 port to communicate 
with another terminal or with a 
printer in an echo mode, and de- 
bug software by setting break- 
points for program execution. 

The Commands 

Color Monitor commands 
consist of a single alphabetic 
character possibly followed by 



one or more hex arguments. 
Simply typing R (without using 
Enter) produces a display of the 
contents of the 6809's registers, 
while a jump to a specified ad- 
dress requires typing J and the 
address. Blocks of memory can 
be initialized to a given value by 
using the I command: I <starting 
address> <final address> <val- 
ue>. 

Memory can be opened, ex- 
amined and changed if desired 
by simply entering M and the ad- 
dress. You can then load memo- 
ry by typing valid hex charac- 
ters. 

With these commands alone, 
you can enter your own hand-as- 
sembled machine-language pro- 
grams or published programs. In 
the latter case, you would use 
the bytes in the second column 
of a standard Assembly- 
language program listing. 

Here is a quick example. Let's 
start by initializing all of the 
Power Pack's RAM to 3F (soft- 
ware interrupt): I D000 E7FF 3F. 
The Monitor provides the 
spaces as it recognizes each 
valid entry. This particular ini- 
tialization results in hash on the 
screen. Hitting Reset brings 
back the MON prompt, and we 
can enter a program starting at 
the bottom of Power Pack RAM 
with M D000. 

Next begin typing the ma- 
chine code; after every two 
bytes, the display scrolls up and 
shows the new address. When 
finished, the enter key brings 
you back to the Monitor. To exe- 



cute the program, use J D000. 

This is not the way to enter 
lengthy programs; use the Edi- 
tor/Assembler for those. Never- 
theless, I have found the Moni- 
tor very useful for quickly enter- 
ing and testing short segments 
of debugged machine language. 
Its real value becomes evident 
when working with it over a 
period of time and using its com- 
mands to probe the operation 
and status of the 6809 and the 
Color Computer's memory. 

The manual, while concise, 
offers a few goodies, such as a 
table of indirect addresses 
through which various Monitor 
routines can be accessed by the 
user. Presumably, these could 
even be called from Basic via 
the DEFUSR and USR(N) com- 
mands. 

Color Diagnostics 

The Color Diagnostics pro- 
gram is provided as a binary 
cassette file loading and auto- 
executing through the Monitor's 
L command. It is stored in low 
Power Pack RAM; you can reen- 
ter it from the Monitor by enter- 
ing J D000, as long as the pertin- 
ent memory has not been writ- 
ten over. 

The diagnostics are organ- 
ized around a set of nested 
menus. You needn't perform the 
tests in any specific order and 
there are plenty of quit options 
allowing you to exit whenever 
you please. The major tests, in 
order of presentation on the 
master menu, are: 
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• (P) Power Pack— tests both 
ROM and RAM, via a secondary 
menu. The ROM test calculates 
a checksum on the Monitor and 
displays the result (97 for very 
early Color Computers, 52 for 
more recent models). If the RAM 
test is selected, a third-level 
menu comes up offering the op- 
tions of rotating bit, conver- 
gence, and latency tests. 
Should an error occur in any of 
these, an appropriate diagnos- 
tic message is printed. 

• (M) Memory — Test RAM in 
the Color Computer itself, just 
as for the Power Pack. 

• (R) RS-232— Test the serial 
I/O Port if a shorting plug has 
been inserted. 

• (J) Joysticks— Checks the 
left and right joysticks and their 
associated A/D circuitry using 
the secondary menu. 

• (B) Basic ROMS— Test both 
standard and Extended Color 
Basic ROMs by calculating 
checksums (2B and 1D, respec- 
tively, for the 1.0 versions of the 
interpreters). 

• (T) Tape— Tests the I/O ca- 
pabilities of the cassette inter- 
face by recording and reading 
cassette file. If everything is sat- 
isfactory the screen briefly dis- 
plays a complete alphanumeric 
and graphic character set, fol- 
lowed by the message "Cas- 
sette Tests Good." 

• (S) Sound— Causes two 
musical scales to be sounded 
while displaying a piano key- 
board graphic followed by the 
five-note Close Encounters 
theme with a similar display. 

You may invoke menu selec- 
tions at any point by entering 
the first character of the test 

name. 

Color Editor 

The next program in the hier- 
archy, the Color Editor, provides 
powerful commands for manag- 
ing text: Assembly-language 
source code, Basic or English. 
The program searches for and 
changes strings of characters in 
one or many lines of text, and 
moves lines of text within a file, 
meaning it serves as an elemen- 
tary word processor, as well. 

The Editor (which shares a 
cassette with the Color Assem- 
bler) is also loaded with the 

• See List ol Advertisers on page 386 



Monitor's L command. It resides 
in the Power Pack RAM between 
D000 and E0B7. Autoexecution 
begins with the prompt EDT: 
plus a static cursor, identifying 
the command mode used for al- 
most all operations except text 
entry. For this, use the input 
mode accessed by the com- 
mand I from command mode. 

The simplest way to become 
familiar with the Editor's use is 
to follow the manual's example 
and enter something. Hitting the 
I command gives you a machine- 
generated line number and co- 
lon for a prompt. In my version of 
the tape the first line number is 
10, this may vary. Note that this 
is not a Basic line number. It just 
identifies each line of text to the 
Editor itself. A new identifica- 
tion number is generated each 
time you signal the end of a line 
by pressing Enter. In my tape the 
increment is also 10. 

To illustrate the syntax for 
some of the most useful com- 
mands, use the Editor to write a 
simple Extended Color Basic 
Program— one which draws a 
high-resolution circle at the cen- 
ter of the screen. Remember 
that the Basic line numbers 
have to be entered as though the 
Editor were not involved. After 
entry, the display might look like 
this: 

10: 100 PMODE 4,1:PCLS:SCREEN 1,1 
20: 200 CIRCLE(128,96),50 
30: 300 GOTO 300 
40: 

At this point, the Break key re- 
turns you to the command 
mode. To write this program to 
tape (as an ASCII file) enter: 
CS "filename". 

You can not run programs di- 
rectly from the Editor. 

Editing 

Suppose you want to change 
the radius of the circle from 50 
to 75 units, move to line 20 (use 
the identification numbers, not 
the Basic line numbers) by an- 
swering the EDT: prompt with 
20. The syntax for changing the 
target string 50 to 75 is: 

C/50/75/. 
This works if there is only one 
occurrence of "50." As you 
might suspect, there are op- 
tional additions to this com- 
mand letting you pick one out of 



The Cornsoft Group presents: 

%»l SPACE CASTLE 

FOR TRS-80 MODELS I & III 



Will you save the Andromeda Galaxy by destroying the 
Space Castle or will the evil warlord Yugdab continue to 
rule, uncontested? Locked in battle with Yugdab, your main 
defense is your ability to skillfully handle your ship and it's 
projectiles. If you are not careful, Yugdab's intelligent mines 
will hunt you down and blow you into space dust. Written in 
machine language, Cornsoft's New Arcade Game, Space 
Castle, has fast action and exciting sound. Yes, Joystick 
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FOR THE TRS-80 COLOR COMPUTER 



It's eat or be eaten. That's right!!! Now color computer own- 
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are raving about, like Mrs. David Cullen, Germantown, 
Maryland, who writes: 
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this on our TRS-80 Model III, without Joysticks. I hon- 
estly don't play all day — my three children wouldn't 
allow it — but I think it's great fun!! 

Congratulations on the Third Highest Score to date: 
(Highest: 289,565 by David Leventhal) 
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ment, Graphics, Sound and Real Time Action that have 
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COLORSOFT 
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* Games 



"Quality Software At Affordable Prices For the TRS-80' Color Computer " 

* Educational * Home/Personal * Financial 

We Also Offer: * Custom Programming * Royalties For Software 
* * * Over 50 Software Items Currently Available * * * 
Documentation and a Limited Guarantee with all COLORSOFT™ Software. 



• •• 4K Color BASIC Programs • •• 
INVADERS. 10 Skill levels, phaser sound and exploding bombs 
DUMP. Explore the memory of the color computer-output to screen or printer 
TAG: 2 player game of chase. Fast action and fun 

• •• 16K Color BASIC Programs • •• 

CASINO: One armed bandit, blackjack, and dice games 

DISASSEMBLER: Disassemble machine language programs (screen or printer) 

AUTO MINDER: Keep track o! fuel usage, tune-ups, oil changes, etc., creates and 

maintains cassette data files for multiple autos 

ESCAPE: Intermediate advent, with GRAPHICS Player must find and decipher various 

clues to escape. Graphics give player the feel ot being there (mach. lang. for fast 

action) 

• •• 16K Ext. Color BASIC Programs • •• 
SASPUS: Beginner's adventu/e game. Player must find and destroy the deadly mutant 
in a genetic nuclear research center. Each game randomized 
PIRATE TREASURE: Advanced beginner's adventure-the player must find the pirate's 
treasure which is hidden in a cave ol over 40 rooms 
ADVENTURE COMBO: Combination ot SASPUS and PIRATE TREASURE 
FLIPUM: Color computer version ot the OTHELLO type games 
MAILING LIST: Cassette or disk tiles lor names and address with comments. Cross 
referencing of information and name seaches are featured 

PEEK 'N' SPELL: Flashes word or letter on screen lor children's spelling drill-New 
word files can be created and stored on cassette tape 

MATH DERBY: Math drill in a horse race game tor 1 to 3 players-variable difficulty 
LOAN: Amortization schedules with breakdown ot monthly payments (avail . in 4K ) 
STOCK ANALYZER: Keeps track ot stock prices and maintains portfolio data base includes 
additional program lor pro|ecling price trends 

COLOR CUBE: CoCo version ot the popular cube puzzles Features include solution 
by computer and saving partially solved puzzle on tape 
DISK BACKUP: S.ives Diskette based programs onto cassette and checks lor disk errors 



$12.95 
8.95 
10.95 



$12.95 
13.95 



10.95 



11.95 
16.95 
12.95 

20.95 

10.95 
11.95 
10.95 

16 95 

17 95 
14.95 



Send $1 tor catalog containing lull descriptions ot all available software and receive $2 discount 
coupon Free catalog with an order from this ad 



TM 



GOLDLABEL BLAiN 



♦ PREMIUM 5 SCREW SHELL 



• DIGITAL DATA QUALITY 
♦ GUARANTEED 



♦ LOW NOISE ♦MADE IN USA 



1 DOZEN C-10 LENGTH $8.00 » $2.00 shpg 1 DOZEN C-30 LENGTH $11.00 + $2.00 shpg. 

2 DOZEN C-10 LENGTH $15.00 + $3.50 shpg. 2 DOZEN C-30 LENGTH S20.00 + $3.50 shpg 

Individual storage boxes (sold only with cassettes] $2 40 per dozen 

CASSETTE CADDY $5.49 • $1.50 shpg. /2 tor $10.00 . $2.50 shpg /$3 95 with cassette pur- 
chase (no shpg. chg on caddy] 

Foreign orders include shipping at 16 oz per dozen tapes/9 oz. per caddy/13 oz per doz boxes 
Shipments in U.S. are by UPS (no delivery to PO boxes) Add $1.50 per doz. tapes tor First Class Mail 



!!! NEW !!! CASSETTE CADDY !!! NEW !!! 

TIRED OF MISPLACED TAPES AND A CLUTTERED WORK AREA' TRY OUR HINGED TOP SMOKEC 
PLASTIC CADDY THAT HOLDS 12 TAPES IN ONE HANDY LOCATION 





Visa and Mastercard accepted (include expiration date) Orders paid by cashier s check, money order 
or bankcard are shipped within 48 hours. Personal check takes 1-2 wks. No COD. Some foreign sales 
are restricted. Texas residents add 5% tax on blank cassettes and storage units. 

SEND ORDER TO: COLOR SOFTWARE SERVICES 

PO BOX 1723 
GREENVILLE, TEXAS 75401 

• DEALER INQUIRIES INVITED •QUANTITY DISCOUNTS AVAILABLE 



many occurrences. You can also 
change a target string in each of 
a specified number of lines with 
a single command. 

If you want to draw a smaller 
concentric circle, and have it ap- 
pear first in the Basic program, 
the Editor requires that you 
specify the line after which you 
want to make an addition, so in 
this case our command is 101. 
The result is a prompt of 1 1 . You 
can now go ahead and enter, 
say, 11: 150 CIRCLE(128,96),25 
before exiting by hitting Break. 
If you decide at this point that 
the new circle should be drawn 
after the old, merely use the Edi- 
tor's Move command. In its most 
general form, it allows starting 
at any line and moving a speci- 
fied group of lines to a position 
following another. For this ex- 
ample enter: 1 1 MO #20 1 to start 
at line 1 1 and move one line to a 
position betfind line 20. 
Remember to change the Basic 
line number, though. 

This much of the Editor's ca- 
pability may not seem too im- 
pressive. After all, Extended Col- 
or Basic has some powerful 
editing commands of its own, al- 
though they do not include the 
selective movement of lines of 
code. Remember though that 
the Editor can operate just as 
easily on any sort of input mate- 
rial. Its command suite com- 
prises a total of 36 commands, 
which may be grouped into: 

• Line display and movement 
commands for screen display or 
printouts. Lines may be refer- 
enced by number, scrolled to by 
use of the up and down-arrow 
keys, or searched for according 
to their contents. 

• Line modification and re- 
placement commands, includ- 
ing those for line movement, de- 
letion and insertion. 

• Pattern modification and 
replacement commands for 
editing strings within a line. 

• Cassette commands for 
saving, loading or writing, which 
outputs a portion of a text file in 
memory to a cassette. All cas- 
sette files are in ASCII form, and 
the Editor chains files read in 
succession— no need for the 
POKEs and PEEKs used to 
chain standard tokenized Basic 
files. 



There are also some miscella- 
neous commands, such as 
those used to clear the text area, 
renumber lines of text, turn off 
the line numbers for printing, ex- 
it to Basic or the Color Monitor. 

This is the sort of control you 
need to enter Assembly-lan- 
guage programs of any length. 
Do not be too quick to downplay 
the Editor's usefulness to the 
Basic programmer. The ability 
to find every occurrence of a 
variable name, and perhaps 
change it, can be very handy. 

As a Word Processor 

All of the editing features 
work just as well with English 
text as they do with anything 
else. The people at Computer- 
ware are obviously aware of the 
appeal of plain language pro- 
cessing, and they have included 
a few commands which are es- 
pecially useful for this kind of 
work. These make the Color 
Computer emulate a typewriter 
in some respects, and they add 
at least a measure of printer 
control for generating a pleas- 
ing output format. 

Two of the most useful are the 
Tab and Bell commands. The 
former sets the column(s) to 
which the final text indents in re- 
sponse to the tab key (Shift-®), 
while the latter causes a tone to 
sound when the text being en- 
tered reaches a preset column. 
A line of text may be up to 107 
characters long, depending on 
your printer. The Editor operates 
on physical lines, not logical 
lines, meaning a carriage return 
(Enter) is required whenever you 
reach the end of your printer's 
line length, even if your sen- 
tence isn't finished. You just 
pick up on the next line, as you 
would with a typewriter. The Tab 
command sets the indentation 
for the left margin, as well as for 
the start of paragraphs, sub- 
headings, and so on. This 
means you must follow each En- 
ter with a Shift-® to align your 
left margins. 

This sounds more complex 
than it is; let's run through an ex- 
ample: Start by defining the tab 
positions. Let's say you have an 
80-column printer, so an average 
line should be 60 characters 
long and start at column 10. 
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Paragraphs should be indented 
an additional five spaces. The 
appropriate command is: TAB 
10 15. You can set as many as 20 
tab positions. 

Next, set the bell. If a typical 
line is to end at column 70, we 
can get five spaces worth of 
warning with: BE 65. 

The whole setup procedure is 
geared to the printed page for- 
mat; the 32-column screen dis- 
play width never comes into 
play. 

You are now ready to enter 
text. The next command is I, 
as for the previous Basic exam- 
ple. The familiar Shift-0 com- 
mand toggles you into a type- 
writer-like mode, in which lower- 
case is the normal output and 
you must press the shift key 
every time you want an upper- 
case character (until Shift-0 is 
entered again, of course). With 
this done, you can start typing. 
Hit Shift-® twice to get to the 
indentation for your first para- 
graph; these are "logical tabs," 
meaning the cursor doesn't 
move in the input mode, but the 



final text will still look right. 
Type until the tone sounds and 
hit Enter. The Editor-assigned 
number for the next line comes 
up to prompt you. You have to 
remember to begin each line 
with the Shift-® for the left 
margin if you are using it, 
though. If you would like the 
printout to be double spaced, 
the text must be padded with a 
blank line between each line of 
print by using two Enters in suc- 
cession. 

You can use any of the Color 
Editor's commands to refine the 
text, with the line numbers serv- 
ing as location references. The 
up and down arrows help you 
scroll, and using them in con- 
junction with the shift key takes 
you to the top or bottom of the 
file from any position. This 
holds for printing, too. For clean 
print, you can toggle the line 
numbers off by responding to 
EDT: with LN. Then turn on your 
printer and enter: (Shift-up ar- 
row)P(Shift-down arrow). You 
will get a printout of your entire 
text file. You can use leading 



and trailing line numbers in- 
stead of the arrows with the P 
command if you want only a par- 
tial printout. 

This application of the Color 
Editor can be very useful even if 
it isn't a full-blown word proces- 
sor. It will not automatically cen- 
ter or right-justify material, nor 
will it send control characters to 
a Printer. Its strengths lie in its 
editing capabilities, but at the 
very least it allows Color Com- 
puter owners to get a taste of 
electronic text manipulation. 

Color Assembler 

The final component of the 
Computerware Tool Kit is a resi- 
dent two-pass assembler for the 
conversion of 6809 Assembly- 
language programs into ma- 
chine language. It loads with the 
Monitor's L and occupies about 
8K of Color Computer RAM— 
specifically, from $0600 to 
$2600. Full 139 Motorola-de- 
fined mnemonics are supported, 
as are several directives and 
pseudo-ops. The former are 
commands which do not pro- 



duce object code upon assem- 
bly, but rather alter the action of 
the Assembler itself. Examples 
are: END, which terminates the 
reading of the input file; EQU, 
used to define labels; and OPT, 
which allows the source code to 
set various assembler controls 
for program listing, pagination, 
and so on. Pseudo-ops, on the 
other hand, are used to generate 
numeric or string constants, 
they cause the generation of ob- 
ject code, although they them- 
selves are not part of the 6809 in- 
struction set. 

The manual, 18 pages plus ap- 
pendices, presents complete 
syntax listings for both direc- 
tives and pseudo-ops. There are 
several options for most of 
them. The convention followed 
in their printed description is 
that requires spaces, argu- 
ments, and so on are enclosed 
in angular brackets, options in 
square brackets. Thus the prop- 
er syntax for the END directive 
is: 

<space(s)> END [<(space(s)> 
<expression>]. 
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All this says is than when typing 
in the directive as part of an As- 
sembly-language program, lead 
off with at least one space be- 
fore typing END. If you wish to 
add an optional expression 
(which in the case of this direc- 
tive is interpreted as the transfer 
address), then the expression 
must be separated from END by 
one or more spaces. 

It is quite possible to write (or 
at least copy) Assembly-lan- 
guage programs without using 
many of the options available. 
The Assembler manual contains 
as an appendix a short program 
which accepts a character 
string from the keyboard and 
prints it, reversed, on the screen. 

To make a useful machine 
language program out of it, first 
load the Color Editor and use it 
to enter and correct the Assem- 
bly language using the syntax 
listings in the Assembler manu- 
al. You needn't set a lot of tabs 
to get a neatly aligned listing at 
this point. The Assembler takes 
care of that. Just remember to 
insert a leading space if a line 
doesn't have a label field. When 
the program has been entered 
and corrected, use the Editor's 
CS command to save it to tape. 

Now you must load the As- 
sembler. Unfortunately both the 
Editor and Assembler cannot be 
co-resident in memory. When 
the Assembler autoexecutes, it 
presents a list of eight 
assembly-time options, their 
default status, and a prompt of 
ASM: plus a flashing cursor. The 
options control screen display 
and printer listing; some of them 
interact with and override op- 
tions listed in the Assembly- 
language source code just 
created. For the sample pro- 
gram, the manual recommends 
just one option be used: Wait, 
which causes the display of 
Assembler output to pause 
whenever the screen fills. This is 
set by entering + W in response 
to the ASM: prompt. 

Once you press Enter, the op- 
tion list changes to reflect your 
input, and you receive a prompt 
to position the tape (the source 
code) for pass 1. Pressing Enter 
when the tape and recorder are 
set causes the source file to be 
read. After this happens, the As- 
sembler builds the symbol table 
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(instantaneously, for the short 
sample program) and prompts 
you to position the tape for pass 
2. This means rewinding the 
source tape to the beginning 
and reading it again. This time 
the source code is actually con- 
verted to object code, stored in a 
memory buffer, and a prompt of 
"paused. . ." is displayed. As- 
suming the List option has not 
been disabled, hitting any key 
which produces a printable 
character now results in a list- 
ing on the screen. The listing re- 
sembles the full format we are 
used to seeing in published ma- 
chine-language programs, ex- 
cept that every line is split into 
two. The lower member of each 
pair is our source code; the up- 
per consists of a hex address 
and the corresponding machine- 
language expression produced 
by the Assembler. 

This is in the completely 
tabbed form familiar from pub- 
lished listings. The "paused. . ." 
prompt is again displayed at the 
bottom of the screen, indicating 
that any printing key will cause 
a display page advance. When 
you get to the end of the pro- 
gram listing, the Assembler 
sorts and prints the symbol 
table generated in pass 1. It then 
(hopefully) informs you that no 
errors occurred and prompts 
you to position a blank tape for 
pass 3. Set things up to record, 
and press Enter. The machine- 
language program is now re- 
corded as a binary file compati- 
ble with the Color Monitor's L 
command (although not with 
Basic's CLOADM). After record- 
ing, the Assembler returns im- 
mediately to command mode. 
Entering M takes you back to 
the Monitor, and you are set to 
load and run. 

The necessity of making a 
tape of the machine code before 
running (the inability to assem- 
ble directly to memory) is the re- 
sult of a conscious choice by 
the program's authors. Paul 
Searby of Computerware said 
this derives from their desire to 
permit the Assembly-language 
programmer the maximum free- 
dom in locating a program in 
memory. 

There are many options avail- 
able to the programmer, and 
careful study of the manual is 



necessary to gain an under- 
standing of such things as the 
way assembly-time errors are 
handled. Even then, you will 
need other material to become 
an Assembly-language pro- 
grammer; the manual makes no 
pretense at being an introduc- 
tory course. 

Summing Up 

At the outset you will be deal- 
ing with the "tyranny of modes." 
You must get used to flipping 
back and forth between, say, the 
Monitor and the input and com- 
mand modes of the Editor. This 
can be especially daunting to 
the inexperienced user. Even af- 
ter becoming accustomed to the 
idea it can be humbling to find 
yourself entering a syntactically 
correct command that happens 
to be jibberish for the prompt 
you have just received. It 
shouldn't dampen anyone's en- 
thusiasm for these programs, 
though. 

In the same vein, the manuals 
can be cumbersome. If you're 
not accustomed to juggling sev- 
eral computer manuals on your 
knee while working out a prob- 
lem, I suggest taking things nice 
and easy. Start with the diag- 
nostics program to make sure 
that everything is okay with your 
computer and Power Pack. Now 
read the Power Pack/Monitor 
manual, especially the summary 
and descriptions of the com- 
mands. Use the Monitor to look 
around in memory, and enter 
some hex characters by hand. 
Become familiar with the pro- 
cesses of changing memory 
contents and jumping to arbi- 
trary starting points. Again, if 
you are not yet familiar with As- 
sembly language, you will not be 
able to take advantage of most 
of these capabilities; you may, 
however, begin to get a feeling 
for how the operation of the sys- 
tem works. 

As I have tried to indicate, a 
Basic program provides a pret- 
ty good vehicle for exploring 
the Editor's capabilities. Try 
playing with the search and 
change capabilities in particu- 
lar. If you have a printer, you 
will probably want to exercise 
the Editor on text. 

The Assembler should be last 
on your list. You can exercise it 



by keying in the sample program 
from the manual; in fact, enter- 
ing just the machine-code por- 
tion is an interesting way to be- 
come comfortable with the Mon- 
itor. Go through the complete 
editing and assembly process 
described above. Now you are 
set to dig into a reference book 
and get into Assembly-language 
programming. 

As far as the operational as- 
pects are concerned, the use of 
opposite sides of one cassette 
for the Editor and Assembler is 
inconvenient. You have to re- 
move this cassette after loading 
the Editor in order to record your 
edited source code anyway. 
Nevertheless, it is annoying to 
have to fully rewind side 2 of the 
tape to get to the Assembler 
when you are ready for it. My 
own preference would be to 
have the Editor and Assembler 
recorded sequentially on one 
side of a cassette, with a mod- 
est gap between them. 

The Power Pack is useful for 
storing various utilities in pro- 
tected memory when running 
Basic programs in main memo- 
ry. The 6K of fast RAM repre- 
sents a fair portion of the cost of 
the 16K Tool Kit. 

Costs and Options 

There are cassette versions of 
the Monitor, Editor and Assem- 
bler which run in 32K machines 
without the Power Pack, and 
they cost $29.95 each including 
the Monitor source listing ($15 
separately). In fact you can also 
buy a combined 32K Editor/As- 
sembler package for $49.95. 
This makes the Computerware 
products much more competi- 
tive. The Diagnostics package 
isn't available in a 32K version. 

Paul Searby has indicated 
that owners of 16K Power Pack 
versions can return their Editor/ 
Assembler cassette and receive 
versions upgraded to run in 32K 
for a modest fee. In the 32K Pow- 
er Pack configuration, you can 
have the Editor and Assembler 
resident simultaneously. Check 
with Computerware for details. 

Computerware seems to be 
serious about extending their 
support of the Color Computer 
and making it possible for seri- 
ous owners to learn much more 
about their machines.H 
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Shannon Magnetics PLUS DISKETTE 

New from Shannon. Their top-of-the-line; state-of- 
the art, soft-sectored 5Va" double density, single 
sided, mini disk with hub rings. Boxes of 10 shrink 
wrapped with jackets, labels and tabs. 
Probably the only disk with an unlimited, lifetime 
guarantee. Shannon Magnetics finest quality with 
Premex certification. List S29.95. Box of 10. 
Introductory offer $24.95. 

Mini Diskettes 

Box of 10 $26.95 2 boxes $39.96 

Shannon Magnetics' soft-sectored 5Va" double 
density, single-sided, mini disks in shrink wrapped 
boxes of ten with jackets, labels and tabs. Fully 
guaranteed for one year against defects. 

Headcleaner Kit 

$24.95 
Verfin kit contains two cleaning disks with 
instructions to assure proper operation of all types 
of 5Va" disk drives. Removes dirt and debris which 
can cause read/ write errors and lost data 

Diskette/Headcleaner Combo 

$42.90 
Combo special includes box of 10 diskettes 
and Verfin headcleaner kit as described above. 
Diskette/File Box Combo 

$109.95 
Fifty Shannon Magnetic 5Va" diskettes as 
described above packaged in Flipsort diskette 
file box. 
Paper 

White or Green Bar 

3300 sheets of 9 1 /? X 11" tractor feed $29.95 

3300 sheets of 14% X 11" tractor feed $39.95 

Shipped by truck, freight charges collect. 

Diskette File Box 



$19.95 



Tandon Disk Drives for TRS-80 
Model I or Model III 

Single Drive, 5%", with cabinet and power supply. 

• Single-headed, 40 track, TM 100-1 $268.00 

• Dual-headed, 40 track, TM 100-2 $388.00 

• Single-headed, 80 track, TM 100-3 $388.00 

• Dual-headed, 80 track, TM100-4 $488.00 

For 5 1 /4" bare drives subtract $50.00 
Thin Line 8" Bare Drives 

• Single-headed $428.00 

• Dual-headed $578.00 
For orders of two or more identical drives discount five 
percent 

Okidata Printer 

Model 82 A (10" paper) $538.00 

Model 83 A (15" paper) $838.00 

This is the latest in Japanese printers. 
Prints double the lines per minute as Epson. 

Ribbon Cables 

Model I or III printer 
2-drive disk cable 
4-drive disk cable 



$18.95 
$19.95 
$29.95 




304 Elati 

Denver, CO 80223 

(303>698-1186 



Flipsort diskette file box with capacity for fity 
5W diskettes. 



A Data Resources company 

TRS-80 IS A TRADEMARK OF TANDY 
CORP. 

Attractive discounts to dealers 
To order call toll free: 800/525-8419 
Mastercard and Visa welcome 
Checks & Money Orders also accepted 
Orders shipped UPS free 

Colorado residents add 
6% per cent sales tax 



.-See List ol Advertisers on page 386 
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REVIEW 



A Digital Research version of the Model II. 



PL/I-80 



PL/1-80 

Digital Research 

P.O. Box 579 

801 Lighthouse Ave. 

Pacific Grove, CA 93950 

$500 



Thomas W. Parsons 
42 Willow Place 
Brooklyn, NY 11201 

The introduction of a compiler for a 
major language, always a landmark 

event in the world of microcomputers, was 
never more so than in the case of PUI, con- 
sidered by many the ultimate programming 
language. Digital Research, the people who 
brought you CP/M, have compressed this 
huge, mainframe-oriented monster to fit in- 
to the world of the 8080. After experiment- 
ing with this extraordinary new compiler for 
several months, I can give you my first im- 
pressions. 

Why PUI, anyway? When the language 
appeared in the mid-1960s, the answer was 
clear. The advantages of high-level pro- 
gramming languages were beginning to be- 
come apparent. Fortran was poorly adapted 
to non-scientific data processing, however, 
while Cobol, the only high-level business-or- 
iented language, was clumsy and incredibly 
verbose. The time seemed ripe for a well- 
organized language which could replace 
both. PL/I inherited its structure from For- 
tran (with some additions from Algol), and 
its capabilities combined those of Fortran 
and Cobol. It was intended to be the univer- 
sal programming language. There is very lit- 
tle you cannot do in PUI. 

Even today, few other languages can 
match the combination of features PUI 
brings to the user. A software review of a 
compiler inevitably ends up being a review 
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of the language; since PL/I is not widely 
known among micro users, I will summarize 
its features and show how they differ from 
those of other languages. I will compare 
PUI mostly with Basic (still the most widely- 
used micro language) and with Fortran 
(probably the best-known compiled lan- 
guage). 

PL/I Summary 

Like Basic, PL/I provides numeric and 
character-string data types. Unlike most 
Basics, however, the numeric types include 
both fixed and floating-point numbers. 
Some enhanced Basics provide an integer 
data type as well. In PUI the fixed-point 
numbers may be in binary or decimal. Dec- 
imal numbers were included for business 
data processing; they need not be integers 
and can have (in PUI -80) as many as 30 
significant figures. (Numbers used in ac- 
counting may have as many as 10 signi- 
ficant figures; compare this to the seven of- 
fered by most floating-point numbers.) in 
addition to character strings, PL/I offers bit- 
string data; both types may be manipulated 
by operators similar to Basic's MID$ and re- 
lated functions. Fortran also offers fixed 
and floating-point numbers, but no decimal 
data type; the new standard, Fortran-77, of- 
fers character-string data as well. 

PUI offers multidimensional data arrays, 
the same as any high-level programming 
language. In addition, the user can set up 
hierarchical arrangements of data, called 
structures. (It would be more accurate to 
call them trees.) A typical structure looks a 
little like the outlines we used to write in 
school: 

1 CUSTOMER, 
2 NAME, 
2 ADDRESS, 

3 STREET, 
3 CITY, 

2 ORDER; 



The different levels of a structure can be of 
different data types; any level of a structure 
can be an array; and you can even have ar- 
rays of structures. In operating on struc- 
tures, instructions can refer to the whole 
structure or to any desired level. Business 
data processing particularly requires the 
ability to gather various types and sizes of 
data into a single entity this way, in con- 
trast to scientific computation, which sel- 
dom needs any structure more complicated 
than an array. 

PUI was one of the first languages to of- 
fer the If .. .Then. . .Else for conditional 
branching, replacing the clumsy GOTO 
branching necessary in the Fortran of that 
time. (Fortran-77 now has an 
If .. .Then. . .Else structure which I find 
even handier to use than PUI's.) For loop- 
ing, PL/I offers a powerful and flexible Do 
statement with a choice of control by an in- 
dex (as in a Basic For . . . Next loop) or with a 
While clause or both. 

In addition. PL/I hasasuper control struc- 
ture known as a block. PL/I programs are 
normally written as a set of nested blocks. 
The keywords Begin and End delimit each 
block. There are several advantages to this 
organization; the chief one is that data ar- 
rays inside blocks can have variable di- 
mensions. For example, you can write 

GET LIST (A, B); /'Read A and B from terminal */ 

BEGIN; 

DCL X(A, B), Y(B): /'Dimensions of X and Y arrays*/ 

END; 

In this example, the dimensions of the ar- 
rays X and Y are not known until run time; at 
that point, A and B are read, and storage for 
X and Y is dynamically allocated. This 
means you never allocate any more storage 
than you will really need. 

Like Fortran, PUI is a compiled language 
instead of an interpreted one. Any pro- 
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A beautiful match, the Smartmodem 
and theTRS-80. Your TRS-80 can talk with 
other computers, over the telephone lines. 
And with no acoustic losses or distortions. 
Access time-sharing systems and infor- 
mation utilities such as the Source,- 
CompuServe^ and MicroNet. 
Direct hook-up with no interference noises. 
The Smartmodem hooks to the telephone 
line just like a modular telephone, simply 
insert in a wall jack. 
'Love at first sight" - your TRS-80 and 
the Smartmodem! 

Brawny — because it does so 
many things. Auto-dial and auto-answer 
features built in. With the Smartmodem, 
your TRS-80 can automatically dial the 
telephone, answer the telephone, receive 
and transmit, and hang up the telephone. 
Completely unattended. 
Pulse dialing or Touch-Tone. ** The 
Smartmodem can be connected to any 
telephone system in the U.S. because it 
allows pulse-dialing, Touch-Tone dialing 
or a combination of the two. FCC 
approved. 

Program controllable in any language us- 
ing ASCII character strings. This is a unique 




Microcomputer Component Systems 

feature of the Hayes Smartmodem. 

Brainy -because it does them 
all so simply. Seven LED indicators on 
the front panel give you visual signals of 
the status of the Smartmodem: 
MR- Modem Ready. SD- Send Data. 
CD- Carrier Detected, etc. 
The audio monitor feature lets you "listen 
in" on the call being dialed and the con- 
nection made. You are immediately alerted 
to busy signals, wrong numbers, etc. 
Over 30 different commands can be en- 
tered directly from your TRS-80 keyboard, 
including the unique "Set" commands 
which allow you to select and change var- 
ious optional parameters such as dialing 
speed, escape code character, length of 



time for a dial tone, and number of rings to 
answer. There are 17 "Set" commands. 
The Smartmodem is completely compat- 
ible with the Bell-103 type modems, the 
type of modem most time-sharing systems 
have. Operation can be in full or half-duplex, 
with a transmission speed of 0-300 baud. 

The Smartmodem is ready to 
"get-together" with your TRS-80. 
TRS-80 Model II andTRS-80ColorCom- 
puters have RS-232 serial ports and can 
immediately interface with the Smart- 
modem. Expansions that permit use of 
the Smartmodem with TRS-80 Model I 
and Model III are available through your 
TRS-80 dealer. 

Match your TRS-80 with a Hayes 
Smartmodem for a sophisticated, high 
performanced data communication 
system. Available at computer stores 
nationwide (except TRS-80 dealers) - 
call or write for the ^f^ . 
location nearest I m I UJ 0\/£*Q 
you. And don't set- LU nci y^ 
tie for anything less than Hayes. 
Hayes Microcomputer Products, Inc. 
5835 Peachtree Corners East, 
Norcross. Georgia 30092 (404) 449-8791 



%ur TRS-80 computer 

and the Hayes Stack* Smartmodem. 

Beauty, Brains, and Brawn! 
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'PL/I remains a particularly 
hard language to master." 



gramming language has to be translated in- 
to machine language sooner or later. In in- 
terpreted languages like Basic, translation 
is put off until the last possible moment. At 
run time, each line of a Basic program is 
translated "on the fly" as it is executed. The 
translation process, which must be repeat- 
ed every time you run the program, slows 
down the program's execution; in simple 
programs the slowdown is negligible and 
users are willing to accept the speed penal- 
ty in exchange for the ability to run their pro- 
grams immediately. In a compiled 
language, translation is a separate step, 
usually followed by loading, which is yet 
another step. These extra steps take time, 
and you may have to wait some minutes 
before you can run your program. Those 
minutes seem like an eternity, but when 
your translated program runs, it goes at 
maximum speed. In very large production 
programs compiled languages are pre- 
ferred, because compilation need be done 
only once while the final program may be 
run hundreds of times. 

Compiled languages allow the user to 
break his program down into subroutines 
which are separately compiled and stored 
in the user's files. He can then include these 
in new programs as needed during the load- 
ing step. Most serious programmers accu- 
mulate a library of useful subroutines on 
which they can draw; this custom has been 
memorialized in Kernighan and Plauger's 
classic Software Tools, which describes 
the formation and contents of such a 
library. 

PL/I programs can also be recursive. 
A recursive subroutine is one that can call 
itself. Recursion lets you write very com- 
plicated procedures in a compact and easi- 
ly understood form. (You can write a Quick- 
sort routine in less than half a page of 
code.) Many powerful algorithms are recur- 
sive, and it turns out that recursive pro- 
grams are particularly easy to analyze 
and to prove correct. Unfortunately, most of 
this is unknown outside of the classroom; 
programmers do not generally look for re- 
cursive solutions, because the languages 
they use will not support recursion. PUI 
was the first programming language to of- 
fer recursion as a matter of course. You 
can make any program recursive simply by 
adding the keyword Recursive at the 
beginning. 

Complexity and Size 

These represent the other side of the 
coin. The design of any extremely powerful 
language brings up a problem: great power 
makes for great complexity. For example, a 
language with many data types means for 
converting from one to another, together 
with rules for when these conversions are 
done automatically and when they must be 
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specifically requested by the user. If the de- 
signers don't take care to keep this kind of 
complexity under control, the language will 
be impossibly hard to use. PL/I's designers 
have attacked this problem in a number of 
ways, but chiefly by subsetting. 

A subset of a language is a simpler ver- 
sion derived by omitting some of its fea- 
tures. PL/I has several standard subsets 
(PUI-80 is based on Subset G), and it has 
been made informally subsettable by pro- 
viding defaults for unspecified features. 
Subsets enable the programmer to ignore 
features he isn't interested in using; de- 
faults are designed to make these ignored 
features invisible. 

In spite of these efforts, PL/I remains a 
particularly hard language to master. There 
are more rules to learn than in most other 
languages, and PL/I is particularly unforgiv- 
ing of infractions. The interactions of the 
various data types are complicated; the lan- 
guage permits you to do things which are 
poor programming practice (more than one 
statement per line, for example); and occa- 
sionally one of those supposedly invisible 
features surfaces to cause hard-to-trace 
program quirks. 

The complexity is reflected in the soft- 
ware, too. PUI compilers are big. PL/l-80's 
compiler consists of the basic .COM file 
and no fewer than three overlays loaded in 
various phases of the compilation. Using 
overlays avoids placing the whole compiler 
in memory at once; without them, the com- 
piler would need around 90K of memory. 
PL/I programs also need to be supported by 
large run-time libraries. When you load a 
compiled program, the loader searches a 
run-time library for the supporting routines 
it needs. In theend,youroriginal program is 
apt to be only a small fraction of what gets 
loaded into the machine at run time. (I will 
have more to say about this later.) Library 
routines are needed not only for built-in 
functions like square roots and expo- 
nentials, but also for utilities to handle 
PL/I's three different kinds of input/output 
and to convert among all those data types. 
PL/l-80's run-time library is 44K bytes long; 
by contrast, Microsoft's Fortran library is 
a mere 24K bytes. (To be fair, however, 
PL/l-80's runtime diagnostics — clearly 
worded, and with a traceback to the main 
program -are immeasurably superior to 
Fortran-80's.) 

PUI-80 

The list price for PUI-80 is $500; for this 
you get two disks (one containing the PUI 
compiler and supporting software, the oth- 
er containing a generous collection of illus- 
trative programs), and four volumes of doc- 
umentation. Three of these manuals are for 
PL/l-80; the fourth describes the loader pro- 
gram, LINK-80. The PL/I manuals include a 



MTI AUTHORIZED SALES 
AND SERVICE CENTERS 

Anchorage, AK (907) 333-8322 

Rogers, AR (501) 636-9168 

Mesa, AZ (602) 833-8949 

Phoenix, AZ (602) 241-1865 

Tempe, AZ (602) 831-5376 
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FREE SOFTWARE 



Accounting Package: 

Accounts Receivable, Accounts 
Payable, General Ledger, 
Inventory/Sales Analysis, 
Payroll, Audio Self-Learning 
Cassette, Games, Education 
Software, DOS Plus 3.3. 



Word Processing: 

Discount certificate entitling the 
purchaser to NEW SCRIPT by 
Pro Soft, complete word 
processing software. 



Introducing the M.T.I." BUSINESS Com- 
puter. We believe in offering you the best 
in complete, low cost computing. 

M.T.I MOD III PLUS B/140. We have taken 
the basic MODEL III, expanded the 
memory to 48K and added our M.T.I, 
double density, dual drive system. All 
M.T.I. BUSINESS computers include 4 
Mhz speed-up for remarkable fast pro- 
cessing, a RS-232 Interface, Anti-Glare 
screen and cooling unit. 

LOW PRICE. M.T.I. BUSINESS computers 
are priced from $2495. As an added in- 
centive, we will give you a business soft- 
ware package FREE with the purchase of 
a MOD III PLUS BUSINESS computer. 
The software package has a retail value 
of $1588.00 

All of this for $2495. 



Other Models Available: 

MOD III PLUS 240-B. Same as the MOD III- 
B/140 but has double storage capacity 
and dual headed 40 track drives. 

MOD III PLUS 280-B. Has 1 .5 Megabytes 
storage and 2 dual headed 80 track 
double density disk drives. 

MOD lll/WINCHESTER-B. Our largest busi- 
ness computer system. 8.2 megabytes of 
storage. Includes a 7.5 megabyte Win- 
chester hard disk and 80-track dual head 
disk head. 

OPTIONS: 

• LETTER QUALITY PRINTER 

• WINCHESTER CP/M 2.2 

WANT MORE? For more information call 
any of our authorized sales centers. 




MICROCOMPUTER TECHNOLOGY INC. ^247 
3304 W. MACARTHUR, SANTA ANA, CA 92704 
(714) 979-9923 • TWX 910-595-1902 MTISNA 



Immediate Availability 

90 Day Warranty 

One Year Extended Warranty 
Available 

• Local Dealer Service 

U.S. PRICES F.O.B. SANTA ANA 
CALIFORNIA AND MAY VARY BY AREA. 

CP/M is registered trademark of Digital Research, Inc. 

TRS-80" is a registered trademark of Tandy. Corp. 

M.T.I, is a registered trademark of Microcomputer Technology, Inc 



"PL/1-80 seems an uncomfortable 
mixture of unmatched capabilities 
and maddening drawbacks." 



108-page Language Manual, a 180-page Ap- 
plications Guide, and a 30-page Command 
Summary pamphlet. 

The language has a few extensions to the 
standard Subset G, and a few omissions. 
Most of the omissions are unimportant; I 
will comment on the two serious ones be- 
low. The most important extension is a bad- 
ly-needed unformatted I/O mode for reading 
and writing variable-length ASCII records. 
PUI-80, like Microsoft's Fortran-80, accepts 
source programs written with lowercase let- 
ters. I don't know why this trivial detail 
should make such a difference, but it does. I 
think it does more for program readability 
than indenting; once you have seen one 
lowercase listing, you will want to convert 
your whole library. 

The documentation is conscientious, but 
not entirely successful. Some language fea- 
tures are described in the Language Manu- 
al and some in the Applications Guide, and 
it is not entirely clear how they decided 
which things would go where. As usual, 
none of the manuals has an index, so it can 
mean a major search to get the answer to a 
simple question. 

If you do not know PL/I already, you will 
never learn it from these manuals. You 
aren't expected to use the manuals as text- 
books, however; a separate leaflet provides 
an annotated bibliography of recommend- 
ed PL/I textbooks. The best introduction to 
PUI-80 is the set of illustrative programs (60 
of them) on the second disk. The first thing 
you should do is run off copies of all the pro- 
grams on this disk and put them into a 
looseleaf binder; otherwise you will be apt 
to head straight for the manuals for your in- 
formation and ignore the sample programs. 

There are two licensing agreements, one 
non-commercial and one commercial. The 
non-commercial license gives you the right 
to do anything but sell executable PL/I pro- 
grams. Once you start selling those, you are 
a software vendor and are required to sign 
the commercial licensing agreement, which 
includes provision for royalty payments to 
Digital Research. This is not as unreason- 
able as it may sound. A large part of an 
executable program will be supporting rou- 
tines drawn from PL/l-80's run-time library; 
this means you will be selling your.custom- 
er some of Digital Research's software 
along with your own. It's easy enough to get 
around the commercial license: simply get 
your client to buy his own copy of PL/l-80 
(which he may want to do anyway) and sell 
him only your source programs and support 
services. Still, that commercial license 
comes as a jolt, since none of the ads for 
PL/l-80 prepare you for it. To sweeten the 
pot somewhat, Digital Research has an- 
nounced an ambitious Independent Soft- 
ware Vendor (ISV) support program, to in- 
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elude seminars, technical support, and as- 
sistance in marketing and documentation. 
Potential vendors should consider carefully 
the tradeoff between the royalty payments 
and the equivalent cash value of the ISV 
program. 

Omissions 

My reservations do not concern the licens- 
ing policy, but rather the language itself. In 
the process of adapting PL/I to the 8080, 
they have dropped two features which, in 
my experience, are essential for any serious 
programming in PL/I. PL/l-80 omits the ca- 
pability of dynamically dimensioning arrays 
by putting them inside a Begin... End 
block. Hence one of the main advantages of 
PUI's block-structure capability is wiped 
out. Blocks are still useful for controlling 
the scope of a variable (i.e., the portions of a 
program in which its identity is known), but I 
feel this is a minor benefit. 

The other omission is similar: Array di- 
mensions in subroutines must be deter- 
mined at compile time. This is a disastrous 
decision, because it means no subroutine 
intended to process arrays or character 
strings can ever be truly general-purpose. If 
you have written a sorting routine, for exam- 
ple, you cannot simply load it with any pro- 
gram that may need it — you have to edit it 
and tailor its arrays to match those of your 
calling program, then re-compile it and load 
that particular version with the program 
that calls it. Thus accumulating a library of 
software tools becomes an almost hope- 
less undertaking. The fact that this blunder 
has been committed in other languages as 
well (notably standard Pascal) is no excuse: 
PL/I, you will recall, was to be the ultimate 
language. 

An obscure feature of PL/I lets you get 
around this problem, within limits. PL/I has 
a data type known as a pointer. If you pass 
pointers to your subroutines, then, with a 
certain amount of ingenuity and care, you 
can con PL/l-80 into letting you handle ar- 
rays and strings of arbitrary size. I've tried it; 
it works; but it's tricky and you end up with 
programs which are unlike any PL/I pro- 
grams normally encountered in the outside 
world. I might add that many PL/I textbooks 
say little or nothing about pointers. Even 
Digital Research's manuals, which are reas- 
onably thorough, are frustratingly sketchy 
on the subject of pointers. The manuals are 
not intended to take the place of a PL/I text- 
book, of course, but in this case I think they 
could have made an exception. 

I have a few other, less important grum- 
bles. Comments are delimited in PL/I by the 
symbols /* and */. In PL/C, a popular teach- 
ing version of PL/I, comments are also de- 



limited by a carriage return. This means 
that if you forget or misprint a */ the end of 
the line will terminate your comment any- 
way. In full PL/I, a missing */ can turn the 
rest of your program into one big comment. 
This kind of easy error is not the mark of a 
well-designed language; Digital Research 
should have followed PL/C's policy, stan- 
dard or no standard. 

PL/l-80 takes significantly longer to com- 
pile and load than Microsoft's Fortran. The 
compilation time seems well-spent; at run 
time, PL/l-80 programs go like the wind. It is 
remarkable how fast they can go, since the 
compiler doesn't offer you a choice be- 
tween 8080 and Z80 machine code. Execut- 
able programs are significantly largerthan I 
would have expected. In the course of eval- 
uating the compiler, I programmed a com- 
puter game in PL/I. The source listing is one 
and a half pages long; the .COM file is 14K 
bytes long. The same game, programmed in 
Microsoft's Fortran-80, took 10K bytes. This 
difference may only apply to relatively short 
programs, but it is typical of my experience 
with Fortran-80 and PUI-80. I find it hard to 
reconcile with Digital Research's claim in 
recent ads that PUI-80 gives you "small, 
fast programs." Fast, yes, but not small. 

My own feelings about PUI-80 are mixed. 
Like PUI itself, it seems an uncomfortable 
mixture of unmatched capabilities and 
maddening drawbacks. It seems unrealistic 
to do any kind of serious business program- 
ming in any language but PUI. (Yes, you can 
use Basic, but the fact that you can get by 
on Basic doesn't make it the language of 
choice.) The availability of PUI on micropro- 
cessors is thus an incredible boon. 

Many potential users are surely going to 
be put off by the royalty requirements, 
which I predict will prevent widespread 
adoption of the language. But the inability 
to use adjustable dimensions in subrou- 
tines and blocks is going to cramp the style 
of many experienced PUI programmers, 
and this may prove a more serious imped- 
iment than the licensing problem. For my- 
self, these restrictions make the language 
virtually useless. As long as they remain, I 
think PUI will fare as poorly in the micro 
world as it has among mainframes— 
which is a shame, because we need a lan- 
guage like this. 

Personally, I am going to limp along with 
Fortran IV, which, with all its faults, at least 
permits me to program like an adult, and 
hope that Microsoft will give us Fortran-77 
one of these days. Don't take my judgement 
as final, however. If you write business soft- 
ware of any kind, you owe it to yourself to 
get Digital Research's publicity, buy a set of 
manuals, and make your own decision. ■ 
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If you want to add a modem to 
your computer but think it 
costs too much to buy the ex- 
pansion interface and RS-232 
adapter, think again. You don't 
even need a special direct bus 
connection modem— any acou- 
stic or direct-connect modem 
will do. 

The Uterm terminal program 
eliminates the extra hardware. It 
allows you to connect your 
modem to the cassette port of 
your TRS-80. A simple signal 
adapter translates normal mo- 
dem logic signals to ones the 
cassette port handles. With 
those items you can send and 
receive in terminal mode (key- 
board and video screen) and 



send and receive Basic pro- 
grams. A few "smart" features 
make terminal operation easy. 

Hardware 

Most modems convert audio 
tones to RS-232 compatible digi- 
tal signals and vice versa. The 
telephone line (or radio link) can 
handle the tones, but what 
about those RS-232 signals? 
These signals represent a logic 
1 if the level is somewhere 
between minus five volts and 
minus 12 volts and a logic if 
the level is between plus five 
volts and plus 12 volts. The 
signal levels were designed so 
that it is easy to distinguish be- 
tween zero and one. 

The lowest voltage that can 
be output from the cassette is 
zero volts and the maximum 
signal is around one volt (Cass- 
out). If you apply a signal to 
Cassin the computer expects to 




Figure 1 
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see a two volt AC(. .) signal. We 
are not even close to matching 
those RS-232 specifications. 
The solution is to convert the 
RS-232 input to a two volt AC 
signal and the one volt output 
swing to an RS-232 output. Fig- 
ure 1 shows how to do it. 

The first step in this project is 
to buy the parts from your local 
electronics retailer. The most dif- 
ficult part to obtain (and the most 
expensive) will be the DB 25P 
connector for the modem. If you 
cannot find one you can build the 
interface inside the modem. This 
allows easy access to the neces- 
sary supply voltages. Otherwise 
you will need an external supply 
for plus 12 volts and minus 12 
volts. A typical supply is shown 
in Fig. 2. The voltage levels are 
not critical. 

You can build the project on a 
piece of perf-board and, if you are 
not building it into the modem, 
enclose it along with the power 
supply in a small plastic utility 
box. A power switch and indi- 
cator are mounted on top and 
three cords exit from the various 
sides: an AC line cord, a modem 
connector cord (with the DB25P 
plug) and a cord terminating in a 
DIN connector for the cassette 
port. The specific details are up 
to you. If you are new at building 
from a schematic diagram, get 
some help. Accidentally apply- 
ing 1 17VAC to the cassette port 
is not the preferred method of 
hands-on learning. 

This circuit translates be- 
tween RS-232 signals and cas- 



sette port signals. RS-232 sig- 
nals into the interface switch an 
oscillator on and off; a high level 
input (logic 0) turns the oscil- 
lator on while a low level input 
(logic 1) keeps it turned off. The 
oscillator operates at a high fre- 
quency (around 10 kHz with the 
components shown) to allow 
quick response from the TRS-80 
Cassin hardware. In the oppo- 
site direction, Q1 and Q2 trans- 
late a low signal from Cassout 
to an RS-232 logic 1 (minus 12 
volts). A high signal from the 
same source results in an 
RS-232 logic (plus 12 volts) at 
the output. This interface works 
where others do not because it 
drives Cassin with an AC signal. 
You are assured of good signal 
transfer to the computer. 

Software 

Data exits and enters the 
modem in serial form (one bit at 
a time). Most micros shuffle 
data in parallel form (eight bits 
at a time). Serial interface ad- 
apters (such as Radio Shack's 
RS-232 interface) contain a de- 
vice called a UART (Universal 
Asynchronous Receiver/Trans- 
mitter) that does this serial to 
parallel conversion so that the 
computer always sees data in 
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The Aspen Software Company Spelling Checker 






For CP/M® , TRS-80® , and 8086/8088 Word Processors 



Don't settle tor a partial proofreading program. There are other 
spelling checkers available, but only Aspen Software offers a 
complete document proofreading system. 

The Aspen Software Company spelling checker is Proofreader. 
We've been improving Proofreader since it was first released in 
early 1981 . The newest version is fully menu driven, and so simple 
to use that you probably won't even need the comprehensive 
user's manual that's included. It has a large 38.000 word fully- 
expandable dictionary, and can check even your largest docu- 
ments in under four minutes (even faster on most systems). 
Proofreader's dictionary is almost twice as large as some, so you 
won't have to spend so much time adding new words. And 
Proofreader is totally accurate. Proofreader looks up every word in 
its dictionary , and does not atificially extend its dictionary size 
with less accurate prefix and suffix analysis like some others. 
(Beware: Most checkers with "vocabularies" of 50,000 or more 
words use this method and can miss some misspelled words!) 
The entire 38,000 word dictionary takes only 100,000 bytes 
of disk space. 

Proofreader does not simply mark the errors in your document 
like some checkers, but allows you to make corrections inter- 
actively, with the full context of each unknown word displayed. 
You can correct mistakes, leave unknown words alone, or add 
words to the dictionary. Unlike most spelling checkers, you 
also have complete interactive access to the dictionary while cor- 
recting, so you won't need to keep a separate dictionary to look up 
words manually. Each correction is automatically double checked 
in the dictionary, and with a single command, Proofreader can 
almost always show you the correct spelling of a word. (Inter- 
active correction optional on TRS-80 Model I/Ill, included on all 
other versions. TRS-80 versions do not support interactive diction- 
ary look up.) 

Spelling checking alone is not enough! Aspen Software's 
Grammatik goes beyond simple spelling checking. No one else 
has anything like it. First, Grammatik will check your document 



for common typos (such as doubled words: "the the"), and punc- 
tuation and capitalization errors (e.g., "STicky shift key"). It also 
checks for poor writing style using a dictionary of over 500 mis- 
used phrases as defined in many writer's style manuals. 
Grammatik classifies each error it finds, marks the errors for 
easy correction with your word processor, and provides sug- 
gestions for correcting the problem. The phrase dictionary can 
easily be expanded to include checking for esoteric jargon or your 
own personal pet peeves. Grammatik also collects other infor- 
mation that can help you judge the style of the document, and can 
produce a profile of word usage. 

Grammatik is receiving rave reviews from both critics and 
users. Bob Louden in InfoWorld (12/7/81): "If you use a word 
processor and a spelling checker, then you should investigate the 
unique capabilities of this program. Grammatik is a surprisingly 
fast and easy tool for analyzing writing style and punctuation." 
Eric Balkan in The Computer Consultant: "I'm impressed with 
the imagination that went into this product." Many users call or 
write to tell us how much they like Grammatik. Some typical 
remarks: "Great!". "Thanks for making my life easier.", "I'm not 
just happy. I'm ecstatic!". Grammatik has also been selected as 
an officially approved Osborne Computer software package and 
will soon be appearing at Osborne dealers. 

Only Proofreader and Grammatik can provide you with com- 
plete document proofreading, and together cost less than some 
spelling checkers alone. Proofreader and Grammatik have been 
designed to work with almost any CP/M, TRS-80, or 8086/8088 
based word processor. While they have been designed to work 
together, they are available separately. 

Aspen Software also has its own full featured word processor 
called Writer's Companion for all these systems. One of the best 
implementations of Ratfor (Rational Fortran) is available, too, 
along with an automatic Ratfor pretty printer. Please call or write 
for more details about these products. 
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-CP M versions require CP/M version 2 or later and at least 48K 
of KAM. Standard 8" single density. Northstar, Osborne-1, 
Omikron. and Apple formats available directly from Aspen 
Software. These and most other formats also available from 
Digital Marketing. Some CP/M systems with limited disk capacity 
supplied with 28.000 word. 65.000 byte dictionary. Proofreader- 
s'). 00. Grammatik $150.00. Both - $250.00. 

Manuals onlv - $8.00 each. $15.00 for both. 



--TRS-80 Model I/III versions require only one disk drive and 32K 
of RAM, and are compatible with all TRS-80 word processors and 
operating systems. Model II version requires 64K and 1 drive. 
TRS-80 Model I/III: Proofreader - $59.00, Interactive correction 
option - $30.00, Grammatik - $59.00. All - $139.00. TRS-80 
Model II: Proofreader - $99.00, Grammatik - $99.00. Both - 
$179.00. 

The 8086/8088 version will run under MS/DOS or equivalent 
(including the IBM Personal Computer DOS). MS/DOS formats 
available include standard single density 8" and IBM PC 5.25". 
CP/M-86 versions scheduled for Summer 1982 availability. 
Proofreader- $129.00, Grammatik- $150.00, Both - $250.00. 



IMPORTANT ORDERING INFORMATION: You MUST specify computer model, operating system, memory size, and format and number of 
disk drives when ordering either software or manuals alone. Please include your phone number. All U.S., Canada, and Mexico orders include 
first class shipping in price. Overseas please add $5.00. We accept cash, check, money order. VISA and Master Card. Sorry, no UPS or COD 
service available. Purchase orders accepted from educational institutions and nationally recognized corporations onlv. Cost of manual onlv 
orders can be credited to final purchase. NM residents add 4% sales tax. 

Aspen Software products distributed exclusively by Aspen Software Company and Digital Marketing. Dealer and OEM inquiries welcome. 

Trademarks: CP/M: Digital Research; TRS-80: Tandy Corp.; MS-DOS: Microsoft; Proofreader, Grammatik: Aspen Software Co. 
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We also offer printer ribbons, printwheels, type elements, 
equipment covers, power consoles, paper supplies, storage and 
filing equipment, furniture and many other accessories for word 
and data processing systems. Write for our free catalog. 
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parallel form. You should be 
able to program the computer to 
do this conversion by itself. 
Yourcomputeralready does this 
when it reads and writes cas- 
sette tapes but the format is not 
compatible with standard data 
communications. So I wrote a 
new routine. 

I needed two routines: one to 
transmit serially and one to re- 
ceive. The transmitting one was 
the easiest. This is the subrou- 
tine Send shown in the listing at 
line 2600 (Program Listing 1). 

When transmitting data seri- 
ally, timing is critical. The start 
bit (always logic O), seven data 
bits, a parity bit, and the stop bit 
(always logic 1) must each be 
present sequentially for a brief 
period of time. At the standard 
data rate of 300 baud, this time 
works out to 3.3 milliseconds 
(0.0033 seconds). Subroutine 
DLY at line 2930 waits the pre- 
scribed time. The send routine 
takes the data in the A register 
and sets the seventh bit high. 
Next, a logic O (the start bit) is 
sent to the output port and the 
routine waits for 3.3 ms. Then 
the data in the A register is sent 
to the output port one bit at a 
time (bit first) with a 3.3 ms 
wait between each bit. When the 
entire byte has been transmit- 
ted, the routine sends a logic 1 
(the stop bit) to the output port, 
waits the 3.3 ms and then re- 
turns. Ten bits have been sent to 
the port (from there through the 
adapter to the modem) con- 
suming 33 ms of time and trans- 
mitting one byte. Note that while 
the computer sends the byte it 
spends most of its time waiting 
and does nothing else. While 
writing the receive routine I 
found that I had to use some of 
that wasted time to handle other 
functions. 

The receive routine takes the 



one-bit-at-a-time serial data and 
assembles it into the eight-bit 
bytes the computer is used to 
handling. The first complication 
occurs because the computer 
never knows when the next 
serial character will start. The 
first part of the receive routine 
detects the start pulse that 
signifies data will follow. The 
RECV routine at line 630 is con- 
tinually called when in receive 
mode. It checks to see if the in- 
put port has been set by the 
oscillator signal from the inter- 
face (oscillator on is equal to 
logical 0). If there has been no in- 
put, the routine returns. If the 
port has been set the routine 
resets the port (and waits 1.2 
ms) and checks it again in case 
noise caused a false indication 
of a start. If once again the port 
is set, this means (probably) that 
it was a true start pulse and the 
routine continues on to input 
the data. 

The RECV routine gets the 
data by waiting until it thinks it 
is in the middle of the data pulse 
and then resetting and then 
reading the input port (CKPORT 
at line 880). Logic data sets 
the port; logic 1 data leaves the 
port reset. The program checks 
the input seven times and stores 
the results of those checks into 
a single byte which is then sent 
off to the display routine. 

As originally written, this pro- 
gram would input data until it 
had a complete character and 
would then send it to the CRT 
display routine in the Level II 
ROM. This worked well until the 
screen was full and the display 
driver had to make room for 
another line. The display driver 
then scrolled the display. The 
time it took to scroll the display 
caused problems. There are 
about 6.6 ms (count 3.3 ms each 
for the parity bit and the stop bit) 
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between the time the RECV 
routine inputs the last data bit 
and the time for the start of the 
next character (at 300 baud). The 
minimum software scroll time of 
the display is about 12 ms. 
When the computer returns 
from the display routine, the 
next character is about half 
gone. This garbles the first 
character (and often additional 
characters) of the next line. I 
could not use a scrolling dis- 
play. I had to find some way to 
organize the screen display that 



took less than 6.6 ms. 

I developed a display format 
that uses half the screen. As 
each line ends, it clears the line 
exactly eight lines away from it. 
Display starts at the top of the 
screen and works its way to the 
bottom where it wraps around to 
the top again. At any given time 
there are a maximum of nine 
lines displayed and the rest are 
cleared. Routine CRT1 at line 
4260 in the listing does this. 
CRT1 is a stand-alone display 
driver which recognizes carriage 



Hex/ASCII/HHC 


* Hex/ASCII/HHC 


• Hex/ASCII/HHC 


* Hex/ASCII/HHC 


00 NUL 


@@ 


20 


SP 


a® 


40 


@ 


D@ 


60 




F@ 


01 SOH 


@A 


21 


I 


6A 


41 


A 


DA 


61 


a 


FA 


02 STX 


4iB 


22 




BB 


42 


B 


DB 


62 


b 


FB 


03 ETX 


@C 


23 


s 


BC 


43 


C 


DC 


63 


C 


FC 


04 EOI 


@D 


76. 


S 


3D 


44 


D 


DD 


34 


d 


FD 


05 ENG 


@E 


25 


% 


BE 


45 


E 


DF 


85 


6 


FE 


06 ACK 


@F 


26 


& 


BF 


46 


F 


DF 


66 


f 


FF 


07 BEL 


@G 


27 




BG 


47 


G 


DG 


67 


g 


FG 


03 BS 


@H 


28 


( 


BH 


48 


H 


DH 


68 


h 


FH 


09 HT 


*Si 


29 


) 


Bl 


49 


1 


Dl 


69 


i 


Fl 


0A LF 


®J 


2A 


• 


BJ 


4 A 


J 


DJ 


6A 


i 


FJ 


0B VT 


®K 


2B 


+ 


BK 


48 


K 


DK 


6B 


k 


FK 


0C FF 


@L 


2C 




BL 


4C 


L 


DL 


6C 


I 


FL 


0D OR 


@M 


2D 




BM 


4D 


M 


DM 


6D 


m 


FM 


0E SO 


@N 


2f 




BN 


4E 


N 


DN 


6E 


n 


FN 


OF SI 


@0 


2F 


/ 


BO 


4F 





DO 


6F 





FO 


10 OLE 


A@ 


30 





Cfti 


50 


p 


E @ 


70 


P 


G@ 


11 DC1 


AA 


31 


1 


CA 


51 


Q 


EA 


71 


q 


GA 


12 DC2 


AB 


32 


2 


CB 


52 


R 


EB 


72 


r 


GB 


13 DC3 


AC 


33 


3 


cc 


53 


S 


EC 


73 


3 


GC 


14 DC4 


AD 


34 


4 


CD 


54 


T 


ED 


74 


t 


GD 


15 NAK 


AF. 


36 


5 


CE 


55 


U 


EE 


75 


U 


GE 


16 SYN 


AF 


36 


6 


CF 


56 


v 


HP 


76 


V 


GF 


17 ETB 


AG 


37 


7 


CG 


57 


w 


FG 


77 


w 


GG 


18 CAN 


AH 


38 


8 


CH 


58 


X 


EH 


78 


X 


GH 


19 EM 


A! 


39 


9 


CI 


59 


Y 


El 


79 


y 


Gl 


1A SUB 


AJ 


3A 




CJ 


5A 


Z 


EJ 


/A 


z 


GJ 


1B £SC 


AK 


3B 




CK 


5B 




EK 


7B 




GK 


1C FS 


AL 


3C 


< 


CL 


5C 




EL 


7C 




GL 


1D GS 


AM 


3D 


= 


CM 


5D 




EM 


7D 




GM 


1E RS 


AN 


3E 


> 


CN 


5E 




FN 


7E 




GN 


1F VS 


AO 


3F 


? 


CO 


5F 




FO 


7F 


DEL 


GO 


Table 1. Hex to ASCII to Hart's Hex code conversion table 



Shift I: 


Input Basic program. 


Shift O; 


Output Basic program. 


Shi*! M: 


Change keyboard mode from line to character and vice versa 




(half to full duplex). 


Shift S: 


Transmit sign-on message. 


Shift L: 


Enable buffer. Whatever was previously there is lost. 


Shift C: 


Close buffer. Further entry is ended. 


Shift B: 


Display Buffer. If the printer is enabled the buffer contents will 




print on it. 




Pressing the space bar will pause the display. 




Press Enter to continue; Clear to abort. 


Shift P: 


Same as Shift B except for non-standard printers. 


Up arrow: 


Clear screen. 


Shift left arrow: 


Clear line. 


Shift down arrow 


Control character shift. 


Transmit mode: 


Load a Basic program in the usual way and type LLIST to trans- 




mit. Return to Uterm by entering Name. 


Receive mode: 


Immediate return to Uterm (no program received) press Clear. 




After program is received, press Clear. Wait for program to list 




on screen and then save it in the usual way. Return to Uterm 




by entering NAME. 




Table 2 




A new enhanced 

version of Midwest 

Data's Auto-Writer, 

the powerful data 

indling system that 

interfaces text processing 

and data management. 

Users praised Auto-SfWiter for its unique, versatile 
approach to data base management. 

Now DATA-WRITER does even more: 

• New Data Entry programtocreateyourdqfabaseoradd 
records to an existing data base. It has error checking 

features and si ipports both fixed and variable length fields 

• New File Editor lets you edit your data base without an 
independent word processor. Or, if you prefer, use your own 
word processor (Electric Pencil, Lazy Writer or Scripsit) to 
create and edit your data base. 

• New Field Manager that lets you add. delete, re-order or 
append fields and merge or split data bases. 

• New interactive, double-precision Math program that 
processes up to 20 equations of up to 255 characters using 
numbers you enter and your data base field labels. It in- 
cludes an in-memory scratch pad to store temporary val- 
ues. Insert them into other equations for a cascade of in- 
creasingly complex mathematical statements. Store your 
series of equations on disk as procedure files to use any 
time you need them. 

• New two-level Sort that enables you to use nested sorts 
for complex ordering of data files. Sort on any field, without 

having previously designated if as a key 

• New Mailing Label program that allows you to print mul- 
tiple labels from one to four across and to insert a variable 
from the keyboard or a fixed message on every label. 

• Form Letter processor that allows you to insert data frorr 
your data base into a form letter or contract 

• Report- Generator for columnar tabulations with auto- 
matic headings, pagination, totals and subtotals, and 
sophisticated formatting control DATA-WRITER'S unique 
flexibility enables you to modify your report format as you 
wish, without the need to scrap it and start fresh. 

• Powerful Select-lf command that lets you define a subset 

of your data base New instring selection capacities With 
Select-lf and Sort, you can create dozens of new data 
bases for specific purposes. 

• Statistical check on your data base to locate data entry 
errors. Stats also reports maximum entered data length for 
each defined field, a tremendous aid when designing a 

report. 

DATA-WRITER is both powerful and easy to use It has speed 
and versatility not available in any so-called data base 
management system. As one Auto-Writer user said, "Why 
hasn't someone done this before!" 

For the TRS-80 Model l/lll (48K. 2 disk drives, lower case 
required). Available at your favorite software store, or order 
from Software Options, P.O. Box 970, Bowling Green Sta- 
tion, New York, N.Y. 10274. 212-785-8285 Toll-free order line: 
800 -22 1-1 624. Price: $125 (plus $3 per order shipping and 
handling). New York State residents add -*«mm^ 
sales tax. Visa/Mastercard accepted. SOFTWARE 
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HECK OUR LOW PRICES 




JEW-NEW TRS-80* "Model-1 6" 

16/32 Bit Computer. 128K RAM Std. 51 2K Max. 1 or 
2 Built-in 1.25 MB Disk Drives. Multi-user capability. 
W/1 Drive $4399.00 W/2 Drives $5099.00. Call for 
low prices on other Radio Shack Equipment. 



CORVUS** 

HARD DISK DRIVES 



Call for prices on 5-10-20 MB Hard Disks. Wo have 
the new CORDOS operating system which 
enables you to add a Hard Disk to TRS-80' Mod II 
with little or no modifications to your software. 
NEWDOS-80 and OASIS operating systems also 
available. Full servico for CORVUS** <vxl 
TRS-80V. 

In business 28 years at the same location 



Cert. Check 
Cashiers Ck 



Rt. 3, Radio Ranch Airport 
Polo, Illinois 61064 
Phone 815-946-2371 

Inidi'iivirk l.indy ( orp ludrm.irk Corvus Systems. Irx. 



^140 



47 REM DE HD ID CE 



ID CE @B AD @B DE ED CE DE M@ 



Figure 3 



return and back space control 
codes and displays all printable 
characters. All display updating 
occurs during the wait for the 
end of the received stop pulse 
and actually takes little more 
than one millisecond (out of the 
6.6 ms available). 

Now we have a system that 
transfers data from the modem 
to the CRT screen and from the 
keyboard to the modem. Addi- 
tional features make the system 
more useful and easier to 
operate. 

Transmitting features in- 
clude: 

• Automatic sign-on. By 
pressing one key you can send 
your name or number to the 
receiving system. 

• While the Break key is 
pressed, a continuous low tone 
comes from the modem. This in- 
terrupts the current process. 

• Character transmission 



mode sends a character when a 
key is pressed. Line transmis- 
sion mode waits for the return 
(Enter) key and then transmits 
the entire line in a burst. Line 
mode allows editing, character 
mode gives quick response. 

• The repeat line mode 
allows for testing. This mode 
repeats a typed line until in- 
structed to stop. 

• You can transmit a Basic 
program to a distant terminal or 
computer. 

• You can transmit all ASCII 
control characters by holding 
down the shift and down arrow 
and pressing the appropriate 
alphabetic key. 

Receiving features include: 

• You can input a Basic file. 
This option organizes an incom- 
ing program so you can store it 
on tape or disk or run it immedi- 
ately. This mode operates auto- 
matically with some Forum-80 




PET/CBM 

APPI P 

STOP PLAYING GAMES ™*<Mode..*i..> 

,;,-.-. COLOR-80 



Calculate odds on HORSE RACES with ANY COMPU- 
TER using BASIC. 

■ SCIENTIFICALLY DERIVED SYSTEM really works. TV 
. Station WLKY of Louisville. Kentucky used this sytem 

to predict the odds of the 1980 Kentucky Derby See 

the Wall Street Journal (June 6. 1980) article on 

Horse-Handicapping This system was written and 

used by computer experts and is now being made available to home computer owners This 

method is based on storing data from a large number of races on a high speed, large scale 

computer 23 factors taken from the "Daily Racing Form" were then analyzed by the 

computer to see how they influenced race results. From these 23 factors, ten were found to 

be the most vital in determining winners NUMERICAL PROBABILITIES of each of these 10 

factors were then computed and this forms the basis of this REVOLUTIONARY NEW 

PROGRAM. 

■ SIMPLE TO USE Obtain "Daily Racing Form" the day before the races and answer the 10 
questions about each horse Run the program and your computer will print out the odds for 
all horses in each race COMPUTER POWER gives you the advantage 1 

■ YOU GET i, TRS-80 (Level II). Color-80, Apple or PET/CBM Cassette 

2) Listing of BASIC program lor use with any computer 

3) Instructions on how to get the needed data from the Daily Racing Form" 

4) Tips on using the odds generated by the program. 

5) Sample form to simplity entering data tor each race 

MAIL COUPON OR CALL TODAY 

3G COMPANY, INC. DEPT. M-80 

RT. 3, BOX 28A, GASTON, OR 97119 

Yes, I want to use my computer for FUN and PROFIT. Please send me 
at $24.95 each. 

I need a □ TRS-80 .Color-80 □ Apple □ PET/CBM Cassette 
Enclosed is G check or money order j Master Charge GVisa 

Card No 
NAME '.... 



ADDRESS 

CITY 



START USING YOUR COMPUTER FOR 

FUN and PROFIT! % 
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download systems. 

• Full or half duplex mode 
works in conjunction with line or 
character mode. When in char- 
acter mode, Uterm operates in 
full duplex as long as you type 
less than 15 characters per sec- 
ond. If you type faster you will 
lose received characters. If you 
are in line mode, half duplex 
operation is the rule (you will be 
receiving or transmitting but not 
at the same time). 

• You can enter all data ap- 
pearing on the screen into the 
buffer. You can direct the buffer 
output to a printer (almost any 
type) as well as the screen. 

Routine KEYS1 (line 960) 
checks keyboard input and 
modem input. KEYS (line 1060) 
is the same but is used for line 
mode output. A keyboard input 
character is checked to see if it 
is for control (starts at KEYLP 
and ends at LNE— line 2240). If it 
is not a control character, the 
routine checks to see if it can be 
printed. If so, the character is 
sent to the screen and, depend- 
ing on the output mode, to the 
Send routine. 

If you are using a special 
printer driver load it before 
Uterm. Set memory size to pro- 
tect the driver; Uterm will locate 
itself just below. (You need the 
Basic loader to get this benefit.) 

Once the program is loaded 
and running, you should have a 
blank screen with an underline 
cursor at the top. The program is 
ready to receive and the key- 
board is in character mode. With 
your modem connected through 
the interface (and everything 
turned on), you should hear a 
tone from the modem. You may 
have to put the modem into test 
before the tone comes on since 
some modems keep the tone 
turned off until a proper tone is 
received. With the modem set to 
produce a tone, press any key. 
You should hear a short twitter 
from the modem speaker. Press- 
ing Break causes the tone to 
drop in frequency and stay there 
until the key is released. Whistle 
or talk at the modem microphone 
(the cup where the telephone ear- 
piece rests). Random characters 
will appear on the screen. Now 
press Shift M and type a line. The 
characters you typed will appear 
on the screen. Pressing Enter at 

sSee List ot Advertisers on page 386 



the end of the line transmits that 
line (listen to the modem). When 
it has finished the line, the cursor 
will drop down to the next dis- 
play line. 

Testing and Using Uterm 

Since Uterm uses Basic rou- 
tines to load and save programs, 
it is easiest to load as a Basic 
program. The program in Pro- 
gram Listing 2 loads Uterm at 
the top of unprotected memory 
and resets memory size to pro- 
tect itself. Enter the program. 
The Remark statements at the 
end contain the data for Uterm. 
Use REM at the beginning of 
each, not the apostrophe. The 
spaces between the letter 
groups are optional (the loader 
can read them with or without 
spaces but people have a harder 
time without them). Do not leave 
a space after any of the X or S 
characters. If you have access 
to a system with download ca- 
pability and know someone who 
can run it, the program is avail- 
able on the Medford Forum-80 
(503-535-6883). Either way you 
get the program. Run it and 
follow the instructions. Save the 
modified program and run it. If 
there is a data error, the pro- 
gram will let you know approxi- 
mately where it is. If everything 
goes right, you will be in Uterm. 

When operating with a disk 
system, do exactly the same. 
The only exception is that if you 
load Uterm from a CMD file, you 
must do so after loading Basic. 
Some systems will not allow 
this so the Basic loader program 
may be the only way to go. If you 
can load in this sequence, re- 
member to protect memory 
before loading Basic. I tested 
this program using TRSDOS, 
N EWDOS and N EWDOS80. There 
should be no problem with any 
of the other operating systems 
except where the system uses 
the reserved word Name for 
something else. That use will be 
modified temporarily while you 
are using Uterm. 

You may have noticed a 
changing graphics block at the 
top right of the screen. Just 
before Uterm transmits a charac- 
ter, it is displayed in that loca- 
tion. That way I know the pro- 
gram is working. It is a graphics 
character and not an alphanu- 




A powerful utility that 
opens a window into the 
Color Computer's disks. 

COLORZAP uses the power of the Color 
Computer to provide both rapid scan- 
ning and full screen modification capa- 
bilities. You can now examine, modify, 
and copy programs or data while they're 
stored on disk. Access them by filename 
or location. 

COLORZAP is programmed largely in 
BASIC so that you can modify it if you'd 
like, but part of it is in machine language 
to provide fast response. All accesses to 
disk are performed with standard inter- 
faces, so any standard Color Computer 
disk can be examined. You can directly 
access the disk's directory and control in- 
formation to examine a clobbered disk, 
recover a killed file, or find parts of a file 
when other parts have been lost. 

COLORZAP is supplied on disk with an ac- 
companying manual explaining its use 
and supplementing Radio Shack's mate- 
rial explaining disk format and layout. 
With this new window into its disks, the 
Color Computer sheds its image as a toy. 
Now you can use this exciting machine 
like other powerful microcomputers, 

For the TRS-80 Color Computer. Avail- 
able from Software Options, P.O. Box 
970, Bowling Green Station, New York, 
N.Y. 10274. 212-785-8285. Toll-free 
order line: 800-221-1624. Price: $49 95 
(plus $3.00 per order shipping and 
handling). New York State residents 
add sales tax. Visa/Mastercard 
accepted. 
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FRICTION FEED FOR YOUR EPSON 

MX-70-MX-80 

■ MX 70 and MX-80 are Trademarks ol EPSON, Inc. 



• Converts your printer for friction 
feed of SINGLE SHEETS or ROLL 
PAPER. 

• SIMPLE Installation (all you need 
is a screwdriver, no soldering). 

• Tractor feed remains 
undisturbed. 



Only S 39 95 

(add J1.50 lor postage) 




SATISFACTION GUARANTEED OR YOUR MONEY BACK 

MICRO-GRIP, Ltd. 

P. O. Box 4278 

VISA & Master Card Accepted ^^ QA g2AQg 

714/864-6643 




i 




for the TRS-80 from Micro- 



e Original GREEN-SCREEN 



. . ; - J 





The eye-pleasing Green-Screen fits over the front of your 
TRS-80 Video Display and gives you improved contrast with 
reduced glare. You get bright luminous green characters and 
graphics like those featured by more expensive CRT units. 
Don! confuse the Original Green Screen with a piece of thin 
film stuck to the face of your video tube, such as that adver- 
tised by others. The Original Green-Screen is mounted in a full 
frame perfectly matched to the color and texture of the 
TRS-80 Video Display. It is attached with adhesive strips 
which do not mar your unit in any way. 

The full frame design of the Original Green-Screen "sguares 
off" the face of your video display and greatly improves the 
overall appearance of your system. 

(Specify whether for Model I or Model III) 

THE GREEN-SCREEN $13.95 

Add $1.50 for postage and handling. 



Terms: Check or money order, no CODs or credit cards, please Add amount 
shown lor postage and handling to price ol the item. All items shipped within 48 
hours by first class or priority mail. Virginia residents, add 4°/<, sales tax. ^-\Q2 



Micro- Mega • P.O. Box 6265 • Arlington, Va 22SOS 
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meric ASCII character because 
the most significant bit is set to 
one. In the ASCII code chart in 
the Level II manual characters 
coded above 127 (i.e. have the 
most significant bit set to one) 
are graphics characters— at 
least as far as the TRS-80 is 
concerned. 

If you have had problems get- 
ting this far, some troubleshoot- 



ing is in order. If the graphics 
block changes as each charac- 
ter is typed, the software is prob- 
ably OK. Check the interface 
and the modem. If nothing 
works go over the Data state- 
ments in the Uterm loader. A 
problem here is unlikely since 
the loader does a checksum as 
it is working. If there are bad 
data, it will tell you so. 



117V AC: The stuff that comes out of a wall socket. Be careful. 

Answer: The opposite of Originate; see Originate. 

ASCII: A standard code for exchanging and storing information. The code contains 
upper and lowercase letters, numbers, punctuation, and control characters. 

Baud: As commonly used (not always correctly) it refers to bits per second. That's 
close enough. 

Bit: The smallest piece of binary (2 possible states) information. It can represent 
either on or off, 1 orO, pink or blue. By combining many of these bits, more than 2 
things can be represented. For example, seven bits can be used to define 128 
ASCII characters. 

CBBS: Computer Bulletin Board System. They have many names but their main 
function is to hold messages. There is usually no charge for this service. 

Download: A fancy term for 'Let me send this here program to you over the wire'. It 
doesn't have to be a program but can be a data file or poetry. 

Duplex, half or full: Has nothing to do with apartments for rent. Full duplex refers to 
the ability to communicate in two directions at once. This fact is used by ter- 
minal to computer communication as an automatic verification method. When 
you type a letter on your keyboard, it is sent by your modem through the phone 
line and received by the computer's modem. From there the computer 
retransmits it through its modem again, through the phone line, and finally the 
character is picked up by your modem and terminal and displayed on your 
screen. If it is correct on your screen, you know the computer got it right. Half 
duplex (one direction at a time) doesn't allow this echo so anything appearing on 
your screen has to come directly from your system. 

File: A group of data stored together in a computer, on tape, or on a disk for a com- 
mon purpose. The file can contain a program, a list of painless dentists or poetry. 

Hardware: Anything you can't send over the phone (from Douglas Hofstader's 
book Godel Escher Bach). 

Modem: A contraction of MOdulator/DEModulator. Used to condition digital 
signals so they can be sent and received over the phone. A modem itself cannot 
be sent over the phone so it is hardware. 

Originate: See answer. Well, originate and answer refer to different sets of tones 
used for data communication. The party originating the communication 
transmits on the low frequency set and receives on the high frequency set of 
tones. He is therefore in originate mode. The answering party transmits on the 
high frequency set of tones and receives on the low frequency set. Believe it or 
not, he is in the answer mode. This is not a hard and fast rule but at least if one 
guy is in originate the other fellow must be in answer. 

Parallel: Refers to simultaneous transfer of several bits of information. If you have 
eight wires connected from your computer to the printer you can send one bit 
over each wire at the same time. Usually faster than serial transfer. 

RS-232: A standard specification for electrically interconnecting computer 
peripherals using serial data transfer. The specification refers to voltage levels 
and connector pin designation. It has nothing to do with parallel to serial con- 
verters or modems except for the interconnection. 

Selectric: A trademark of IBM for their ball printhead typing mechanism. Besides 
being used in nearly every office in the country, many were used as computer ter- 
minal printers. Well, now those printers are obsolete and I have one. Recom- 
mended only for the very dedicated or masochistic. They do print well. 

Serial: One part at a time. This is similar to a soap opera except when transmitting 
data serially, you eventually get your message across. The serial rate of 300 
Baud transfers information at 300 bits per second. Remember: One wire and one 
bit at a time. 

Software: Anything that can be sent over the telephone. (I once again paraphrase 
Hofstader). 

The Source: a computer service accessible by telephone providing information, 
computer languages, and communication. There is a small hourly charge for this 
system. 

Terminal: A hardware system that can send and receive digital information over a 
communication link. The usual form (currently) is a video screen and a keyboard 
that is manually operated. A terminal becomes "smart" when it can perform 
some of its functions automatically. 

UART: A type of Integrated Circuit. The letters stand for Universal Asynchronous 
Receiver/Transmitter. Translated, that means it converts serial data to parallel 
data and vice-versa. 

Upload: The opposite of download. The sender is the one "uploading". 

UTERM: A terminal program for the TRS-80 that provides for a wide variety of func- 
tions while eliminating the need for a UART. 

Table 3. Glossary 



In 




For TRS-80 Models I and III 

during the Lowest 
Disk System 
Laredo's 
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5 million low cost hy 
of on-line storage. 

At $1995.00 affordable hard disk 

storage is now within youi reach. 
The LS525 hard disk system is 
easier to use than your printer . . 
just plug it in switch it on and 
your disk storage problems are over 
forever. 

The LS525 gives you unheard-of 
speed and reliability. For starters 
we built a "mainframe like" control- 
ler that can detect disk surface de- 
fects and relocate the data to al- 
ternate tracks. Talking about speed 
the LS525 can access rues 10 times 
faster than your floppy. 




This coupled with proven "Winchester" 
technology is what we mean by relia 
bility and speed. 

We also provide a user-friendly 
TRSDOS compatable operating system 
in which all of your existing soft 




$ 



ware can run on. It provides features 
that can make the LS525 look like 
one big 5M byte drive or four small 
1.25M drives or whatever you like. 

The LS525 is a'compact (less than 
one half cubic foot) "color keyed" 
package that will fit perfectly next 
to your TRS-80. So if your tired of 
seeing "Disk Space Full" 



there's no excuse. 



Call toll free and order yours now 

(800) 538-5137 

Inside California call (408) 980-1888. 

Model I or III host adapter $250 & LDOS $160 extra, specify when ordering 
(LDOS includes hard disk driver and Formatter) 

Iciredo y^tamy inc. 

. . .mass storage for personal computers. 
Laredo Systems Inc. 2264 Calle De Luna. Santa Clara, California 95050 

^53 TRS-80 and TRSDOS are trademarks of -Radio Shack a Tandy Co 



^See List of Advertisers on page 386 
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• IN STOCK NOW!! call for special • 
□ prices on LNWSOs, NEC printers, □ 

• RGB color monitors, and TANDON • 

□ DISK SYSTEMS, □ 



□ 
□ 
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NEW LNW SOFTWARE! 



***** 



7180 Woodrow Wilson Dr 
Los Angeles, CA 90068 



a 

G 

□ 
« 

a 



a (213) 650-5754 - (714) 973-1939 □ 

•□•□•□•□•□•□•□•□•□•□•□•□•□•□•□•□•□• 




Easier. . . and Faster. 

| NEW GENERATION! 

I Programs for your personal computer. 

j STOCK TRACKER™ uses our technical 

\ Volume Force™ analysis to give buy and 

! sell signals on individual stocks, stock 

J options, and commodities. Telecommu- 

1 nications package optional. From $285. 

I MARKET TRACKER™ is a composite of 
I six technical indicators which tell when 
I the Dow turns bullish and bearish. Its 
4-year track record is available. $225. 

WIPING CQWc&lNY 

Post Office Box 549 

Clayton, CA 94517 

415/672-3233 
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Once you are this far, test the 
rest of the features. Press Shift 
M. Type in a line or so of text (you 
are now in line mode). Before you 
press Enter to end the line, press 
Shift R. After you press Enter, the 
line will keep repeating until you 
press Clear. Now press Shift I. 
This is the Basic program input 
(receiving) mode. Several lines of 
text will appear on the screen. To 
exit without receiving anything 
press Clear. You should be back 
in Uterm (blank screen with cur- 
sor). Notice that when in the Shift 
I mode the keyboard is dead. The 
keyboard's function has been 
transferred to the modem. Only 
Clear will set it free. 

The next item to try is the 
Basic transmitting function. 
Press Shift O. More text will ap- 
pear. Load a Basic program and 
then LLIST it (like you were going 
to dump it to the printer). The pro- 
gram will then list slowly (at 
about 30 characters/second) on 
the screen and the modem should 
be doing some more twittering. 
When the list is finished you will 
still be in Basic. You could send 
the program again (LLIST) or play 
a few games. Or you could return 
to Uterm. Do this by typing 
Name. 

Try the buffer. Get to line mode 
(press Shift M if necessary) and 
then type Shift E (Enable buffer). 
Everything that appears on the 
screen will be placed into the buf- 
fer. To close the buffer press 
Shift C. If you want to check the 
contents of the buffer, press 
Shift B. If you have a printer, 
now you have a chance to use it. 
Almost any sort of printer will 
work in this mode, even those 
that require a software driver. 
Just be sure the driver is in- 
stalled before you load Uterm 
and that the printer is enabled. 
(Technical note: The printer is 
deemed to be enabled if 37E8H, 
bit 7 and 6 are read low. This will 
be taken care of automatically if 
you have a standard Radio 
Shack compatible printer. If you 
have some other type, print the 
buffer by pressing Shift P. Use 
Shift P only when the printer is 
ready to go. To do otherwise 
hangs the program. Shift P by- 
passes the bit 7 check and al- 
lows non-RS printers to work. If 
the printer is not enabled (se- 
lected), the buffer will list on the 



screen. You can stop the buffer 
display by pressing the space 
bar. Pressing Enter resumes the 
display where it left off and 
pressing Clear (after you have 
pressed space bar) aborts the 
list and puts you back in the ter- 
minal program. You can review 
the buffer as many times as you 
wish (Shift B) but the contents 
will be lost if you go to Basic in- 
put mode or enable the buffer 
again (Shift E). 

Next try the auto sign-on 
function. Press Shift S. The 
screen will show: 

BOB;HART;MEDFORD,OREGON;Y 

This is my check-in message for 
Forum-80 bulletin board sys- 
tems. Change it to your own 
name. Line 290 of the loader pro- 
gram contains the sign-on mes- 
sage. Using the table of Hart's 
Hex codes (Table 1) you can 
replace each code as neces- 
sary. For example, to insert the 
message, "THIS IS A TEST(car- 
riage return)", the Remark state- 
ment would look like that shown 
in Fig. 3. 

There must be at least one 
@ @ at the end of the message. 
The @ @ (0 byte) tells the mes- 
sage handler where to stop. 
Without it, you could transmit a 
large portion of the machine 
code of Uterm (which would not 
make much sense in this form). 
There must be exactly 40 (forty) 
items in this Remark statement. 
The SAN at the end of the line is 
the checksum. You can omit it. 

Try the system on-line and get 
a friend to help you out. It helps if 
he or she has a modem/terminal. 
Call the friend and place one of 
the modems in answer mode and 
the other in originate mode. Half 
duplex will be necessary on both 
ends since very few terminals 
and computers disguised as ter- 
minals echo everything they re- 
ceive (this one is no exception). 
After you have verified that you 
are receiving each other's carrier 
(tone) try typing a few messages 
back and forth. If that is success- 
ful, try the Basic program receiv- 
ing and transmitting modes. You 
know already that your trans- 
mitting mode works so the one 
that should be tested is the 
receiver (also known as down- 
load function). Tell your partner 
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to send a program and then 
press Shift I. You will see the pro- 
gram as it is received. When it 
stops coming, press Clear. The 
program will list again. The com- 
puter translates the full text of 
the program into its internal 
short hand form. When it finishes 
that (or stops for some other rea- 
son), it should say Ready and dis- 
play the prompt (>). If the listing 
stops but will not display Ready, 
press Enter. If it does not stop 
and starts listing garbage, press 
up arrow and then Enter. At this 
point you can edit, save (on cas- 
sette or disk) run, or ignore the re- 
ceived program. When you are 
finished with the program enter 
Name. Presto. You are back in 
Uterm again. 

The program receive function 
will work automatically if sent 
the proper codes. If the RECV 
subroutine detects a DC2 char- 
acter (12 hex) it will jump to pro- 
gram receive mode just as if you 
pressed Shift I. At the end of the 
program, if the sender transmits 
a DC4 (14 hex) it will be as if you 



pressed the clear key. The only 
thing left is for the computer to 
display Ready and for you to 
save the program. 

Table 2 lists the commands in 
the various modes of Uterm. 

The best way to become famil- 
iar with the system is to use it. 
Uterm is a simple and inexpen- 
sive way to get started in com- 
puter communications. Leave 
messages anywhere in the coun- 
try at any time on computer bul- 
letin boards; access large files of 
information from computer ser- 
vices; try at-home computer 
banking and instant new pro- 
gram update. All presage greater 
events in this field. Experiment 
all you can (all your phone bill 
allows). When you are up and 
running, leave a message on the 
Medford Forum-80. The number 
again is 503-535-6883. The 
system is on line 24 hours 
a day. ■ 

Bob Hart is a field service 
representative for a medical 
imaging company. 







Progra 


m Listing 1 




00100 


; ••• UTERM 


VERSION 1.5 •*• 




00110 


; ORIGINAL! Y 


INSPIRED BY 3TEPHFN GIBSON'S 




or, 120 


: "MICKEY GETS NEW EARS" , KB MICROCOMPUTING MAY '80 




00130 


; LAST REVISED 8/09/81 BY BOB HART 




0011.0 










00150 








FB00 


00160 




ORG 


0FB00H ;U8K 


30 2 


00170 


LOW 


EQU 


2H ;RS232 


0001 


o ; s o 


HI 


EQU 


;RS232 1 


0010 


00190 


TO 


E QU 


16D ;.3MS 


0051 


00200 


Tl 


EQU 


81D ;1.2 MS 


0087 


00210 


T2 


EQU 


135D ;1.97MS 


00C5 


, 2 D 


n 


EQU 


1970 ;3.0MS 


00E1 


2 3 


TBIT 


EQU 


2250 ;3.3 MS BIT TIME 


0033 


2 1. 


CRT 


F.QL 


33H 


002B 


00 25C 


KBC 


EQU 


2BH 


0221 


00260 


PORT 


EQU 


221H ; I/O PORT DRIVER 


l|020 


00270 
00280 


CSRPOS 


EQU 


I.020H ; CURSOR POSITION 


FBOO 1.2 


00290 


SIGNON 


DEFM 


'BOB; HART; MEDFORD, OREGON; Y' 


FS19 0DOO 


00300 




DEFW 


000DH ;C.R. AND DELIMITER 


0011. 

ED 


00310 




OEFS 


20 ;20 MORE BYTES RESERV 


FB2F 0000 
R 


00320 
00530 


OLDLP 


DEFW 


; STORAGE FOR LP VECTO 


FB31 


00310 


BEGIN 


EQU 


I 


F831 2A2640 


00350 




lq 


HL,(I.026H) ;GET PRINTER VECTOR 


FB31. 222FFB 


00360 




Lf) 


(OLDLP),Hl ;SAVE IT 


FB37 5EC3 


00370 




LD 


A, 0C3H ; PATCH NAME VECTOR 


FB39 328EI.1 


00380 




LD 


U18EH),A 


FB3C 2H.2FB 


00390 




LI) 


HE, NAME 


FB3F 228FU 


001.00 




1.0 


(1.18FH),HL 


FBI.2 


001.10 


'.'A'-'f 


EQU 


t ;RE-ENTRY POINT 


FBI.2 2A2FFB 
OR 


001.20 




I.I) 


HL, (OLDLP) ;REST0RE PRINTER VECT 


FB1.5 2226A0 


00130 




LI) 


(l.026H) / HL 


FBI.8 F3 


001.1.0 




Ql 




FBi.9 D0211.EF0 


00150 




: d 


IX,M0DE; INDEX FOR POINTERS 


-"BUD DD360001 


001.60 




:.Q 


CIX»0),1 ; CHARACTER SEND MODE 


n< 


001.70 
001.80 






;NON-REPEAT,NO PRINTE 
;NO BUFFER 


FB51 CDC901 


00190 




CALL 


01C9H ;CLEAR SCREEN 


FBSI. CD63F3 


00500 




CALL 


RESET ; INITIALIZE OUTPUT 


FB57 COBDFD 


00510 




CALL 


SUFST INITIALIZE BUFFER 


FB5A DDCB0096 


00520 




RES 


2,{IX+0);KEEP BUFFER OFF 


FB5E CD5FFD 


00530 


GETCP 


CALL 


GETCRS ;GET CURSOR POSITION 


FG61 18I.H 


0051.0 

005 5 c 
00560 




JR 


KEYS1 ; ENTER MAIN LOOP 


FB63 210200 


00570 


RESET 


LD 


HL y LOW ;MARK 


FB66 CD2102 


00580 




CALL 


PORT ;SEND IT 


FB69 C9 


00S90 
00600 
00610 


< 


RET 






■.-. 2 


;•••• 


MA 1 ■> 


RECEIVER ROUTINE • •«• 


F86A 


C [ < J 


RECV 


EQU 


$ ;SERIAL TO PARALLEL 


F86A 010007 


0061.0 




LE 


EC, 700H;8-7,C-0 


FB6D C09CFB 


00650 




CAL1 


CKPORT ; LOOKING FOR START BIT 


FB70 C8 


OOEbC 




RET 


Z ; RETURN IF NO START 

Program Listing 1 Continues 




MAKE YOUR PRINTER 




Remove the controller board in your printer and 
plug ours in to add the following capabilities: 

• Bidirectional printing 

• Full UPPER/lower case ASCII plus TRS-80 
graphics or DSE scientifics character sets 
in 9 x 7 dot matrix format (9x9 available as 
option — requires print head change) 

• Motor control — turns off the motor when 
the printer is not in use 

• 2048 character buffer 

• Software selectable features 

• transfer protocol (XON/XOFF or 
none) 

• character densities (10, 12, 15, 16.5 
cpi plus double width in each size) 

• self-test 

• plus more! 

Introductory price 
$295 assembled and tested 

for orders placed before 6/30/82 



Digita 
Systei 
Engine 




Suite 400 Carolyn Building 

10400 Eaton Place 

Fairfax, VA 22030 (703) 385-0900 

VISA, MasterCard, check, COD accepted ^ 2 69 



•See List ot Advertisers on page 386 
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THE BIGGEST NAME IN LITTLE COMPUTERS^ 

TRS-80 Model II— Your Best Buy 
In a Business Microcomputer 




software and peripherals 

Similar values on all merchandise 
CALL COLLECT: 

800-351-1580 

Texas Residents call: 915-283-2920 

Van Horn Office Supply „.« 

701 W. Broadway - P O Box 1060 
Van Horn, Texas 79855 

DEALER G055 ■■■ 

Form F48 Provided **ssam 

Standard Warranty in Effect 

THE NA TIONWIDE SUPERMARKET OF SOUND* 




Magazine 



SEND FOR FREE CATALOG 



Beat Roulette with a Pocket Computer! 

This booklet by Dr Edward 0. Thorp describes his little known work on Physical Prediction ot Roulette 
fhe man who made Las Vegas change toe rules on Blackjack exposes Roulette's succeptibility to 
computers $ 9.95 

Horse Race Handicapping! Our biggest seiler - Probability Handicapping Device- 1 
This is a comprehensive horse racing system 'or spotting overlays in thoroughbred 
f sprmt races. Easy entry ol data from the racing lorm A complete users manual takes 

%u.__ you step by step through a sample race and explains overlay betting and money 
- *^ management The user's manual contains a detailed tab run of a 100 consecutive race 
system workout showing an amazing $1 50 returned for each $1 00 wagered. (Note: this is not the 
same program as "Winning at the Races"). You may purchase the manual seperately tor $7.95 and 
credit PHO-t is now available for CP/M (Basic-80. M-Basic). PHD-1 User's Manual and cassette for: 
16K Apple II Applesoft. 8K Ohio Scientific (specify 1P or 4P), 16K TRS-80 Model I or III S29.95 

Apple or TRS-80 Disk $34.95 

CP/M8" Single Density Data Disk $39.95 

DR. QUIRIN'S FAMOUS DISCOVERIES! 

Win at the Races This is the program using the algorithms from Or. Quirin's book. Highly praised and 
endorsed by OR QUiRIN. this program is the best available today. Screen edit data entry makes enter- 

ng data a breeze Or Quinn s par time adiustment routines are included We warned you that the price 
would go up and it did Order now because this once wi I qo up again 

Winning at the Races Cassette (3ZK TRS-80 or Apple) $49 95 

Disk , $49.95 

Winning at the Races — the book by William Quinn Ph.D. This is the best computerized study of 

horoughbred racing ever published This 300 page hardbound book shows detailed studies ot high im- 
pact value factors and includes Dr Quirin's larnous Par Times 
A Tom Ainsle Winners Circle Book $21 .95 

Beating the Races with a Computer by Steve Brecher A good How to book on multiple regression 
techniques applied to Pan-Mutual handicapping Some heavy math '$14.95 



Make ct>cc«s payable lo JOF COMPUTER - Phone O'ders and inlormation 1213) 992-051' 

Send 10: JOE COMPUTER. 22713 Venlura Blvfl Suite F Woodland Hills. CA 91364 

California residents add 6% sales Uk 
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Program Listing 


1 Continued 








FB71 


CDItOFD 


BOB' 




CALL 


D L Y 1 2 


1.2 MS 


FB71t 


C39CFB 


00680 




CALL 


CKPORT 


ISIS REALLY START? 


FB77 


C8 


00690 




RET 


Z 


GO 8ACK IF FALSE ALARM 


FB78 


CD36-9 


00 BOO 


LPBIT 


CALL 


DLY30 


WAIT 3.0 MS 


FB7B 


C09CFB 


00710 




CALL 


CKPORT 


CHECK INPUT 


FB7B 


3E9 


00"2j 




OUT (0E9H),A 


TEST PULSE 


F B 8 


Bl 


00730 




OR 


C 


ADD OLD BITS 


F B 8 1 


OF 


007li0 




RRCA 




SHIFT ALL BITS RIGHT 


FB8 2 


I.F 


7 5 




!.; 


C,A 


SAVE BITS 


FB83 


I r 3 


0O76O 




DJNZ 


LPBIT 


REPEAT FOR ALL DATA BITS (7 


IMES 














FB85 


CD36FD 


00 77 




BALI 


D L Y 3 


SKIP PARITY 


'BBS 


CD9CFB 


00 'So 


PSKIP 


BALL 


CKPORT 




FB8B 


20-3 


00790 




9 


07, PIY.\ B 


;CKECK UNTIL HARK 


F88D 


71 


00 8 




LO 


A,C 


GET BYTE 


FBSB 


2F 


00810 




CP1. 




INVERT (MARK NOW-1) 


F38F 


E67F 


00820 




AND 


7FH 


STRIP MSB 


FB91 


Fl 60 


008 50 




Or 


6 OH 


LOWER CASE? 


FB93 


FA9SFB 


0080 




JP 


M,TUBE 


NO 


FB96 


E65F 


00850 




AND 


5FH 


CONVERT TO UC 


F39S 


CD1.EFF 


8 


TUBE 


BALL. 


CRT1 


WRITE 


F39 3 


C9 


8 7 




RET 




LOOP AGAIN 


FB9C 


C063FB 


00880 


CKPORT 


CALL 


RESET 


RESET PORT LATCH 


9599 


CD5BFD 


00830 




CALL 


DLY5 


WAIT .3 MS 


FBA2 


DBFF 


00900 




IN 


A,(0FFH) 


CHECK PORT 


FBAIi 


E580 


009 10 




AND 


80H 


MASK ALL BUT MSB 


FBA6 


C9 


0O92O 
00930 
0091.0 




RET 










00950 


;»*» 


KEYBOARO SCAN ROUTINE »•* 


FBA7 


CD70FD 


00960 


<EYS1 


CALL 


BREAK 




F BAA 


C02BOO 


00 970 




OABB 


KBD 




"BAB 


B7 


00980 




on 


A 


SET FLAGS 


?BAE 


200A 


00990 




JR 


NZ,KIN 


IF INPUT 


FBBO 


CnCAFB 


1 




OABB 


RECV 


NO KEYS, CHECK RECEIVER 


FBB3 


FE12 


01010 




CP 


12H 


DC2 


FBB5 


CA7I FD 


01020 




OP 


Z,M3DE1 


RECEIVE PROGRAM MODE 


FBBS 


18 BO 


01030 




JR 


KEYS1 


AND KEEP LOOPING 


FBBA 


CDSFFD 


010UO 


KIN 


CALL 


GETCRS 


CURSOR POSITION 


FBBD 


1809 


010 5 




JR 


KEYLP 


OTHERWISE 


FBBF 




01060 


KEYS 


EQU 


$ 


READ KEYBOARD AND SEND 


FBBF 


CD7 C D 


D1070 




CA1 1 


3REAK 




FBC2 


CD2B30 


0108 




CALL 


KBD 




FBC5 


87' 


oiooo 




'JO 


A 


ANY CHARACTER 


FBCO 


2 8 F 7 


0110 




JR 


Z,KEYS 


LOOP ON KEYBOARD 


FBC8 


E 6 7 F 


OHIO 


K E V 1 P 


AN 9 


7FH 


MASK MSB 


FBCA 


FBOB 


01120 


TEST IN 


CP 


91 


UP ARROW?(CLEAR SCREEN) 


FBCC 


CA1.2-B 


0113 




JP 


Z,NAME 


CLR SCREEN 


FRCF 


rB 18 


1 ! J 




CP 


21 


SHIFT LEFT ARROW?(CLR LINE) 


FBD1 


20 06 


0115 




JR 


N Z, CTRL 


SKIP IF NOT 


FBD3 


CDS UFO 


1 1 




OAL1 


B L if L 1 M 


CLEAR LINE 


FBD6 


C35EFB 


01170 




JP 


GETCP 


NEW CURSOR POSITION 


FBD9 


FE1A 


0118 


CTRL 


OB 


26 


SHIFT DOWN ARROW?(CNTRL KEY) 


FBDB 


200 3 


7 19 




JR 


NZ, CRTST 


;NO 


FOOD 


AF 


01200 




XOR 


A 




FBDt 


18U6 


01210 




JB 


i DCRT1 


; CONTINUE 


FBE0 


FEOD 


01220 


CRTST 


CP 


ODH 


CR? 


F3E2 


2 00C 


01230 




JR 


99, SICK 


IF NOT SKIP 


F3Elt 


DDC800UF. 


0121.0 




Bl T 


0..; 1 x*0) 


; CHECK MODE 


FOBS 


CAC1FC 


012 50 




P 


Z,ETX 




FBEB 


CDOliFD 


01209 




CAI L 


SEND 


SENO IT 


FBEE 


1887 


01270 




JR 


KEYS] 


ANO LOOP 


FBFO 


65.69 


01280 


SICK 


CP 


69H 


SHIFT 1 '(BASIC INPUT) 


FBF2 


CA7EFD 


01290 




JP 


Z, MOB 61 


REC PROGRAM MODE 


FBF5 


FE6F 


01300 




CP 


6FH 


SHIFT 0?(BASIC OUTPUT) 


FBF7 


'.406 Ft 


01310 




JP 


7,5' OB 6 2 


XMIT PROGRAM MODE 


f'BFA 


F B 6 D 


01320 




OB 


6DH 


SHIFT M?(XMIT MODE) 


FBFC 


2 00B 


013 3 




JR 


NZ, 0906 


NO, SKIP 


FBFE 


OD7E0O 


013UO 




LD 


A, ( IX-0) 


;MOOE 


FC01 


EE01 


01350 




XOR 


1 


TOGGLE BIT 


boo; 


DD7700 


01560 




LD 


( 1 X • ) , A 


PUT IT BACK 


FCOC 


AF 


01S7Q 




XOR 


A 


ZERO AC CUM 


FCQ7 


18 ID 


19 8 




JR 


LDCRT1 


CONTINUE 


FC09 


F B 7 


01590 


SPCK 


C P 


70H 


SHIFT-P? (PRINT SUFFER) 


FCOB 


2006 


01 It 00 




JB 


NZ, SECK 


NO--SKIP 


FCOO 


DDCBOOCE 


: .. :. 




SET 


1 , ( 1 X • ) 


ENABLE PRINT 


FC11 


1826 


011*20 




JR 


SBCO 


GO TO BUFFER ROUTI NE 


FC13 


FE65 


01950 


SECK 


CP 


6SH 


SHIFT E?(ENTER BUFFER) 


FC15 


2 00B 


011.1*0 




JR 


NZ.SCCK 


NO- SKIP 


FC17 


CDBDFD 


01U50 




CALL 


BUFST 


1 NIT BUFFER 


FC1A 


AF 


01K60 




XOR 


A 




FC1B 


1809 


01-70 




JR 


LDCRT1 


CONTINUE 


FC10 


FEG3 


011*80 


SCCK 


CP 


63H 


SHIFT C?(CLOSE BUFFER) 


FC1F 


2007 


019 




JB 


MZ,SBCK 


NO- SKI P 


FC21 


DDC80096 


01500 




B: B 9 


2, ( 1 X-C) 


TURN OFF BUFFER 


FC25 


AF 


01510 




XOH 


A 




FC26 


185E 


01520 


LDCRT1 


JR 


LDCRT2 


CONTINUE 


F02S 


FEG2 


01530 


SBCK 


CP 


62H 


SHIFT B? (DISPLAY BUFFER) 


FC2A 


205C 


015H0 




JR 


NZ, 55CK; 


t KEEP TELLING YOU- NO! 


FC2C 


CDD105 


01550 




CALI 


0SD1H 


CHECK FOR PRINT READY 


FC2F 


DDCBOOCE 


15 7 




OFT 


1 , t 1 X . ) 


ENABLE PRINTER 


FC33 


2801. 


1585 




JP 


7,99 9 


SKI P IF PRINTER READY 


FC35 


D f B s : 


015 9 




RES 


1 , ( 1 X • > 


ELSE DISABLE PRINTER 


FC39 


CDC901 


BibOO 


SBCO 


CAI L 


01C9H 


CLEAR SCREEN 


FC3C 


09 


01610 




EXX 




ALT REG 


FC3D 


EB 


91620 




F. X 


DE,HL 


PUT BUFEND IN DE 


FC3E 


DD660U 


: 6 ' 




LD 


H, ( IX*I.) 


GET START 


FCU1 


DD6E03 


0161*0 




LD 


L, i IX*3) 




FCHi 


OF 


01650 


SBC1 


RST 


2U 


END OF BUFFER? 


FCtS 


2855 


01660 




JR 


Z, SBC3 


JUMP 1 F END 


F«7 


7E 


1 7 




LD 


A,(HL) 


ELSE GET CHARACTER 


FCU8 


010003 


01680 




LD 


5C, 0>50i 


SET DISPLAY SLOWDOWN DELAY 


FC4B 


FS 


0169 




PUSH 


AF 




FCC 


09 


91 '00 




EXX 




NORM REGISTERS 


rcu 9 


003300 


017 10 




BALL 


CRT 


DISPLAY IT 


FC50 


DUCBOOI+E 


17 2 




BIT 


1 , ( 1 X • ) 


PRINTER? 


FC5U 


2 80 A 


017 30 




JR 


Z.SBC2 


SKIP IF NOT 


FC56 


Fl 


01710 




POP 


AF 


RESTORE CHAR 


FC5 7 


F5 


01750 




PUSH 


AF 








9.1.7 95 


; BASIC 


ROM PRINTER DRIVE 




FC58 


CD3B00 


51760 




CALL 


3BH 


PRINT CHAR 


FC5B 


09 


01780 




exx 




ALT REGS 


FCSC 


010100 


o:750 




LD 


8C,1 


MIN DELAY FOR PRINTER 


FCSF 


D9 


018 




EXX 




NORM REGS 


FC60 


Fi 


919 10 


SBC2 


POP 


AF 




FC61 


D9 


01820 




t < X 




ALT REGS AGAIN 


FC62 


CD6000 


918^5 




CALL. 


060H 


DELAY (Hi. 66 US • BC) 


FC65 


3AU058 


i 9 




or, 


A, ! 58 5 00 


;CHECK KEYBOARO 


!-C6 6 


0B7F 


01850 




BIT 


7, A 


TEST FOR SPACE BAR 


; ;ba 


2 8 30 


01860 




JR 


Z.SIiCU 


NO, DONT PAUSE 


FC6C 


3AU 038 


016 70 


5B05 


LD 


A, ( 381* OH 


; KEYBOARD 


FC6F 


CBIi7 


01880 




BIT 


0,A 


ENTER KEY? 


FC71 


2 06 


018 




JP 


NZ,SBCI* 


YES — CONTINUE ON 


FC73 


CBUF 


019 




31 1 


l.A 


CLEAR KEY? 


FC75 


2 09 5 


019 10 




JP 


NZ, SBCS 


YES—ABORT LISTING 


FC77 


18F3 


9 ; 9 2 




OR 


S8CS 


PAUSE LOOP 
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NEW SPACE AGE 
PRINTER STAOT 




Clear $27.50 Color. 



$29.95 



NEW DISKS FRO 



Wabash has come out with three new high quality disks, a new 80 track 
double density, a new 80 track double density on two sides, and a new 
flippy disk that can be read on both sides by a normal disk drive. 

5V4 single density $25.95 Double density 40 track. .. $32.99 

Doubledensity80 track. . . 34.99 Double den. 40 tr.2/sides. . . 34.99 
Doubleden.80tr.2/sides. . . 42.99 Flippy double density 35.99 

All Wabash disks are ot such high quality that they are guaranteed by 
the manufacture for two years. 



- Automatic density recognition - 

- Automatic track count recognition - 

- Automatic dos recognition - 

- The Best Directory On The Market! - 

This will be the standard which all other Directores are judged. It will read any 
normal type of diskette Mod I or III, Multi Dos, Ldos, Dos Plus, and Trs Dos. Double 
Density. Single Density, 35, 40 or 80 track drives. 

A machine language program that is easy to use, but at the same time has all the 
features you wi 1 1 ever need. Display to screen or to printer. Displays by program, or 
disk, or subject. Super fast sort. Scrolling displays, ect. 

You can even add a line to help tell what the program is about. 

Example: 

SARGON/CMD 146G GREAT CHESS GAME 

SARGON/CMD is name of program read off of disk. 146 is you reference number 

for this disk G is added later designating game. "GREAT CHESS GAME" is added 

later as a descriptor file. 

Super Directory $39.90 

Super Directory with 10Wabash Disks $59.80 

SPECIAL OFFER - with each directory ordered you will receive 
10% discount on any disks ordered. 

If you use a model I please specify if you want a double density version. 
(You must have a doubler to use the double density version.) 



SUPERMETER 

The biggest problem in loading tapes has been the volume 
control. Prerecorded tapes are produced al dittering volume 
levels. Now finally, a device lo let you set She correct volume 
levels tor loading any tape. You will now load any tape the 
FIRST time SUPERMETER plugs in (no cutting or soldering] 
between your tape recorder and the computer and lets you set 
the volume to the level that you' computer man's. 

SUPERMETER $29.00 



FAMILY TREE 

Excellent family genelogy program works on both the model I 
and III Written expecially for the person |ust getting into 
genelogy. It has over 250 pages of instructions on how to 
research your family tree, how in get information and how to 
put it into the program The computer program is easy to follow 
and gives both printouts and screen listings of your family tree. 
It will even give you a listing of all your living relatives 
birthdays 

Disk or Tape S29.00 



Small Business Programs 

CHECKI NG ACCOUNT Mod I or III. 48k disk $39.00 

Excellent check writing program for small business Prints 
checks on printer, sorts into 32 catagories f or bookeeper and 

IRS. 

BILLING SYSTEM Mod. I or III, 48k disk $39.00 

Excellent system tor the small business man, It is fast a no easy 
to use. Prints out invoice and monthly bills. Adds interest etc. 

SPECIAL BOTH PROGRAMS $65.00 

INVOICE PROGRAMS 

Prints out invoice with your name at the top on 8V» X 1 1 paper. 
DISK ONLY $24.95 



New! 

Hayes Smart IVlodem 

We at Comr. utei Shack think this is the nest mode-" on the 
market We include a file transfei and communications pro- 
gram at no charge with each purchase of the Smart Modem 

Programs and modem only $259.00 

EP-SET-80 

If you have a EPSON Printer you need EP-Set A series of 
programs that help you use all the features ot the Epson 
printer One merges with a basic program to help drive the 
printer One is a machine language subroutine to give yon 
keyboard access to the printer, (example type control c to get 
the compressed mode Control E to get emphised characters). 
Use EP-SET to set the line spacing, character modes, strike 
modes etc. Throw your manual away. Happiness is here with 
EP-SET. 

Disk or Tape 1 8.95 

Miscellaneous Utilities 

Z BASIC 

The only Compiler we will recommend. 

Disk & Tape together $94.95 

Disk ,.... ' ..'. $84.95 

Tape $74.95 

MYSOS EDAS35 

Our favorite editor assembler $74.95 

SUPER UTILITY PLUS '.. $44.95 

POWER DRAW $34.95 

V.F.U. 

By Vernon Hestor valuable File Utility Purge Execute-Copy 

by file or disk 

Specify Operating System $19.95 

TAPE COPY II.,....: $12.95 

Only $5.00 with any other utility. 



We sell them all We recommend and use MULTI DOS 

Don't let its low price fool you. It'll do everything the others will 
and guite a few things they can't. 

MULTIDOS has the BEST BASIC - - it's the EASIEST to use 

and its the FASTEST system around. Why pay twice as much for a 
operating system that's complicated and hard to use, 

Multi Dos is not a cheap copy of other operating system's it is a 
new Dos specially written for the average TRS-80 user. Listed 
below are some of the features that Multi Dos has that most of 
the other doss don't have. This list has 34 things that would be 
commonly used by most people. 20 are exclusively Multi Dos. 

Repeat's last dos command, Multiple dos command, Hi Speed 
boot, nested Do file, software powerup, hi speed debug, 
executable debug, alphabetized directory, forms command, 
totals free, keyboard attributes, topmen, auto-multiple density 
recognation, copy only if sufficient space.graphics driver, 
single step basic, zero arreys, delete arrays, sort routing, used 
variables and their values displayed, transfer to level II. fing, 
intelligent global editor, string packer, line splitter, line merger, 
renumber to line 0. renumber packed strings, lists graphics, 
automatic high speed, won't hang if no printer, repeating keys, 
menu driven copy to file, screen dump graphics to printer. 

These are the features that other dos's are spending thou- 
sands of dollars and hundreds of hours trying to copy (this is a 
quote from another com pa nys ad that has 6 of the 34 features 
listed above). 

$79.00 
SPECIALS 

MULTI DOS with Aerocomp Doubler $209.00 

MULTI DOS with Super Directory $9900 

MULTI DOS with Super D S Doubler $229 00 

DOS PLUS 3.4 $1 29.00 

L DOS $1 19.00 

AEROCOMP DOUBLER $139 00 

The operating systems that are given out free with the doublers 
for $149 and $159 dollars are not comparable with all of the 
features of Multi Dos. 



COM PUT 

1691 Eason • Pontiac, Michigan 48054 (313)673-2224 



■See List ot Advertisers on page 386 



ORDERING INSTRUCTIONS: 

MC and VISA OK please add $2.00 for Shipping in U.S.A. Also 

to help us send you the best possible version include the type 
of computer you have, your operating system if disk and if you 
have a doub er in the model ' 

DEALERS . . . We are distributors for all items in this ad 

except for the games Scarfman, Laser Defense, Fortress, and 
Alien Defense. Write for our catalog and price list. 
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ACTION GAMES 

The fastest growing producer of computer games for 
your 6809 has the products you have waited for!! 



ARCADE GAMES FOR 



THE COLOR COMPUTER 



Fast paced action • Super Hi-Res Graphics 
Dynamite sound effetets • Runs in 16K of memory 

These games will astonish you with their Detail and Quality. 
They set a standard for others to follow. 



— ADVENTURES — 

Calixto Island • alie $lack Sanctum 

Highly acclaimed by reviewers • Challenging situations 

Fast, efficient machine language • Runs in 16K of memory 

Save game in progress 



Adventures on 5' ■: TSC FLEX disc (specify 6800 or 6809) ea S24 95 

Both adventures on single disc ■ $39.95 

Adventures tor color computer ea $19.95 

Color Berserk lor color computer ea. $24.95 

Cave Hunter (or color computer ea. $24.95 

Shipped prepaid m continental U S Cali'o-nia residents, please ado 6°o (ax 



- MORE COMING SOON - 



MARK DATA PRODUCTS 

23802 Barquilla, Mission Viejo, CA 92691 • (714) 768-1551 

TRS 80 IS A TRADEMARK OF TANDY CORP. 



Announcing 




ELECTRONIC NOTEBOOK 



A totally new concept in small-scale information management for the TRS 80 (R). LOG is an 
assembly language utility which fills the gap between text editors and data base managers to 
provide a true free-form information storage and retrieval system with unheard-of ease of 

operation 

LOG-CM D creates on a formatted diskette a LOG file from 1 to 170 pages long, each page 
containing 1 full screen of information. Pages are accessed individually or sequentially, as if 
thumbing through a book. Information is added, updated, or deleted from each page in free 
form by an integral cursor-oriented text editor. Each diskette becomes a separate organized 

notebook to use ana reuse as you please 

Insert, Delete, Tab, Clear, and full cursor positioning are supported, as well as blinking cursor 
and auto-repeat. All functions operate with the ease of a single keystroke including Global 
Search. Output to printer is provided LOG can even be accessed from BASIC without toss of 

program 

Why, when you own a computer, do you still keep records by hand? Throw away your pencil 
and paper! Use your computer as you never dreamed of before! 



Model 
Model ::: 



32 oi 48K 

32 or 48K 



i'\A 95 
$49.95 



(minimum system: 32K, 2 disk drives, 
DOS 2,3 (I) or 1.3 (III) required) 



Write or Call lor lurthei information 

KSoft 

':-! B Lakeside Drive 
Brandon, MS 39042 



(TRS-80 is a trademark of Tandy Corporation) 



(upperi dse only! 
(uppercase/lowercase) 



(601) 992-2239 

MasterCard and Visa accepted. 
MS Residents pay 5% sales tax. 

We pay shipping and handling 
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FC79 


23 


019 '.0 


SBC 


NC 


HL 


POINT TO NEXT BUFF CHAR 


FC7A 


18CS 


a l o ;, o 




JR 


[3 1 


GO FOR NEXT CHARACTER 


FC7C 


EB 


019 5 


SBC 3 


FX 


DE,HL 


PUT CURRENT END BACK IN HL 


FC7D 


112FFB 


01960 




LD 


DF, BEGIN 


-2 


FC80 


D9 


019 7 




oxx 




NORM REGS 


FC81 


AF 


1 9 8 C 




XOR 


A 




FC8 2 


t-dcbooce 


010 3 


CHSET 


SET 


0, ( IX. 0) 


CHARACTER MODE 


FC86 


JL827 


0-00 


i 0100 3 2 


JR 


LDCRT 


(RETURN TO TERM 


FC8 8 


FE73 


2 10 


SSCK 


CP 


7JH 


SHIFT S?( SIGN-ON) 


FC8A 


2 o : u 


02020 




JR 


NZ,SRCK 


SKIP IF NOT SHIFT S 


FC8C 


2 1 F n 


02 03 




0D 


KL,SIGNON 


FC8F 


7E 


020140 


LP3 


LD 


A,CHL) 


GET CHAR 


FC90 


B7 


2 5 




Of. 


A 




FC91 


28 EF 


2 6 




JR 


Z, CHSET 


QUIT IF NULL BYTE 


FC93 


23 


2 0- C 




1 NC 


HL 




FC9ii 


E5 


2 000 




PUSH 


111 




FC95 


F5 


3 2 




PUSH 


AF 




FC9 6 


CPOIiFD 


o o : o o 




CALL 


SEND 




FC99 


Fl 


02110 




POP 


AF 




FC9A 


CDliEFF 


2 12 




0.000 


CRT1 




FC9D 


El 


2 10 




POP 


HL 




FC9E 


1SLF 


2 10 







005 




FCAO 


FE72 


210 


3RCK 





7211 


SHIFT R?(REPEAT LINE) 


FCA2 


DMCB009 E 


O22G0 




RES 


5 , < : X - 1 


;CLR REPEAT FLAG 


F C A b 


2007 


2 17 




JR 


02, 0: CR1 




FCA8 


D0CB00DE 


218 




0EO 


3,(IX*0) 


;SET REPEAT FLAG 


FCAC 


C3BFFB 


02100 




JP 


KEYS 




FCAF 


oncBooue 


2 2 3 


LDCRT 


BIT 


, < 1 x * ) 




FCB3 


2806 


2 210 




JR 


Z,LNE 


;JUMP IF LIME MODE 


FCB5 


COOUFD 


02220 




CALL 


SEND 


•ELSE SEND IMMEDIATELY 


FCB8 


C3A7FB 


2 2 




JP 


KEYS1 


;LOOP BACK TO RECV 


FCB8 


CDIiEFF 


2 2 .i 


LNF 


00;. 


OR 5 3 


;DISPIAY IF IN LIME MODE 


FCBE 


C39FFB 


2 2 5 




JP 


KEYS 


;L00P 






2 2 5 5 


;•*• LIN! 


SCAN ROUTINE •** 


FCC1 


2A2CI.O 


02260 


ETX 


LD 


HL,(CSRPOS);LOAD CURSOR POSITION 


Frcii 


AF 


022-0 




XOR 


A 


•CLEAR CARRY 


FCC5 


1! t, a 2 


072EC 




LD 


D,CIX+2> 


; START 


FCC8 


DD5E01 


02250 




LD 


, ( ! X • 1 ) 




FCC8 


ED52 


02500 




500 


HL,DE 


# OF BYTES 


FCCD 


7C 


2 310 




LD 


A,H 




FCCE 


E603 


2 3 2 




AND 


3H 


LEN <li00H 


FCDO 


67 


02^50 




ID 


H,A 




FC01 


E8 


2 5i-0 




EX 


0E,HL 


BYTE COUNT IN DE 


FCD2 


DD66 02 


2 5 




n 


H,(IX*2) 


START OF LINE 


FCD5 


D36F.01 


02 50 




LD 


L,( iX.l) 




FCC8 


7A 


3 2 3 7 


TSTCT 


LD 


A, '7 




FCD9 


B3 


2 38 




OR 


E ■ 




FODA 


280C 


2 5 




JR 


Z, L. MOO 1 


IF BYTE COUNT-0 


FCDn 


7E 


02000 




LD 


A,<HL) 


CHARACTER TO SEND 


FfDD 


2 3 


o 2 o : : 




INC 


HL 


.POINT TO NEXT CHAR 


FCDE 


E5 


02U2C 




PUSH 


HL 


.SAVE POINTER 


FCRR 


D5 


2i>50 




PUSH 


DE 


•SAVE COUNT 


FCEO 


CD0I.FC 


2 0O 




CALL 


SEND 


TRANSMI1 CHARACTER 


FCE3 


1)1 


2 




POP 


DE 




FOE* 


El 


2 6 




POP 


HL 




FCE5 


IB 


2 14 7 




DEC 


DE 


; DECREMENT COUNT 


FCE6 


18F0 


021480 




JR 


TSTCT 


;GET NEXT CHARACTER 


FCE8 


DOCB005F. 


2 


SNDCR1 


01 ' 


3,(IX*0) 


;TEST REPEAT FLAG 


FCEC 


2809 


02500 




JR 


2, SENDCR 


;IF NO REPEAT, JUMP 


FCEE 


SAU0 38 


02510 




LD 


A,(38ltOH) 


FCF1 


FE02 


02520 




C p 


2 


•IS IT CLEAR? 


FCF3 


2802 


02 50 




OP 


Z, SENDCR 




FCF5 


18 CA 


0251.0 




JR 


ETX 


REPEAT LINE 


FCF7 


3i on 


2 5 5 


SEN0CR 


LD 


A, 0DH 


,CR 


FCF9 


CDOUFD 


02000 




CALL 


SEND 




FCFC 


5E0H 


325 70 




ID 


A,CPH 


CR 


FCFE 


CDUEFF 


02580 




A 


CRT1 


DISPLAY 


FnOl 


C3A7FB 


02590 




JP 


KEYS1 








2 5 9 5 


;*** 


TRANSMIT 


OOOOi NO 


PARALLEL TO SERIAL *** 


FDOt 


37 


02600 


SEND 


OR 


A 




F005 


08 


2 10 




R F T 


Z 


;DONT SEND NULL CHAR 


F D 6 


Ft 80 


2O2O 




OR 


8 DH 


;ADD MSB 


FP08 


57 


02630 




SCF 




;STOP BIT (SET CARRY) 


FD09 


F5 


026!i0 




POO" 


AF 


;SAVE 


FDOA 


525F5C 


2 3 




LD 


C3C3FH), 


A 


FOOD 


210100 


O20O0 




LD 


HL,HI 


SPA OF 


FD10 


CR2102 


2 6 7 




CALL 


PORT 


; OUTPUT IT 


Fnl3 


CMSFD 


02680 




OO00 


DLY 


;ONE BIT TIME 


FD16 


06 08 


0200 




LD 


B,8H 


;8 BITS ♦ STOP 


F018 


Fl 


2 7 


BIT0 


POP 


AF 


;GET BYTE 


FD19 


IF 


02700 




00 A 




SHIFT BIT TO CARRY 


FD1A 


F5 


2 7 2 




PUSH 


AF 


SAVE WHAT'S LEFT 


FD1B 


SCO', 


2 7 3 




JR 


NC,ZER0 


A0 0-0 


FD10 


2 10 2 00 


02700 




LD 


HL,LOW 


CARRY=1;MARK 


F020 


1803 


02700 




JR 


OUT 


TRANSMIT IT 


FD22 


210100 


2 7 6 


ZERO 


LD 


HL, H 1 


; SPACE 


F025 


C 1)2132 


7-70 


OUT 


CALL 


PORT 


WRITE IT 


FD28 


COiiSFD 


32 7 8 




CALL 


DLY 


ONE BIT TIME 


'" Ci 2 1-: 


05 


02 700 




DEC 


B 


COUNT DOWN 


FD2C 


2 0EA 


02300 




OR 


NZ, HI ro 


LOOP IF NOT DONE 


F D 2 f 


Fl 


02 B 10 




POP 


AF 


HOUSEKEEPING 


f d :: F 


CDU5FD 


02820 




CALL 


DLY 




FD32 


CDI.5FD 


028 50 




CALL 


DLY 




FD35 


C9 


0281(0 

2 
02860 




RET 






FD36 


21CS00 


2 8 7 3 


D L V 3 


LD 


HL, : 3 


3.0 MS 


F039 


is on 


2080 




JR 


LOOP 




FD3B 


211000 


02890 


DLY5 


L D 


HL/T0 


SET FOR .5 MS 


FD3E 


18 8 


02-00 




OF 


: OOP 


DO IT 


FniiO 


215 10 


2 10 


OLY12 


LO 


HL,T1 


SET FOR 1.2 MS 


PL0O3 


: i o s 


02020 







LOOP 


DO IT 


FDI.5 


21E100 


02930 


D1V 


ID 


HL, TBI ! 


BIT TIME 


FPU8 


28 


029U0 


LOOP 


DEC 


HL 


COUNT 


FDU9 


7 


02950 




LD 


A,H 


MOB 


FDUA 


B5 


02960 




OR 


L 


LSB 


FtlliB 


20FR 


020 7 3 




JR 


NZ,L 10 P 


IF SOT DONE 


FniiD 


C9 


02980 

0,000 




FI- 




NOW DONE 


0006 




03000 


MODE 


LE " 3 


6 


RESERVED FOR POINTERS 


FD5U 


3E10 


5 10 


CLRLI N 


LD 


A, 29 


CURSOR TO BEGIN OF LINE 


FD56 


( 05 300 


5 2 




OALO 


CRT 




FD59 


3E1E 


030«0 




LD 


A, 30 


CLEAR TO EOL 


FD5B 


CD3 300 


3 




CALL 


CRT 




FOSE 


C9 


0<030 
03060 
03070 


> 


RET 






FD5F 


F5 


03080 


GETCR3 


PL -OK 


AF 


SAVE INPUT 


FD6 


5 EOF 


5 30 




ID 


A, 0EH 


TURN os CURSOR 


FD6 2 


CD 3 3 00 


03100 




CALL 


OPT 




mi 


2A2OU0 


3110 
03120 




POP 


AF 


jRESTORE 




LD 


O0, (CSRPOS);GET CURSOR POSI TION 


FD69 

FPtC 


DO; i-OO 
DD75 01 


3130 

05100 




D 
LD 


( 1 X - 2 ) , H 
CIX*1),L 


;START POSITION 


F06F 


C9 


315 

510.0 

j ; 7 c 

318 




RET 
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FD7 3A1.0 5S 
FD75 FE09 
FD75 CO 
FD76 210100 

FP79 002132 
FD7C 18-2 



F07E D9 



05190 BREAK 

03200 

5 210 

5 2 2 

5 2 5 

0521.0 

5 250 ; 

03260 ;••« 

a > ? ; a modei 



ld 
cp 

RcT 
LD 

TALI. 

09 



A,(38ftOH) 

H ;CHECK BREAK KEY 
;GO BACK IF NOT 



HL,HI 

PO.R1 
BREAK 



;0UTPU1 space: 
;LOOF 



BASIC PROGRAM RECEIVING WOOF 



FD7F F[)^R16U0 03280 



5 3 P9 

FOS. 21E5FC 

F087 2216UO 
F08A CDI.A1B 
F08D 218EFE 
FD90 CDA728 
FD93 CDBOFD 
FD96 C06AFB 
RT1M 
FH9 J 260A 
F09B FEU. 
F09D 280D 



03290 

3 5 
3 510 
03520 
033 50 
3 5 
03350 
05360 LP1 

05370 

03 3 SO 
D 5 5 9 



Fngr POCS0356 031.00 



FOA3 2807 

FDA5 3AI.038 

F"A8 FE02 

F"AA 2 05 A 

FDAC 139 

FDAD OD5E03 

FPRO D0560<> 

FDB3 OF 

FDSI. 2028 
MPTY 

FDB6 CD01FE 

FDB9 D9 

FDBA C3U2F3 

FDBD D9 

fose 2aaui.0 

f:;c: 110001 

FDC4 19 

FOC5 0071.01. 

I -05 DD7505 

FDCB 112FFB 

FOCE D9 



0301G 
031.20 LP2 
031.30 
031.110 

03450 QUI T 

03-60 

031*70 

031*80 

03U90 

33303 
03510 

3 5 2 

03530 3UFS1 

035,0 

3:50 

035 60 

03 5 7 

35 8 

03390 

03600 



FDCF PDCB00D6 0361C 



FOD3 09 
FOOU 77 
F1D5 23 

FDD6 7D 
ED07 F680 
FOD9 323530 
FODC DF 
FOOD C9 
FDDE 360D 
I DEO EB 



03620 

03630 RUFENT 

5 6 1. C 

05650 

03660 

03670 

01030 

03690 

J3700 BUFNE 

03 7 10 



E I ' 
LD 
EXX 
LD 



CALI 

CAI !. 

ALL 

J H 
BIT 

J P. 
LD 



RST 
JR 

i3A! L 
EXX 

JP 

FXX 

LD 

LD 

AOL' 

LD 

LD 

LD 

f XX 

SET 

PET 

LD 

INC 

LD 

(OR 

LD 

P.ST 



ALTERNATE REGS 
BC,(1.016H);SAVF KBD VECTOR 

;NORM PFOS AGAIN 
HL,KEYNEW;NEW KEYBOARD VECTOR 
U016H),HL; CHANGE VECTOR 
lBhAH ;EXECUTE NEW 

hi., ••mom; 

28a7h ;display prompt 

bufst ;init buffer pointers 

recv ;get char (buffer entry in 'c 

z, lp2 ; i f no input 

1kh ;oci. closes buffer 

Z,QUIT 

2,(IX+0>;BUFFER STILL OPEN? 

Z,QUIT ;JUMP IF CLOSED 

A,(38liOH) 

2 ;IS IT CLEAR? 

NZ,LP1 ;NOPE 

;ALT REGS 
E,(IX*3) ;GET START 
D, ( IX*!.) 

2H ; CHECK FOR - 
NZ, BUFNE ;SKIP IF BUFFER NOT E 

REST1 ;ELSE RESTORE KBD VECTOR 

;NORM REGS 
NAME ; RETURN TO TERM 

;ALT -' E '0 S 

;STAR1 OF BASI TEXT 
;=PFA0-i; -00 SPACE 
;START OF BUFFER 
;SAVE START 



HL, UOAIiH) 

DE, 100H 

HL.DE 

( : »•-;,!! 

(IX-3),L 

DE, BEG IN- 2 

2,(IX-0) 

( H L ) , A 
HL 
A,L . 

8 OH 
(3C3EH),A 



(HL),0DH 
DE,HL 



; BUFFER END 
;NORM REGS 
;OPEN BUFFER 

;SAVE CHAR 

;BUMP BUFFER POINTER 
; ACTIVITY INDICATOR 
;CONVT '0 GRAPHIC 
;TO SCREEN 

;"?-HL? 

;PUT IN TERMINATOR 

;ENC IN 05 ', START IN 



FDE1 


D9 


05720 




EXX 




;NORM REGS 


FnE2 


C37200 


3 3 3 




JP 


72H 


;RETURN 70 BASI 13 


FHE5 


09 


3 3 


KEYNEW 


EXX 


;ALT 


REGS 


FnE6 


7 5 


3 7 5 


KEYGT 


LD 


A, (HL) 


;GET CHAR 


FPL 3 


FEOA 


3-00 




CP 


OAH 


;LF? 


FnE9 


2005 


37 70 




JR 


NZ.CHOK 


.SKIP IF NOT 


FOEB 


2 3 


3 7 8 




INC 


Hi. 


;GO TO NEXT CHAR 


FOEC 


18F8 


03 79 




JR 


KEYGT 


;AND GET IT 


FDEE 


F5 


03800 


C.HOK 


PUSH 


AF 




FDEF 


DF 


OSS 3 




RST 


2 k 


;END? 


FnFO 


23 


05820 




; N C 


HL 




FOF1 


CC01FE 


03 8 30 




CALL 


Z,REST1 


J IF END 


Fr.f'O 


2808 


038I.O 




JR 


Z, RSTOR 


;SKIP IF END 


FDF6 


3 A. 35 


03850 




ID 


a,c38i.oh: 




FDF9 


FE08 


038 60 




CP 


8 


;?-' 


FDFB 


CC01FE 


3870 




CAI L 


z,re ;ti 




FDFE 


1 


05880 


RSTOR 


POP 


af 


;RESTORE CHARACTER 


F"FF 


D9 


0389 




EXX 




;NORM REGS 


FEOC 


C9 


03900 




n e t 




; BACK AND CONT 1 NUE 


FE01 


F.DU3161.0 


03910 


REST! 


LD 


(l*016H),BC 


;GET OLD KBD VECTOR 


FE05 


C9 


03920 




PE1 







-5 05 2 13 OFF 

FE05 2 2 2£<.0 

FEOC 231FFL 

FEOF CDA728 

FE12 037200 



FE15 79 

FE16 F5 

FE17 CO35O0 
FE1A Fl 
FE1B COCFD 

FOIL 09 



FE1F 10 

FE20 IF 

FE21 0000 

FE23 I.C 

FEU1 ODOD 

- Ei*3 57 

fe>;; oooo 

FF5P 52 

<NAME >. 
PE8C OPOO 
PESO 1C1F 
FE9 5 

S IT IS RECEIVED. ' 
FOOL ODOD Ofc 19 

FEC8 0*200 

GRAM WILL LIST AGAIN. 
FF01 ODOD 014210 

FF03 53 01*220 

HE PERM PROGRAM' 



3930 ; 

039.0 ; ••• 

03950 "0002 

03900 

03970 

03980 

03990 

01*000 ; 

01.010 ; 

03020 NEWl 

00030 

00000 

00050 

01*060 

01.070 

09 07? ; 

01.076 ;**• 

01.08 PROMPT 

00090 
09100 
1.1 10 

0.1:20 

00 350 
00 10 
05 130 

01.160 

00 170 PROMT 
01.180 



BASIC PROGRAM TRANSMITTING MODE 



LD 

LD 
LD 
CALL 

JP 



i D 



HL,NEWLP;NEW VECTOR 

<lf026H>,HL 

HL, PROMPT; PROMPT ADDR 

28A7H ;DISPLAY IT 

0O72H ;JUMP TO BASIC 




;CHARACTER I N A 



F F 5 5 OP 
FF38 1*2 

OF 00 



01.230 

002. r; 
01.250 
Oi.251. ; 
00258 ;*** 
0.20 CRT1 
01.270 

3.2 SO 



A, C 

PUSH AF 

CALL CRT 

POP AF 

CALL SEND 

RET 

SCRFEN PROMPTS 

DEFB 1CH ;H0ME UP 

OEFB 1FH ;CLEAR SCREEN 

DEFW ODODH ; 2 CR 

OEFM 'LOAD PROGRAM TO BE TRANSMITTED' 

DEFW OOOOH ;CR 

DEFM 'WHEN FINISHED, TYPE LLIST' 

DEFW ODODH 

OEFM 'RETURN TO TERMINAL PROGRAM BY TYPING 

DEFW OOH ; STRING TERMINATOR 

DEFW 1F1CH ;HOME UP & CLEAR SCREEN 

OEFM 'THE PROGRAM WILL LIST ON THE SCREEN / 

DEFW ODODH ;2 09 

DEFM 'WHEN IT STOPS, PRESS CLEAR. THE PRO 

DEFW ODODH 

DEFM 'SAVE THE PROGRAM AND THEN RETURN TO 7 

DEFB ODH 

DEFM 'BY ENTERING 

DFFW ODH 



•'NAM!./. 

;TERMI NATOR 



FFfcE B7 

FF.F 5 

YTE 

FF50 F5 

Ft51 DDCB0056 OU290 

FF55 2817 01.300 

FF57 FEOD 0U310 

FF59 2808 01.320 

FC5B FEOA 01.330 



NON SCROLLING VIDEO DISPLAY DRIVER 
OR A 
RET Z ;DON'T DISPLAY NULL B 



PUSH 

PIT 
JR 
C P 
JR 
CP 



AF ;OAVO CHAP 

2,(IX*0) ;BUFFER? 

Z,CRT3 ;NOPE AQAI N 

ODH ;CR? 

1 , CRT2 ; l-ES-ENTER I 5 BUF ' 

OAH ;LF? 

Program Listing 1 Continues 



BASIC Compiler, 

/i 



ACCEL2Plus: 

| * Bigger optimized subset 
| * Quicker compilation 
| " More compact output 
■ Almost total compatibility 

developed in England by Southern Software 




CA add 6 ;■, 



hmmm 



Allen Gelder Software ^i 36 
(415)387-3131 

Box 11721 San Francisco CA 9410 



sSee List of Advertisers on page 386 
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A NEWSLETTER FOR POCKET COMPUTER USERS 
This timely, compact publication provides up to the minute 
information on pocket computers, including models such as 
the Radio Shack TRS-80 PC-1 and PC-2, Sharp Electronic's 
PC-1500 and PC-1 211, Casio, Panasonic/Quasar HHCs, and 
others as they are announced. We only cover PCs capable of 
executing a high level language such as BASIC. 
D Up to the Minute News □ Product & Equipment Reviews 
D Important Operating Tips □ Practical Programs D More 
By Subscription Only: for a calendar year period (January - 
December). You get ail issues published to date for the calen- 
dar year in which you subscribe, at the time you subscribe. 

MC/VISA Phone Subscriptions: (203) 888-1946 
C! 1981/82 Charter Subscriber (Issues 1 - 20). $40.00 in U.S. 

(U.S. $48.00 to Canada. U.S. $60.00 elsewhere.) 
D 1982 Regular Subscriber (Issues 11 - 20). $30.00 in U.S. 

(U.S. $36.00 to Canada. U.S. $45.00 elsewhere.) 
D Sample issue. $3.00 in U.S. (U.S. $4.00 elsewhere.) *Due to 

credit card minimum, this item cannoi be charged. 

Orders must be accompanied by payment in full. We do not 

issue invoices for the POCKET COMPUTER NEWSLETTER. 

Thank you for your remittance. 

Name: 

Addr: 

City: State: Zip: 

MC/VISA #: Expires: 

Signature: 

*■ POCKET COMPUTER NEWSLETTER 

SI 35 Old State Road, Oxford, CT 06483 



y> 25 



I 




S& 



<f^ 




vO^ *& 



& 



RS204 



Attache style cases for carrying and protecting a complete computer set-up. 
Constructed of the highest quality luggage material with saddle stitching. Will 
accommodate equipment in a fully operational configuration along with 
manuals, working papers and disks. Never a need to remove equipment 
from case. Simply remove lid. connect power and operate. 

• RS201 TRS-80 Model I, Expansion Unit & Drives . . $109 

• RS202 TRS-80 Monitor or TV set 84 

• RS204 TRS-80 Model III 1 29 

• RS205 Radio Shack Color Computer 89 

• P401 Paper Tiger 440 445 460 99 

• P402 Line Printer II IV 89 

• P403 Epson MX70 or MX80 89 

• P404 Epson MX1 00 99 

• CC80 Matching Attache Case (5") 85 

• CC90 Matching Attache Case (3") 75 

• CC91 Matching Accessory Case 95 

compuTer case company *"*> ^^- 

5650 INDIAN MOUND CT. COLUMBUS. OHIO 432'3 (614) 868-9464 



Program Listing 


' Continued 








FF5D 2S0U 


01*31*0 




J« 


Z,CRT2 


;YES-ENTER IK BUFF 


FFSF FE20 


01*350 




CP 


2 OH 


; PRINTABLE 


FF61 380B 


3U36C 




OR 


CCRT3 


;NO-TRY DISPLAYING IT 


FF65 D9 


01*370 


CRT2 


E X i 




;GET BUFFER POINTERS 


FF64 CDD4FD 


01*380 




CALL 


BUFENT 


.; ENTER CHAR IN BUFFER 


FF67 2004 


01*390 




JR 


NZ,NFUL 


;Z IF FULL 


FF69 ODCB0096 OltltOO 




RlS 


2,(IX-0) 


;SHUT OFF BUFFER 


FF60 09 


01*1*10 


NFUL 


FXX 






FF6E Fl 


01*1*20 


CRT3 


POP 


,\' 


;RESTORE CHAR 


FF6F FEOD 


01*1*30 




CP 


13 


;CR? 


FF71 28U2 


01*1*1*0 




JR 


Z,CR 




FF7J FE08 


01*1*50 




CP 


8 ;BACK 


ARROW? 


FF75 2827 


01*1*60 




JR 


Z,8S 




FF77 FE20 


01*1*70 




OP 


5 2 


; PRINTABLE? 


FF79 08 


01*1*80 




OFT 


c 


;NO — RETURN 


FF7A 2A2040 


01*1*90 




LD 


HL, (CSRPOS) 


;SCREEN LOCATION 


FF7D 77 


01*500 




n 


<HL),A 




FF7E 23 


01*510 




I'.C 


HL 


;BUMP CURSOR 


FF7F 222040 


04320 




1 ?, 


(CSRPOS), HL 


; SAVE NEW LOCATION 


FF82 70 


01*530 




i.n 


A, L 




FF83 E63F 


04540 




AND 


3FH 


; BEGINNING OF LINE? 


FF85 CC8AFF 


01*550 




CALL 


Z, ERASE 




FF88 1839 


01*560 




JR 


LSTPOS 




CF8A 70 


01*570 


ERASE 


L.O 


A/L 


;CURS TO END OF PREV. 


LINE 












FF8R E6C0 


01*580 




A'.O 


0C0H 




FF8D 6F 


01.590 




L0 


L,A 




FFSF 2B 


01*600 




P>EC 


•II. 




FF8F 7C 


01*610 




_R 


A, 11 


;SET LINE TO ERASE 


FF90 EE02 


01*620 




XCR 


2 




FF92 67 


01*630 




OR 


H,A 




FF93 3620 


01*61*0 







(HL), 20H 


; ERASE LINE 


FF95 E5 


01*650 




'us; 


• HL 




FF9 6 Dl 


01*660 




PC? 


DE 




FF97 IB 


01*670 




DEC 


OE 




FF98 013F00 


04680 




OR 


BC,63 




FF9B EDB8 


04690 




LOOP 






FF9D C9 


01*700 




SET 






FF9E CDAFFF 


04 7 10 


BS 


0A0 


CSR 




FFA1 2B 


01*720 




DEC 


HL 




FFA2 7C 


01*730 




LP 


A,W 




FFA3 FE3B 


01*71*0 




CP 


3BII 




FFA5 2003 


01.750 




JR 


. NZ,NCT0P 




FFA7 21FF3F 


01*760 




on 


06, 3FFFH 




FFAA E5 


01*770 


NOTOP 


POSH 


HL 




-FA3 Fl 


01*780 




POP 


HL ;REST0RE CURSOR POS 


FFAC 1820 


01.790 




R 


SAVCSR 




FFAE 3E20 


01.830 


CSR 


LD 


A, 32 ;SPACE 




FF30 2A20U0 


01.810 




L0 


HL,(CSRP0S1 




FFB3 77 


31.8 2 




LD 


(HL),A 




FFB4 C9 


31.8 30 




RET 






FFB5 CDAEFF 


C 1* 8 1. Z 


CR 


CALI 


CSR 




FFB8 7D 


31.850 




LD 


A,L 


,-CURSOR TO BEGIN OF N 


EXT LINE 












FFB9 F6JF 


04 8SC 




OR 


3-H 




FFBB 6F 


048 70 




LD 


0, A 




FFBC 23 


0U880 




] NO 


HL 




FFBD 22201(0 


4 8 9 C 




LR 


(CSRP0S),HL 


;SAVE NEW POSITION 


FFCO CD8AFF 


49 




CALL 


ERASE 




FFC3 2A2040 


01.910 


LSTPOJ 


LO 


HL,(CSRPOS) 


;GET POSITION 


FFC6 7C 


01*920 




on 


A,H 




FFC7 FEltO 


1*9 30 




CP 


40H 


;ENO OF FRAME? 


FCC9 2003 


0l>9l»0 




0.0 


NZ,SAVCSS 




FFCB 21003C 


01*950 




LD 


«L, 50001 


;SET TO TOP 


FFCE 3E5F 


01*960 


SAVCSI 


LO 


A,95 


; CURSOR 


FFD0 77 


01*970 




10 


(HL),A 




FFD1 2220ii0 


01*980 




LO 


ICSRPOS),HI 




FFD"i C9 


01.990 


LAST 


001 






F831 


03 000 




END 


BEGIN 




30000 TOTAL 


ERRORS 










0531*6 TEXT 


AREA BYTES LEFT 






BEGIN FB31 


00340 


01960 


' 3 3 


05000 




BIT0 F018 


2 7 C 


02s 








BREAK FD70 


3 1 9 C 


00360 


1 5 


05240 




BS FF9E 


01*710 


01*1*60 








BUFENT F0D4 


3 6 3 


01.380 








BUFNE FD0E 


03700 


031*90 








BUFST FDBD 


03 5 3 


005 SO 


014 5 


03350 




CHOK FDEE 


C 3 8 C 


3 7; 








CHSET FC82 


01990 


02060 






i 


CKP0RT FB9C 


C 8 8 


0650 


006 


00710 00780 




CLRLIN FDS4 


050 10 


01160 








CR FFB5 


01*81*0 


01*1*1*0 








CRT 0033 


00200 


01710 


C3C20 


03040 03100 04040 




CRT1 FFUE 


01*260 


00860 


2 13 


02240 02580 




CRT2 FF63 


4 : 7 


04320 


3 4 






CRT3 FF6E 


OUi. 2 


4 5 


04360 






CRTST FBE0 


012 2 C 


0119 








CSR FFAE 


01.800 


0^:0 


04343 






CSRP0S U020 


002 7 


02 00.0 
4980 


3 12 


04490 04520 04810 


04890 04910 


CTRL FB09 


■oils ;■ 


115 








DLY FDU5 


2 9 3 


26 SO 


02780 


02820 02830 




DLY12 FD40 


2910 


00670 








DLY30 FD36 


02870 


307 00 


07 7 






DLY5 FD3B 


32890 


00890 








ERASE FF8A 


01*5 70 


5 3 


040 00 






ETX FCC1 


C22b0 


012>3 


02540 






GETCP FB5L 


00530 


0117 








GETCRS FDSF 


03080 


00530 


01040 






HI 0001 


C0180 


02660 


02760 


05 3 2O 




KBD 002B 


30250 


00970 


01030 






KEYGT FDE6 


3750 


03730 








KEYLP FBC8 


OHIO 


0,050 








KEYNEW FDE5 


03740 


03300 








KEYS FBBF 


1060 


01100 


OOioO 


02250 




KEYS] FBA7 


309 60 


30 51*0 


01030 


01270 02250 025SO 




KIN F8BA 


1 u 


000 3 








LAST FFD4 


01*990 










L0CRT FCAF 


2 2 


2 000 


02170 






LfCRTl FC26 


015 2 


01210 


013 8 


01470 




L0CRT2 FC86 


2 003 


01520 








INE FCBB 


02240 


02210 








LOOP FDI18 


0291.0 


02880 


2 9 


02920 02970 




LOW 0002 


00170 


00570 


02740 






LP1 FD96 


3 3 6 


031*1*0 








LP2 FDA5 


031*20 


03370 








LP3 FC8F 


02040 


021U0 








LPBIT FB78 


00700 


00760 








LSTPOS FFC3 


04910 


04560 








MODE Fnl*E 


03000 


(■0030 








M0DE1 F07E 


0327C 


0102 


0129 






M0DE2 FE06 


33 9 5 


01310 








NAME FB42 


301.10 


00390 


01130 


335 ?C 




NEWLP FE1S 


01*020 


03950 
















Program Listing 1 Continues 
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PRINTER GRAPHICS 
PROGRAM 

TRANSFORM YOUR VISICALC (tm)(l) FILES INTO HIGH-RESOLUTION CUSTOM GRAPHS 
ON YOUR TRS-80 (tm)(2) AND MX-80/GRAPHTRAX(tm)(3) OR PAPER TIGER (tm)(4) PRINTER. 



ELECTRONIC WORKSHEET 
MYK BJIft DJT W'J SIP 500 Mwr.ce> fcclir.js & Vol Jr. Val 



1221 
102 
100 
lit 
13/ 
130 
10? 
11? 
113 
111 
115 
11*. 
11? 
120 
121 
122 
123 
Hi 
127 



77, Oi 


?43.97 


370.10 


114.42 


130.7/, 




73.24 


072.70 


101.13 


110.12 


¥*4 






':■:':. a 


10.1,77 


13.51 


137.9? 




7?Tl4" 


Siiy.,<,? 


402, S? 


117.14 


132,12 




77.2; 


m^ 


J91.1? 


115.1? 


135.03 




7S.N 


JJ5.7C 


^":^V2 > 


114.07 


133.04 




7S.S! 


743,6? 


304.02 


■■112.0? 


133.43 




■:/,: 


96S.77 


350.34 


112.35- -<33.52 




74.35 


745. 1C 


387.13 


U2.« 


i;;.o? 




74.55 


744.47 


3.13. 30 


112.33 


133.47 




74.9? 


94?. 77 


374,10 








V?7.33 




401.73 


113.22 


134.77 





10(0 

~t3K 

104? 
214 
073 
90? 
900 
7 3 
"?U 
7ii 



573 24.S38 

*?S 17.275 

433 41.15? 

440 33.443 

1555 5.003 

1023 11.757 

420 23.?33 

433 23.313 

??3 12.407 

412 23.332 

- -4?1 21.547 
44?-. 23.22 

750 140 

1172 5.S59 



11.700 
3.405 
14.46? 
23.70? 
00. 0-k 
37.073- 
13.73? 
19.192 
24.532 
13.773 
13.524 
14.425 
10,333 



- 



WOF4KSHEE 


z~r 




nuwa KSE Vol 1M NYC! 


/a-b 


.310 


1231 41.21 77,31 


447 


' -1572,. 


102 23.87 


AIM 


547 


^-1025 
-132 


105 53.71 


37.70 


11V3 


104 67.40 


73.02 


40? 


277 


107 92.8? 


77.8? 


-133? 


-1042 


103 55.35 


77.5? 


-400 


-1512 


10? 53.19 


77.33 


33/ 


-1223 


112 48.74 


77.23 


230 


-?28 


_- —— 


_ 




-17,47, 



1 ; ,■ 1 / ■. \ -■ r-.i / it- ■ :i ■ 
»•«.»«. • • hi^urjG'' . ;-,*,-!> f-dr 
y-r*s iM(r-i) 





* HIGH RESOLUTION 
data Points/inch. 
CAPACITY - lOOO 
Points per graph. 

GRAPH SIZES - Pro 

>! 24" 

Plots 



- 60 x 72 

LARGE DATA 

Input Data 

* SELECTABLE 

1" sq. to 7" 

* STANDARD DATA SOURCE - 

Data -from VISICALC or 



USERS OWN PROGRAMS 
DIF (tm) (4) Format. 
FEATURE SELECTION - 
Pre- for mated For m 
screen or in users own program. 
* MINIMAL ENTRY REQUIREMENTS - 
Enter only name of Datafile and. 
location therein of data to be 
plotted. * MULTIPLE FUNCTION 
GRAPHS - Plots up to 10 Data 

Sets per graph. * DATA SYMBOLS - Plots data with user composed 
symbol shapes. * DATA INTERPOLATION - connects data points with user 
composed line shapes. * LINE/SYMBOL LIBRARY - Plots each Data Set 
with different line/symbol shape chosen from 12 line library. * 
CUSTOM LINES AND SYMBOLS - Has interactive screen-graphics program 
for composing symbol shapes. * AUTO SCALING - Selects scale values 
for ease of graph interpretation. User adjustable Mantissa Table. * 
GRID SELECTION - Prints selectable number of vertical and horizontal 
grid lines. * CALENDAR SCALE - Optionally prints names of month on 
horizontal scale. * CURVE SELECTION - Each Data Set may be plotted 
with linear or stair-step curves. * OPTIONAL MIN/MAX VALUES - 
Extends graph beyond the values of the Data Sets. * DATA SET 
DESCRIPTIONS - Prints text descriptions of each Data Set in graph 
legend. * TEXT ENTRYS - Prints graph title, axis labels, and date on 
graph. * USER FRIENDLY - Checks validity of input data and d'lsplays 
cause of errors. * COMPLETE DOCUMENTATION - Comprehensive 40 page 
Users Manual with examples covering data preparation, graph feature 
entry, composing lines and symbols, and technical notes. 



Introductory 1/2 Price Offer: 
(Ends Sept. 1, 1982) 





MODEL- I 




MODEL III 








■...« „=«=»==,.™>== 


REQUIRES: 


REQUIRES: 


* 


TRS-80 MODEL I, 48K 


s 


TRS-80 MODEL III, 4BK 


1 


SINBLE DISK DRIVE 


* 


TWO DISK DRIVES 


* 


NEWDOS+(tm> (6) DOS 


* 


TRSDOS 1.3 DOS 


* 


GRAPHICS PRINTER! 


:3 


GRAPHICS PRINTER: 




* MX-BO/ERAPHTRAX 


* MX-BO/GRAPHTRAX 




* MX-100 




t MX-100 




* 440-Q PAPER TIGER 








* 445-G PAPER TIGER 







TO ORDER: Send check or money order. Specify Model and Printer Type. Include $2.50 for 
postage and handling. Calif, residents add 6% tax. 



PHONE 
(714) 526-8435 



MICRO SOFTWARE SYSTEMS 

1815 SMOKEWOOD AVE. • FULLERTON, CA 92631 



^-526 



DEALER 
INQUIRIES 
WELCOME 



TRADEMARKS: (l)VISICORP, (2) TANDY CORP., (3)EPS0N INC., (4) INTEGRAL DATA SYSTEMS, (5)S0FTWARE ARTS INC., (6)APPARAT INC. 

vSee List of Advertisers on page 386 80 Microcomputing, June/July 1982 • 143 



BRBwsan 
TRS-80 





SAVE fl BUNDLE 

When you buy your S. 

TRS-80™ equipment! 1 

Use our toll free number to SI 

gg check our price before you buy ^ 

a TRS-80™ ... anywhere! f 

Don't delay . . . CALL TODAY ,^f 




SALES COMPANY 

704 West Michigan 

P.O. 80X8098 PENSACOLA FL 32505 

904/438-6507 

nationwide 1 800-874-1551 




TECO MONITORS 

RATED BEST BUY BY 
THE COMPUTER SHOPPER 



NOW AN EVEN BETTER BUY 



B & W MONITOR HIRES 119.95 

GREEN PHOSPHOR HIRES 129.95 

GREEN PHOSPHOR ULTRARES 144.95 

TRS-80 CABLE 5.00 

5%" DISK DRIVES WITH PS & CASE . . . 289.95 

FROM 

THE MAINE SOFTWARE LIBRARY 
P.O. BOX 197 
STANDISH, ME 04084 



CHECK MO COD (20% DEPOSIT ON COD: 
ADD $10 SHIPPING FOR MONITOR. $6 FOR 

DRIVES 



LNW-80-OWNERS 

WE HAVE SOME TERRIFIC IDEAS 
AND PRODUCTS TO MAKE THIS 
GREAT COMPUTER EVEN BET- 
TER. WRITE TO US FOR PACK- 
AGE BEFORE YOU BUILD. 



Program Listing 1 Continued 












NFUL 


F F 6 D 


o,^:o 


01*390 






N0T0P 


FFAA 


Oil 77 


ouso 






OLD LP 


FB2F 


00320 


GC5C0 


001*20 




OUT 


F-2S 


02770 


02750 






PORT 


221 


00260 


00580 


02670 02770 03230 




PROMPT 


FLIP 


0U080 


03970 






PROMT 


FE8E 


OU170 


03330 






PSKIP 


FBSS 


00 7 8 


00790 






QUIT 


FLAG 


03US0 


03390 


031*10 




RECV 


FB6A 


00630 


01000 


03360 




RESET 


FB63 


00570 


00500 


00880 




REST 1 


I E 1 


03910 


03500 


3 8 3 03 8 7 




RST0H 


FDFE 


03880 


038M0 






SAVCSR 


FFCE 


01*960 


01*790 


01*91*0 




sbco 


FCJ9 


01600 


011*20 


01580 




SBCl 


rem 


01650 


019K0 






SBC2 


FC60 


01810 


01730 






SBC? 


FC7C 


01950 


01660 


01910 




SBC* 


FC79 


01930 


01860 


01890 




SBC5 


FC6C 


01870 


01920 






SBCK 


FC28 


01530 


011*90 






SCCK 


FC1D 


011*80 


011*1*0 






SECK 


F C i 5 


01U30 


01U00 






SEND 


FD04 


02600 


01260 


02100 02220 021*1*0 02560 OU060 


SENDCR 


FCF7 


02550 


02500 


02530 




3ICK 


FBF0 


01280 


01230 






5 1 CN0N 


FB00 


00290 


02030 






SNRCR1 


FCE8 


021*90 


02390 






S PC K 


FC09 


01390 


01330 






S'-iCK 


"LAO 


02150 


02020 






SSCK 


FC88 


02010 


0151*0 






TO 


0010 


C0190 


02890 






Tl 


0051 


00200 


02910 






T2 


0087 


00210 








T3 


00C5 


00220 


02870 






T B 1 T 


00E1 


00230 


02930 






TESTI N 


FSCA 


01120 








TSTCT 


FCD8 


02370 


021*80 






TUBE 


FB98 


00860 


008U0 






ZV-10 


FD22 


02760 


02730 









Program Listing 2 


1 ' 


JTERM TERMINAL PROGRAM LOADER AND 


2 ' 


3UICKL0AD RELOCATING LOADER BY BOB HART 


3 ' 


LAST REVISION 8/1/81 


10 


CLS: 




Z1=PEEK(16562)*256+PEEK(16561): 




PRINT"OLD MEM-";Z1 


20 


Zl-Zl- 1237: 




POKE16562, 1 NTCZ1/256) : 




POKE16561,(Zl-INT(Zl/256)*256>: 




CLEAR 125 


30 

1*0 






.1-PEEKC 1656 2 )*256+PEEK( 16561): 




Pi?INT"NEW MEM"";Z1 


50 


Z2-Z1+ 1*9 


60 


J3-PEEK(VARPTR( A$ ) ■► 1 ) *2 56* PEEK( VARPTR ( A$ ) ♦ 2 ) 


70 


"ORX-Z3TOZ3+116: 




READY: 




?■■ K E 1 , Y : 




CK-(CK+Y)AND255: 




NEXT 


80 


FCK«135THENPRINT"LOADER CHECKSUM OK DELETE LINES 70-100 AND 200-2 

70. 
MOT DELETE LINE 280! REMOVE (') FROM EITHER LINE 170 OR 180."ELSE100 


DO 


90 


PRINT"SAVE THIS PROGRAM. AFTER SAVE RUN AGAIN.": 




STOP 


100 


PRINT"LOADER CHECKSUM ERROR. PROGRAM LOAD DISCONTINUED.": 




STOP 


110 


MO-Z1-C 61*256) 


120 


1 FMO<0THENMO=65536+MO 


130 


POKEZ3*3, INTCMO/256): 




POKEZ3+2,MO-( INT(MO/256)»256) 


11*0 


POKEZ3*6, INT(Zl/256): 




POKEZ3*5,Zl-(INT(Zl/2 56)*256) 


150 


POKEZ3*29, INT(Z2/256): 




POKEZ3'28,Z2-(INTCZ2/256)*256) 


160 


READ Z 


170 


'POKE 1 6 5 26, Z3-( INT(Z 3/2 56)* 256) : 




POKE16527,INT(Z3/256): 




X-USR( 0) : 




'REMOVE INITIAL REM FOR LV II ONLY 


180 


'DEFUSRC-Z3: 




X-USR( 0) : 




'DELETE INITIAL REM FOR DOS ONLY 


190 


PR1 NT"BAC REM DATA AT LI NE";X: 




END 


200 


DATA 21 7, 1, 1, 1, 17, 1,1, 21 7, U2, 2 55, 6U, 1.3, 35, 126, 2 51*, 32 


210 


DATA 1.0, 250, 183, 32, 21*, 6, 1,35, 126, 35, 182, 202, 1,1, 35, 91* 


220 


DATA 35, 86, 35, 126, 183, 1*0, 230, 251*, 1U7,32,21*7, 35, 126, 251* 


230 


DATA 32, 1*0, 250, 251*, 88, 1*0, 16, 251*, 83, 1*0, U7, 35, 237, 111, 126 


2i*0 


DATA 217, 18, 19, 217, 128, 71, 21*, 199, 35, 126, 35, 237, 111, 126 


2 50 


DATA 217, 111, 217, 128, 71, 35, 126, 251*, 32, 1*0, 250, 35, 237, 111 


260 


r,ATA 126, 217, 103, 9, 235, 115, 35, 111*, 35, 235, 217, 128, 71, 21* 


270 


DATA 161., 35, 12 6, 35, 2 3 7, 11 1,126, 181., 1*0, 15 5, 23 5, 19 5, 151*, 10 


280 


DATA 10 


290 


REM BD 00 BD KC HD AD BE DE KC MD ED DD FD OD BE DO LB OO BE ED GD 




D NO KC IE M| @@ QQ HG @@ HG @@ HG @@ HG @@ HG @@ KG 9@ SAN 


300 


REM HG @@ HG 9@ HG @@ HG @@ @@ JB FB 3D B8 XOB KO NC CL BC NH AD AB 




XBD KO BB OH AD JB XOB KO 8B FB 3D CO MM AS XND MO SGB 


310 


REM MM FC @@ A@ ML IL A@ ML XCF KO ML XMK MO MM KL Q@ Fl ML XOE MO H 




A DD AB B@ @3 ML A8 B@ 1 L A@ @3 G® ML XLI KO HL SAC 


320 


REM ML X@D MO ML XLI KO HL ML XFC MO ML XLI KO CM 1 N AK 0@ OD @A CO 




ML XFC MO ML XLI KO SB KO IG OB FN OG NO @F SCE 


330 


REM JO XHI KO FN OE ML XND OO 1 L ML XCF KO ML XKC MO KM 00 FN ^ 11 




ML X@G MO ML KB @@ GK @B J9 ML XJF KO NO BA SDD 


31*0 


REM JL XNG MO HA MN ML XOE MO HA IS ML X@G MO ML KB @@ GK HB GO FN O 




G NO KE JL XBD KO NO HA @B FQ ML XDE MO CL XNE KO SHM 


350 


REM NO JA @B C@ OJ HA FD NO M@ 8B Lg MM KL @@ FD JL XAL LO ML XD@ MO 




HA GK NO IF JL XNG MO NO OF JL XF@ NO NO MF @B SOS 




Program Listing 2 Continues 
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Program Listing 2 Continued 


360 


REM 


K@ MM NG 3@ NN AS MM GG 9@ OJ HA MA NO 9G QB F@ MM KL 39 NL HA F 
B NO EF @B F3 ML XMK MO OJ HA l@ NO CF QB G@ MM KL @@ SFN 


570 


W t M 


Fl OJ HA NE NO BF @B LE ML AM E3 MM KL 3@ NL HB 0@ MM KL 8@ NH M 
I IL A@ IM KN MM FF D9 MM NF C@ OM HB EC NG A@ fl@ C@ EO SFK 


380 


WtM 


IM ML CC @@ MM KL @@ ND HB J§ AO EO ML KC Q@ IM A3 A@ @0 IM AO 1 
M ML @F @@ JC @D HC KL OG HB MS JC @D HC KL GO QB F3 KL SAH 


390 


l( t M 


OP §B E@ HA CO C8 HA HL KN AA XOB KO IM OJ MM KL 50 FL HA GB NO 
CG @B OA AB X@@ KO NG GK HB ON CB EN EO ML XD3 MO SFK 


UOO 


•■< i r- 


AO ML XND 00 AN HA ON NO BG MM KL QQ Nl @B G3 MM KL @@ NM CL XOK 
KO MM KL 3@ FD HB F3 ML XD@ MO CL XGJ KO ML XND 00 SMC 


UIO 


!(bf 


CL XOK KO JB @B @D OJ MM FE B@ MM NE A@ MN BE LG FN CO GF KN MM 
FF B@ MM NF AO JG CK HB L@ NG CB EN EM ML XDg MO AM SJ@ 


U20 


,<tM 


AN KA HA 00 MM KL 00 NE HB l@ JC @D HC NO BO HR B0 HA JL NC MR M 
L XD@ MO NC MO ML XND 00 CL XGJ KO GK HL FO 0H GC Sl@ 


l<30 


'-• EM 


EO BC OC LC AB AO 00 ML AB Bg ML XED MO FO HO AO OA EO 0C EG AB 
BO @0 HA CO AB AO 00 ML AB B@ KL XED MO EO OB JN AO SKF 


fidO 


HhM 


ML XED MO ML XED MO 1 L AB EL 00 HA MO AB @A 00 HA HI? AB AE gfl HA 
C3 AB AN 00 KB LG EK 0B KO IL NC 0B ML XMF MO F@ SNJ 


»50 


•<tn 


NC MA ML CC 00 NC NA ML CC 00 IL EO NC N0 ML CC 00 AO JB §B 0D M 
M DG 80 KM EG AOI.L JC 0D HC NO D@ @L AB A0 00 ML AB BO SBC 


U60 


KkM 


HA BO IM UN KO FA 3D IM AB XEN MO BB FA 0D ML JD KA AB XNH NO ML 
GJ HB ML XMK MO ML XJF KO HB J0 NO DA HB M0 MM S@E 


k7G 


KbM 


KL 80 FE HB G3 JC @D HC NO B@ @B JN-IM MM NE CO MM FE D0 OM @B H 
B ML XA9 NO IM CL XBD KO IM JB DJ @D AA @@ A0 IA MM SFA 


1*80 


REM 


DG D0 MM EG CO AA XOB KO IM MM KL 30 FM IL GG CB MG FO 0H BC NC 
LC OM IL FC MO KN IM CL BG 00 IM NG NO JO SB CO C3 HA SCP 


490 


Kb" 


HO EO OM CB LL XAQ NO HB HO JC 00 HC NO H0 LL XA0 NO AO IM IL MN 
CD FA 9D IL AB XEA NO BB FB @D AB XOA NO ML GJ SNK 


500 


'U.M 


HB CL BG 03 IG-EO ML CC 00 AO ML XD3 MO 1 L LA OA M0 MO LD OD AD 
DO @8 0E BE OD GD BE AO MD @B OE OD SB BD ED SB DE BE SAC 


510 


KhM 


AD ND CE MD ID DE DE ED DD MS MO GE.HD'EO ND «8 FD 1 D ND 1 D CE H 
D ED OD LB 8B DE IE OE ED SB SB LD LD ID CE DE M0 MO BE SBB 


520 


KIM 


EP OE EE 8E ND OB DE OD 08 DE ED BE MD IB ND AD LD @8 OE BE OD G 
D BE AD MD OB BD 1 E 0B DE 1 E §E ID ND GD SB 38 LC ND AD SGL 


530 


I't.M 


MD ED NC NB M0 00 LA OA DE HD ED @B @E BE OD GD BE AO MD 3B GE 1 
D LD LD SB LD ID CE DE OB OD ND 0B OE HD ED 08 CE CD BE SJM 


51*0 


K LM 


ED ED ND SB AD CE SB 1 D DE OB ID CE OB BE ED CD- EO I D FE EO DD N 
8 MS MO GE HD ED ND 38 ID DE OB CE DE OD 3E CE LB 0B 0E SIO 


550 


II Ki 


BE EO CE CE OB CD LD EO AD BE N8 SB OB DE HD ED 08 BE BE OD GD B 
E AD MD @B GE ID LD LD 0B LD ID CE OE SB AD GO AD IP NO S0H 


560 


KtM 


NB MS M0 CE AD FE ED 0B DE HD ED OB 9E 8E OD GD BE AD MD 8B AD N 
D DD SB DE HD ED ND 6B BE ED DE EE BE ND @8 DE OD ■ QB DE SJB 


570 


KtM 


HD ED QB DE ED BE MD @B@E BE OD GD BE AD MD Mfl BD 1 E OB ED ND D 
E ED BE ID NO GO @B @B LC ND AD MD ED NC NB MS 00 GK HL SGM 


580 


KtM 


EO MM KL 00 FE HB GA NO M@ HB H@ NO J@ HB D@ NO OB HC K8 IM ML X 
DM MO OB DO MM KL SO Fl IM AO NO M3 HB BD NO HS HB GB SflG 




ktM 


NO 3B HM JB OB 3D GG CB BB 0B 9D MG FN OC LL XJH 00 HA IC MG FN 
@L OF KB LG NN B0 GF FC SB EN AM KA A0 OC 90 MN HK IL SJD 




ktM 


ML XNJ 00 <C LG NO KC 0B CO AB 00 CC EN AN HA @E NC 03 JB .11! @D 
GG IL ML XNJ 00 MG FO OC OF CB BB OB OD ML XJH 00 SI 1 






JR 08 0D LG NO 0D SB CS AB @0 LC NC OE GG BB 08 @D 1 L SDB 




Basic Operating System 

Wno naada K? Ewym who wrttaa or urn program In BASK. 
Foe Tap* nWn K'a Ilka having a DO* without tha haroNnra! 
For Dtak ayatama H provMaa tha Itructura that DOS ooaan'tl 
Whan you CLOAD thia maonlflcant Syatam you gat ovar 30 pow- 
arful programa, routlnaa and aubrouunaa at your dlract com- 
mand or horn • 9-chotca Manu that can vary aatHy ba dou- 
btad and cuatomUad to your naada. Daalgnad to ba uaad aa 
•atock" for ALL BASIC proorama Stmptv add your proorama 
to It and navar atari from 




* It wHt atandardiza your writing and aava you many houn 
of dabugglng and rewriting utility functions. 

* K will hatp you structura YOUR OWN program. 



"One* you' 



IASK MOOCLWl DISK 



ou vm uimd It, you'll nmvmr writ* 
lothw program without III" 



ccmti I cow3i 



CO022 ICO1032 



DEMO TAPt^ $S FULLY REFUNDABLE 
ON QUALITY CASSETTE * MANUAL 



ORDER PHONE 

(S03) 649- 4926 




•35 



SEND CHECK, MONEY ORDER OR NUMBER AND 
EXPIRATION DATE OF YOUR CREDIT CARD TO 

WESinSFSM OKIfMTODMS *" 179 

6«40 SW T73 AVENUE, BEAVERTON, OREGON 97007 

"*» 




1236 E. Colonial Drive 
Orlando, Florida 32803 USA 
Voice (305) 894-4744 
BBS 24 Hour Electronic Mail 

Order (305)277-0473 
Micronet 71555,520 



DISK WITH / MANUAL 
MANUAL; ONLY 



MICROPRO® 

Super Sort I . . . .$192/$36 

CalcStar $250/$36 

Spell Star S175/NA 

WordStar $315/$54 

Mail Merge S104/NA 

Word Star/ 

Mail Merge. . .S410/NA 
Word Master ....$115/$36 
Data Star $244/$54 

MICROSOFT® 

Basic-80 $285 

Basic Compiler . . . .$325 

Cobol-80 $570 

Edit-80 $ 82 

Fortran $345 

Macro-80 $140 

Xmacro-86 $255 

M-Sort $120 

Mu Math/ 

MuSimp $220 

Mu Lisp/ 

MuStar $170 

Typing Tutor $ 27 



PEACHTREE® 

General Ledger .$399/$40 
Acct Receivable $399/$40 
Acct Payable . . .$399/$40 

Payroll $399/$40 

Inventory $399/$40 

Surveyor $399/$40 

Property Mgt . . . $799/$40 
CPA Client 

Write-up $799/$40 

P5 Version Add $129 



Plastic File Box 

50-5 '/<" $ 19 

5 V." Library Case .$ 3 
8" Library Case . . .$ 4 
Head Clean Kit. .. $ 23 

Floppy Saver $11.95 

Floppy Saver Rings$ 6.95 

RIBBONS 

Radio Shack® 

LP1.2&4 4pk$18.95 

LP3&5 . 3 pk refill $13.95 
LP6&8 . 3 pk refill $11.95 
Daisy Wheel 
(black) 10 pk refill $24.95 
(brown, blue or red) 

6 pk refill $24.95 

Epson MX-S0/& F/T 
3 pk refill $16.95 



Write For Free Catalog 

Over 700 items in Diskettes, 
Business Software, Games, Utilities, 
Paper, Labels, Ribbons, Checks, 
Storage Boxes, Furniture, Binders 
and Hardware. m - Mfg. Trademark 

FREE SHIPPING except hardware 



MICROSOFT' 

Z-80 Softcard ...'... $295 

RAM card $155 

Basic Compiler . . . .$299 

Fortran-80 $175 

Cobol-80 $499 

Tasc $135 

Typing Tutor $ 21 

Olympic Decathlon .$ 25 

MICROPRO® 

Super Sort 1 . . . .$155/$36 

Mail Merge $• 85/NA 

Word Star $238/$36 

Word Star/ 

Mail Merge . . .$319/NA 

CalcStar $155/$36 

Data Star $225/$54 

Spell Star $149/NA 

PERSONAL SOFTWARE* 

Visicalc3.3 $155 

Visiterm $127 

Visiplot $145 

Visidex $155 

Visitrend/Plot $225 

Visifile $195 

Desktop/Plan II . . . .$155 
Visipak $555 



RADIO SHACK 



MODEL I & III* 

NEWDOS80 2.0 $139 

LDOS5.1 115 

Maxi-Manager $ 89 

GAMES 
Adventure International 
Big Five Qty,1-5%Off 
Avalon Hill 2-10% Off 
Med System 3-15% Off 
Acorn 5-20% Off 

Epyx and Others 
MODEL II® 
CREATIVE COMPUTER 
Depreciation 

System $350/25 

Inventory Control $495/25 
Other Acctg. SystemsCall 
Yahtzee $ 24.95 



HARDWARE 



PRINTERS 

Epson MX 100 Call 

Epson MX 80FT Call 

Epson MX 80 Call 

Okidata80A $349 

Okidata82A $489 

Okidata83A $729 

Okidata84 $1049 

NECPC8023A $550 

NEC 7710 Call 

NEC 7720 Call 



MODEMS 

Hayes Smart Modem $245 
Hayes Clock- 

Cronograph $235 

Lexicon-11 Acoustic $139 
Lexicon-12 

Direct/Acoustic . .$159 

MONITORS 

AmdeklOO $139 

Amdek 100 Green. . .$155 

AmdekColorl $349 

Sanyo 4509 9" $199 

Sanyo 5109 9" Grn . .$219 
Sanyo 6013 13"Coior $419 

NECKB1201 M $179 

NECJC1201 M Color. $349 

TERMINALS 

Adds Viewpoint . . . .$589 

Televideo910 $569 

Televideo920C $739 

Televideo912C $679 

Televideo 950C $929 

s 190 

Most orders out in 24 hours 
with VISA, M/C, Money Order, 
Cashier Check, Bank Wire 
and C.O.D. Personal check 
over $150 allow 10-14 days. 
Mail order only. Prices subject 
to change 9-8 M-F, 9-6 Sat. 



•See List of Advertisers on page 386 
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c < PRICES ON DISKS 

j&tf? MODEL I OWNERS 

80 TRACK TEAC DISK DRIVE W/CASE & POWER SUPPLY* 

Single or Double Density 

$299.00 

40 TRACK TEAC DISK DRIVE W/CASE & POWER SUPPLY 

$239.00 

TWO CABLE DRIVE $23.99 
NEWDOS 80 $125.00 When Purchasing a Drii 

Bare Drives & Cases Available Upon Request 



%< 



*# 



>nve 



By the time you see this ad, DISPLAYED VIDEO'S Hard Disk will be available to you. 

Call for the Lowest Prices Available 

*Only 132 Available. When they are gone, they're gone! (Act Soon) 

EPSON PRICES 

We're not going to make you call for prices. 
Here they are in black and white!! 



Without GRAPHTRAX 



MX 80 W/GRAPHTRAX $459.00 

MX80FT $545.08 

mxioo $729.00 
printer cable $23.99 

We Carry a Full Line of OKIDATA Printers 



Visit Our Two 

NEW RETAIL LOCATIONS: 

886 Ecors« Road, Ypsilanti, MI 48197 
(313) 426-5086/ (313) 482-4424 
111 Marshall Street, Litchfield, MI 49242 
(517) 542-3280 








IMMEDIATE DELIVERY 

90 Days Parts and Labor Warranty 
DEALER INQUIRIES INVITED 

Free Shipping in the U.S. 
48 Contiguous States 



Grand Opening of our Radio Shack Authorized Dealership at: 

111 Marshall Street, Litchfield, Michigan 49242 PI 42 

To Order: Call (313) 426-5086 or (313) 482-4424 or (517) 542-3280 or write DISPLAYED VIDEO, 
886 Ecorse Road, Ypsilanti, Michigan 48197 

"TRS-80 is a trademark of the Tandy Corporation Prices subject to change without notice 



J 
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DISPLAYED VIDEO IS DRIVING 

PRICES ON DISKS 

DISPLAYED VIDEO is now offering TRS-80* MODEL III with TANDON or TEAC disk drives, your choice, one of the 
most reliable disk drive systems on the market, for incredibly low prices. 

MODEL III with 48K, dual 40 track double density disk drives, complete systems with TRSDOS and one box of diskettes 

PLUG IT IN AND GO $1,799.00 

MODEL III with 48K, dual 40/40 track double density disk drives, complete systems with Newdos 80 and one box of 
disKPttcs 

PLUG IT IN AND GO $2,199.00 

MODEL III with 48K, dual 80 track double density disk drives, complete systems with Newdos 80 and one box of 
diskettes 

PLUG IT IN AND GO . . . . . ... ........ $2,199.00 

MODEL III with 48K, dual 80/80 track double density disk drives, complete systems with Newdos 80 and one box of 
diskettes 

PLUG IT IN AND GO $2,499.00 

MODEL 16 w/1 drive / w/2 drives CALL 

4K Color Computer $314.99 

MODEL III Internal Drive Kit: Includes controller board, dual drive mounting bracket, dual power 
supply, all hardware cables and connectors $399.00 



> 



IMMEDIATE DELIVERY 

90 Days Parts and Labor Warranty 
DEALER INQUIRIES INVITED 

Visit Our Two I 1 r~ ^5! r*V Free Shi PP in 3 in the US - 

NEW RETAIL LOCATIONS: Lt&%. ■ I1/QDi i.. 48 Contiguous States 

886 Ecorse Road, Ypsilanti, MI 48197 
(313)426-5086/(313)482-4424 

111 Marshall Street, Litchfield, MI 49242 
(517) 542-3280 

Grand Opening of our Radio Shack Authorized Dealership at: 

111 Marshall Street, Litchfield, Michigan 49242 P142 

To Order: Call (313) 426-5086 or (313) 482-4424 or (517) 542-3280 or write DISPLAYED VIDEO, 

886 Ecorse Road, Ypsilanti, Michigan 48197 ^ 62 

'TRS-80 is a trademark of the Tandy Corporation Prices subject to change without notice 
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SERIES 



How is a chip like a cockroach with 16 legs? 



For the Novice 




Jay Chidsey 

205 E. Adams St. 

Green Springs, OH 44836 

This is the first of a six-part series we call 
"For the Novice." It is intended for people 
who have had no previous experience with 
computers, and who are only 6-18 months 
into their use of this exciting technology. 
This month Jay Chidsey discusses the 
MEMORY SIZE? facility, high and low line 
numbers, high memory and low memory ad- 
dresses, and high-level and low-level lan- 
guages. We encourage the reader's re- 
sponse to this new series. — Eds. 

Every time you turn on your computer, 
you are asked MEMORY SIZE?. You 
have to figure, as I did when I first used 
my Model I, that somebody thinks this is an 
important question, and should have an an- 
swer a bit more definitive than pressing 
Enter. 

The memory size question is a facility 
you are almost never going to use. Your 
response, in the form of a high address, 
reserves a certain amount of high memory 
space for low language use. But, this func- 
tion, while important, is seldom used. 

High Memory designates addresses 
above memory location 30000 on a 16K ma- 



chine. These addresses are even higher on 
a 32 or 48K machine. Entering a high mem- 
ory address in response to the memory size 
query reserves high memory for a machine- 
language program. The programs you load 
into your computer using the System com- 
mand are written in machine language. 
High address and high memory are ana- 
logous. They are not related in any direct 
way to line number. Line number is a Basic 
language requirement, whereas individual 
memory addresses are manipulated by 
machine language. Machine language oc- 
cupies the space you reserve by responding 
to the memory size question; the System 
command loads programs into specific por- 
tions of memory. Reserved memory will 
stay put if you enter the Basic command 
New but turning the TRS-80 off or resorting 
to Reset will wipe out all memory, including 
reserved memory. 

The use of high and low for memory and 
address, line number, and language can be 
confusing, since they deal with quite differ- 
ent concepts. A high-level language is one 
which is most recognizable to the user. A 
low-level language is one which is more rec- 
ognizable to the computer. Basic is a high- 
level language, as are Pascal, Cobol, For- 
tran and other more specialized languages. 
They permit us to use English-like com- 



1 'BASIC MERGE PROGRAM: DAVID LEMLEY, SAVANNAH, GA. 

2 'ENTER 32594 FOR MEM SIZE ON POWERUP 
10 FOR X=32595 TO 32712 

20 READ Y: POKE X,Y 

30 NEXT 

40 DATA 221,42,249,6 4,221,43,221,43,221,43,221,43,17 5,205,18,2,2 

05,150,2,6,4,205,53,2,16,251,20 5,53,2,221,119,2,183,32 

50 DATA 8,58,6 3,60,23 8,10,50,6 3,60,17 5,221,182,0,221,182,1,221,1 

82,2.221,35,32,225,205,248,1,42,249,64,229,221,225,17,235,66 

60 DATA 23 7,82,229,2 9,221,43,221,43,221,110,0,221,102,1,17 4,124 

,17 5,25,229,221,117,0,221,116,1,221,225,24,23 2,221 

70 DATA 229, 225,35.35.34,249,64,34,251,64,34,253,64,195,25,26 

80 POKE 16526,83: POKE 16527,127 

90 NEW 

Program Listing 



mands to program the computer. Machine 
language, which consists of groups of num- 
bers described in base 2 (ones and zeros) or 
binary notation, is the lowest level of 
language. It is the one your computer 
speaks. Our TRS-80s are designed to inter- 
pret Basic to machine language in the ROM 
(Read Only Memory). If you have a 16K 
(16,384 bytes) computer, you also have 
nearly that many thousand bytes of ROM to 
interpret your Basic commands. You actu- 
ally have a 32K computer, of which. 16K is 
available for your direct use as RAM (Ran- 
dom Access Memory), or programmable 
memory. A byte is a character, such as a 
number or letter or blank space. It is com- 
posed of eight bits— on or off signals 
(which represent a one or a zero). In the ear- 
liest computers, such as ENIAC, one bit 
was a DeForest diode tube. Later it was a 
transistor. Now it is a capacitor controlled 
by a field-effect transistor on a silicon chip. 
Printed circuits form or are integrated into a 
chip. The 16K memory of a TRS-80 Model 
l/IN resides in eight such chips— 1 x 16K 
chips which look like large flat-backed 
cockroaches with 16 skinny legs. 

There is one way, however, that you and I 
can use the memory size function without 
having to spend years in becomming so- 
phisticated machine-language program- 
mers. The Program Listing with this article 
offers a Basic program written by David 
Lemley of Savannah, GA, printed with his 
permission. He wrote it on a 16K Model I, 
but it works on a 16K Model III as well. 
This is a very useful merge program. 

To use this program, answer MEMORY 
SIZE? with 32594 (16K machines only) then 
type the program into your computer. Do 
not run it! CSAVE it to tape, and check it 
with CLOAD? to be sure you have a good 
recording, and then run it. What happened? 
The program disappears! Line 90 was NEW, 
and it cleared everything out below 32594. 
The merge program is now in high memory 
in low language (POKEd into high memory) 
above the barrier. You have used a Basic 
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program to stick a machine-language pro- 
gram into high memory. 

To use this program on a32K Model I or III 
enter 48978 for the memory size. Change 
line 10 to read FOR X = 48979 TO 49096 and 
change line 80 to read POKE 16526,83: 
POKE 16527,191. To use the program on a 
48K Model I or III enter 65362 for the 
memory size. Change line 10 to read FOR 
X = 65363 TO 65480 and change line 80 to 
read POKE 16526,83: POKE 16527,255. 

This merge program, safe in high mem- 
ory, can splice together several programs 
provided that each succeeding program 
has higher line numbers than the one pre- 
ceding it in memory. These will be programs 
that you write with higher line numbers and 
CSAVE for merging or existing programs 
that you renumber and CSAVE for merging. 

With David Lemley's Basic merge pro- 
gram protected in high memory, you may 
now CLOAD your lowest numbered pro- 
gram, or type it in. Now put the second pro- 
gram into the cassette machine, press play, 
and type in as a command A = USR(O) (that 
is a capital O, not zero), and press Enter. 
The cassette will turn on, your higher num- 
bered program will be added to the original 
program, and the two will be merged. I 
would CSAVE then before running or add- 
ing another even higher numbered program 
or doing anything else. You never know 
when a utility like this will crash and print 
garbage. ■ 



NOW IN STOCK 

ADVENTURE INTERNATIONAL 

ACORN SOFTWARE 

APPARATINC. 

BIG FIVE 

COMPUTERWARE 

EPSON PRINTERS 

INSTANT SOFTWARE 

MARK DATA 

MED SYSTEMS 

FANTASTIC SOFTWARE 

SPECTRAL 

WORD PROCESSORS 

BOOKS 

DISK DRIVES 

DISKETTES 

LOWER CASE MOD — MOD I 
$29.95 + $2.00 S& H 

AND MORE 

MOD I • MOD III -COLOR 

Visa & Mastercard 

Phone or Write for Catalogue 
(403)423-3919 

CMD MICRO 

10546- 106 Street 

Edmonton, Alberta 

T5H 2X6 



BOOKKEEPERS 



FOR INFO CALL (6031-447-2745 



Intermediate Bookkeeper— 48K, 2 Drive & Printer $109.95 

Ann Rcxse, our Accounts Receivable Clerk— 

48K, 2 Drive & Printer $ 150.00 

The Count— A variety of utilities such as weight, area and, capacity conversions; 
loan amortization; hex code conversion, etc. 

ASK disk $49.95 

All programs are for TRS80TM Model 1 or ID. 

STURDIVANT & DUNN, INC. -i*> 
BOX 277, 124 WASHINGTON ST., CONWAY, N.H. 03818 

(TRS80 is a trademark <rf the Tandy Gxp) 



>♦♦♦♦♦ »♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦ ♦ ♦ ♦ ♦ » 



PROFESSIONAL SOFTWARE 



TRS-80® MODEL II & 16 



BASIC COMPILER 

• TRSDOS® 2.0 COMPATIBLE 

• UP TO 30 TIMES FASTER 

DISK SORT • YOU DON'T HAVE TO BE A PROGRAMMER TO USE IT! 

• MENU DRIVEN • RANDOM FILES • EASY TO USE • SPEC'S SAVED ON DISK 

• EASILY INSERTED INTO JOB STREAM FOR NON-STOP RUNNING • FULL DISK CAPACITY 



BY MICROSOFT • EASY TO USE 

• INCLUDES M-80 & CREF-80 

• AUGMENTED WITH OUR DOCUMENTATION 



BASIC CROSS REFERENCE . save hours: 

• SEE USED LINE#s/NAMES AT A GLANCE • PRODUCES NICE PROG LISTING • INDISPENSABLE 

EPSON MX-80$475°° MX-100 $764°°* HURRY-LIMITED TIMEl 

PAPER 9V4x11 181b WHITE STRIPS TO 8V*x11 3,000/BOX 

MAILING LIST . high capacity • spans disk • no sorting 

• FAST RETRIEVAL-UPDATE • R/S CONVERSION INCLUDED • LONG/SHORT FORMATS 

• ESTIMATED AVAILABILITY - MAY 15, 1982 

"PLUS POSTAGE & HANDLING PRICES SUBJECT TO CHANGE WITHOUT NOTICE 

GOOD-LYDDON DATA SYSTEMS 

5486 RIVERSIDE DR., CHINO, CA 91710 ^ X 



NOW AVAILABLE! 4 
♦ 

$339.00* ♦ 

♦ 

$69.99* t 

DOC ONLY $10°° A 

DEDUCTIBLE I 

ON PURCHASES T 

$59.99* ♦ 

DOC ONLY $:0"" ♦ 
DED ON PURCH. ▼ 

$25.00* ♦ 
$149.95*} 

OOC ONLY $10° 4 
DED. ON PURCH. ♦ 
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TRS-80 & TRSDOS ARE 
REGISTERED 
TRADEMARKS OF 
TANDY CORP 



(714) 980-4563 



MASTER CARD or 
VISA accepted 



U CAN BET ON! 



POOL 



& % DRAWS 



Q. 



Here s Ihe program that will automate 
your oiiice pool lot professional tooiban 
POOL80 win 

• Keep track oi trie schedule 

• Print weekly entry forms 

• Prim selection summary lor players 
game time use 

• Tabulate results 

• Maintain cumulative records 
P00L80 requires only a few minutes 

eacn week lor updating Comesready to 
go lor the 1982 season Can oe used 
year alter year Diskette only 

Only $20.00 



This is me poker playing program that's 
getting the rave reviews 

"Alter a white each ot the simulated players 
takes on its own individual personality - 
it's most uncanny ORAWb has definitely 
sharpened my piaymg skills l Lloyd 
Martin 80 Microcomputing. Jan 1982 1 
"II you like playing poker, buy this program 
It will oe a long time before a better one 
comes along " (Richard Clope. Computer 
Shopper. Jan 1982) 

Five card draw Gardenia CA rules, lis you 
against six almost human opponents 

Only $15.00 



SPREAD 80 



The tops m professional football hanrfi 
capping programs This is another 
winner Irom Real World Simulations 
the designers ol DRAW5 SPREAD80 
showed an average weekly profit 
of $18 per $100 bet for the 1978 1979. 
1980 and 1981 seasons. 

if you bef football land who doesn 11 
at the casino, with a bookie, or in 
the olfice pool this is ine program 

'nr you 

SPREA080 comes on diskette 
ready for the 1982 season 

Only $25.00 



DRAWS supplied on 600 baud casselte Add $4 00'for TRS-80 
Model 1 or ill diskette All programs available on 8" disk lor Model 
11 at $6 00 additional. PA residents add 6% sales tax North Star 
diskette versions of DRAWS and SPREAD80 can oe oblamed 
Irom Reai Wonc Simulations Box 4107 Torrance. CA 90510 



WILSON Software Division 
539 Springhouse Lane • Camp Hill, PA 17011 

IrtS 80 is a Tandy Corporation trademark v" '"2 



VISA/MC Order Line Only (except Mich.) 800-253-4358 ext.100 

FINDISK-II The ultimate in automatic disk indexing with exclusive features Model-I $20.00 

AUTOMATICALLY create INDEX of programs or data from all your disks, print disk LABELS, print 
alphabetized MASTERLIST. do fast SEARCH, add DESCRIPTIONS. Also automatically: detect DATA or 
SYS disks, PURGE disks and index of old files, and UPDATE from revised disks only. 
SOLAR-I The critical calculations for passive design. . . Model-I $30.00 Model-II $45.00 

INPUT, any latitude, orientation, slope, roof overhang, storage type, building loss, OUTPUT: solar angles, 
shading, time, heat gain/loss, percent solar, fuel use. Print report by hour, month, year in presentation format. 
RIA-II Complex Real Estate Investment Analysis Model-I $30.00 Model-II $45.00 

Analysis for investor or homeowner using Elwood method. INPUT: Project costs, loan and tax data, 
expenses, depreciation rate. OUTPUT: Cap rate/value, mortgage payments, before/ after tax cash flows, return 
(IRR), profit/gain from sale over any time series 
DEPRECIATE-I Manage a list of depreciable items Model-I $15.00 Model-II $20.00 

Tracks long list of depreciable items with varying purchase dates, depreciation rates, or per cent business use 
Update an\ nine Print rax form Used by many CPAs 

STRUCT-I Graphic design of steel /wood beams and moment transfer Model-I $15.00 

INPUT: span/cantilever, uniform/point loads, beam material. OUTPUT: with screen graphics beam moment 
& shear diagrams. Print job report with diagram, stresses, and required beam sizes. 

Min 32K On disk (Modi one drive order tape) . Add $1 .00 postage (Mich add 4% tax) VISA/MC 
^193 DOCUM AN SOFTWARE BOX 387-A KALAMAZOO, Ml 49005 (616) 344-0805 
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A look at Datahandler, IDM-V and Maxi-Manager. 



Data Ba 




lagers— Part II 



The Datahandler 

Miller Microcomputer Services 

Natick, MA 

$60 

IDM-V 

Micro Architect, Inc. 

Arlington, MA 

$149 

Maxi Manager (Version A. 3. 1.) 
Adventure International 
Longwood, FL 
$100 

Wynne Keller 
Downeast Digital 
RD1 Box 4130 
Solon, ME 04979 



Part one of this series appeared in the 
August issue and compared three data 
base programs: Aids III, Maxi Micro Manag- 
er, and CCA. I will compare two more data 
base programs, The Datahandler from 
Miller Microcomputer Services, and Interac- 
tive Data Manager (IDM-V) from Micro Archi- 
tect, Inc. and rate them with the first three. 
In addition, since Maxi Manager has just 
been released in a substantially different 
version, I will examine any changes in it 
since the original article. 

Comparisons between two programs 
should normally only be made between pro- 
grams of similar price. It is unfair, for exam- 
ple, to compare a $20 Basic word processor 
to Scripsit. At first glance, it might seem the 
two programs I evaluate here are quite un- 
equal in price. However, because the Data- 
handler is written in Forth, it must be run 
with MMSFORTH. Therefore the total pack- 
age costs $190. It is not realistic to allot all 
the cost of MMSFORTH to The Datahandler, 
because Forth has other uses. If we allot 
half the cost of MMSFORTH for the data 
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base application, the package would cost 
about $125 which compares equitably to 
IDM-V at $149. 

The two programs use different data stor- 
age approaches. The Datahandler, like Aids 
III, is a sequential data base, which means 
each file's size is limited by the computer's 
memory. All records in a file are in memory 
at one time, and are written to disk at the 
end of a session. The capacity of The Data- 
handler in a 48K machine is about 24K of 
data, or roughly 300 records in a typical 
application. 

The IDM-V program, like CCA and Maxi 
Manager, uses random access files. This 
means records are written to disk as they 
are added, and brought back from disk on 
request. Only one or two records are nor- 
mally in memory at any given moment. The 
size limit is the number of records which fit 
on the disk, not the number which fit in 
memory. 

Readers not familiar with the use of a 
data base program are referred to part 1 
(August, 1981, page 222) of the series for 
definitions of field, file and record. 

Documentation 

Both these programs deserve praise for 
their documentation, which is written clear- 
ly and should offer few problems to a begin- 
ner. The Datahandler actually has two man- 
uals. The program's screen displays and 
command set are based on the PIMS (Per- 
sonal Information Management System) 
data base, originally published by Scelbi, 
Inc. The Datahandler is an original program 
with many enhancements, but the basic 
commands remain the same, hence this 
manual is included with The Datahandler. 
The PIMS manual is outstanding for begin- 
ners because it gives assistance in how to 
organize a data base. After reading the 
PIMS manual, turn to the Datahandler man- 
ual to learn the changes in some of the com- 
mands, and read about the sample files on 
the disk. Advanced portions of the Data- 
handler manual will be unclearto beginning 
Forth users, but you can set that part aside 



until you gain some experience with Forth. 

The IDM-V manual does not explain how 
to organize a data base but it explains well 
how IDM-V functions in the simplest possi- 
ble terms, emphasizing vital information 
several times and pointing out possible er- 
rors. A full-page troubleshooting guide at 
the end of the manual outlines common be- 
ginner errors such as keyboard hangup if 
the printer has no paper, or what to do if you 
accidentally press the Break key. 

The most obvious change in the new ver- 
sion of Maxi Manager is the manual. It is 
now in a 7 by 9 three-ring looseleaf binder, 
more attractively printed than the first 
manual. The contents have been complete- 
ly rewritten. Understanding this program 
will never be simple, but the new manual 
has been written with greater attention to 
the beginner. The manual is divided into a 
technical section and the main section. 
Some users may never need the technical 
section. Having used this program for al- 
most a year, I can no longer read the manual 
as a beginner, hence I cannot fairly evaluate 
its impact on someone reading it for the 
first time. It does lead the user through 
many examples, and all questions asked by 
the program are answered. It is now a pro- 
fessional manual, both in appearance and 
content. 

Initialize 

The initializing section prepares the pro- 
gram for the intended application. You es- 
tablish numeric and string fields and speci- 
fy their length in this section. Once this is 
set, you usually cannot change it except by 
starting over. (Aids and IDM-V allow you to 
add or delete fields, but you cannot re- 
arrange them.) The initialization section of 
IDM-V is a separate program which the user 
calls from the disk just for this function. In- 
itialization is part of the main Datahandler 
program. 

Initializing The Datahandler is easy be- 
cause you do not specify each field's length 
in advance. Simply state the field name and 
whether it is numeric or string. As provided, 



% 



The Datahandler allows up to 10 fields and 
a record length of about 255 bytes. The 
manual explains how to alter the program 
for larger record size or more fields if need- 
ed. As you add records, the program calcu- 
lates the average length of the records, and 
gives on request an estimate of the number 
of additional records which will fit. Unused 
space in each field is not wasted. Each 
record uses only the number of bytes which 
are typed into it. 

IDM-V limits the length of a record to 255 
bytes, and the number of fields to 40 (20 
string, 20 numeric). The first field must be a 
string field. The major choice at initializa- 
tion is whether to organize the records by 
record number or by key. The contents of a 
key field must be unique for each record. If 
you request a key field, it is the first field, 
and is used to find the record on the disk. If 
you were cataloging a library, for example, 
the author's name could not be the key field 
because he may have written more than one 
book. The book's Library of Congress num- 
ber, however, could be the key field, be- 
cause each is unique. The manual explains 
fully the drawbacks to accessing the data 
by key. It does not explain the advantages, 
i.e., what is the point of organizing the data 
by key field? The answer is it is not neces- 
sary to know the record number to access a 
record. The search function requests the 
key field contents and will rapidly get the 
record. If you do not use a key, the records 
will go to disk in order by record number. 

With IDM-V, when you have defined the 
fields, you must specify the total anticipat- 
ed number of records. This permits the pro- 
gram to write all the records to disk as 
blanks and zeroes; such a procedure ensures 
there will be no lost files later in the event of 
a system crash. It also allows you to place 
more than one file on a single side, which is 
an advantage if the files are small. There are 
two problems with this section: If you speci- 
fy too large a total, the file will not fit on the 
disk and a disk-full error occurs, making it 
necessary to start initialization over. The 
manual explains how to calculate how large 
a file will fit on the disk, but it is a lot of work; 
the computer should calculate free disk 
space and size of each record, and then in- 
form the user how many records will fit. 

If you use key access, you must specify a 
prime number for the total number of 
records. A prime number is any number 
which cannot be divided evenly by anything 
but itself and one. I found a prime number 
by trial and error. The program should 
calculate the prime number nearest to the 



". . . The Datahandler allows 

up to 10 fields and 

a record length of about 255 bytes." 



total number of records planned. 

Input 

IDM-V has an easy-to-use add function. 
Dots on the screen show the field length. 
You can modify the record before it is writ- 
ten to disk if you have made a mistake. IDM- 
V allows a fast typing speed. If you have 
specified a key field, the disk turns on after 
you type the key field to search for possible 
duplication of a key item, and to write the 
previous record. If there is no key field, the 
disk turns on after you complete the record. 
(Actually, after the buffer is full. The disk 
may not turn on after every record.) This 
disk write slows record entry, but is a ran- 
dom access data base necessity. You can- 
not duplicate a field from a previous record 
by pressing a single key while using the add 
function. 

The Datahandler's add function does not 
show the length of each field because the 



"IDM-V has 
an easy-to-use 
add function." 



field length may be any length you wish. It is 
pleasant not having to determine field 
length in advance and be limited by whatev- 
er you chose. There is one drawback. If the 
total length of all fields in one record ex- 
ceeds about 255 bytes, The Datahandler 
generates an error message which wipes 
out any file in memory. The program needs 
a stop message to warn the user of this limit 
to prevent data loss. In actual practice, 
however, most users will not encounter this 
problem, as 255 bytes is sufficient for most 
applications and is the record size limit in 
most data base programs. 

Unlike IDM-V you can duplicate the con- 
tents of a previous record by pressing a 
single key while using The Datahandler's 
add function. For example, if you were typ- 
ing a mailing list and had several records in 
a row that said "Massachusetts" you would 
type the full word only once. Thereafter you 
would hit the semicolon key when you came 
to the state field, and the program would 



automatically write "Massachusetts." I en- 
countered this very convenient feature in 
only one other data base, Maxi Manager. 

With The Datahandler, pressing a hyphen 
backs up one field at a time to correct er- 
rors. Once you complete the record, you 
cannot change it; the program goes on to 
the next record. To make changes you must 
use the change mode. 

Change 

You can enter the change (Modify) mode 
in IDM-V both from the menu, by selecting 
"Inquiry", or during the add section if you 
note an error. Before you can alter a record 
you must first find the record number using 
the search function, unless you are using 
key fields. If this is the case the record 
number is based on the keyfield contents, 
so just typing the key entry finds the record. 

It was not feasible to test IDM-V with a 
large number of records, but according to 
the manufacturer, the program will pull any 
record from the disk, using a key file, in 0-3 
seconds no matter how large the file. The 
disk looks at no more than four records 
to find the one it needs, and on the aver- 
age, scans only 1.5 records. This program's 
key access feature is extremely fast and 
convenient. 

The Modify function scrolls through the 
fields. To change an item, retype it, or press 
Enter to leave it unchanged. This method is 
simple and the cursor jumps from field to 
field much faster than in Aids, which has a 
similar system. The screen does scroll but 
you may redraw the display by typing D. 

In addition to the Modify mode available 
from the menu, IDM-V allows you to make 
changes during the printing phase. This 
global change is very powerful. The results 
of calculations can be written to the disk all 
at once. For example, an inventory might 
have two numeric fields handling quantity: 
the number-on-hand and the number-on- 
order. Perhaps you received an order from 
XYZ company. The print search could find 
all XYZ items with a quantity in the number- 
on-order field, add that number to the 
number-on-hand field, print the results, and 
zero the number-on-order field after print- 
ing. Taking advantage of this feature re- 
quires some careful planning at the initial- 
ization stage and great care in actual use. 
Global change and delete can be global di- 
saster if you realize after it is too late that 
the report file you used was also deleting 
each record it printed. Do not use this func- 
tion without complete backup disks. 

The Datahandler has complete search 
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"Usually, the most important purpose 
of a data base is printing data 
in the format desired by the user." 



capabilities within the change mode, hence 
it is not necessary to know the record 
number before asking for changes. You can 
make an identical change in more than one 
record by pressing a single key. This very 
nice feature is similar to the one-key com- 
mand to repeat a field in the Add mode. 
Also, because the number of the field to be 
changed is selected in advance, the record 
will be drawn on screen with the cursor 
already in place at the proper field. This can 
save a lot of time if the field to be changed is 
near the end of the record. 

Search 

For The Datahandler, the most time- 
consuming part of the search is defining all 
the search requirements. At first, it can 
easily take 10 seconds to answer all the 
questions relating to the search, although 
as you gain experience, you can make the 
choices in a fraction of that time. Once you 
have defined the search, The Datahandler 
finds the record almost instantly. The 
search's main limitation is that you may 
search only one field at a time. Aside from 
that, The Datahandler covers every con- 
ceivable search need, including a masked 
search. A masked search ignores certain 
parts of a string. A question mark indicates 
these parts. If the second two digits of an in- 
ventory number indicated the vendor, they 
could be searched by requesting 
"??34???." This would find all records with 
the numbers 34 in that position. A number 
34 in any other position would be ignored. 
Maxi Manager is the only other data base 
that has this feature. Both Maxi Manager 
and The Datahandler can find a match in 
any type of search even if the search string 
does not duplicate the uppercase/lower- 
case configuration of the original entry. 

IDM-V does not support as many search 
functions as The Datahandler, consequent- 
ly there are fewer questions to answer 
before the search begins, and the ability to 
press Enter for default search parameters 
also speeds the process. The program 
searches only the first three characters on a 
perfect match, greater-than or less-than 
basis. If, for example, you were searching 
for Mike Applesmith but could only 
remember the "Apple" part of the name, 
you could still find the record if you were us- 
ing The Datahandler, but not with IDM-V. 

The search function prints each record's 
compared field as it scans, so it is possible 
to see where the search goes wrong if it 
doesn't find the record. Searching is a slow 
process if you do not use a key field. You 
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must exactly duplicate the original record's 
uppercase/lowercase configuration. 

Sort 

IDM-V has a fast, capable machine- 
language sort of up to four fields, but 
there is a large drawback: Once sorted, the 
records are not written to disk. The sort is 
only for a printout. A second drawback is 
that all records to be sorted must be in 
memory. While this is true of all data bases, 
Maxi Manager and CCA handle it automa- 
tically whereas IDM-V requires the user to 
split the file and bring it in a portion at a 
time to be sorted. 

The sort for The Datahandler is very fast 
because it is an in-memory system, and be- 
cause of the capabilities of Forth. The 
speed is comparable to Aids and any num- 
ber of fields may be sorted— ascending or 
descending. 

The greatest flaw in Maxi Manager when 
it first appeared was the sort, which would 
handle only one field at a time. This has now 
been changed and the new version can sort 
on three fields at a time. The sort is in ma- 
chine code and as fast as can be expected 
for a random access data base. Unlike IDM- 
V, Maxi Manager stores the results of the 
sort on disk. 

Printouts 

Usually, the most important purpose 
of a data base is printing data in the format 
desired by the user. The whole process can 
be very troublesome. It is therefore desir- 
able to be able to save print commands on- 
to the disk once they have been worked out 
satisfactorily. IDM-V has this capability 
with room to store 10 different printer com- 
mand files. The Datahandler cannot store 
print commands. 

IDM-V provides less control over the 
printout format than The Datahandler; 
however, it is fairly simple to format 
the printout which would be adequate for 
many uses. IDM-V always prints record 
numbers whether you want them or not. 
Worse still, the column for record numbers 
wastes 10 spaces of the total printout. 
Record numbers can be a nuisance and 
even a real liability in many applications. 
There should be a choice as to whether or 
not you want them. 

You cannot align numeric fields to the 
right and left of the decimal point. IDM-V 
prints the name given to the file which 
stores the print commands as the title, so 
be sure to use a meaningful file name. If the 
length of the printer line is exceeded, the ex- 



cess wraps around, and there is no control 
over the alignment of the second line of 
data. You have no control of the number of 
blanks between fields. You cannot abort 
printout except with the Break key. You can 
access the data base with Micro Architect's 
word processor, WORD-V, for use with form 
letters. The Lister command provides a 
quick and easy printout. 

The section of IDM-V devoted to format- 
ting the printout is quite easy to use. Screen 
scrolling causes the field numbers to be out 
of sight when they are needed. The program 
allows calculated fields which will perform 
addition, subtraction, division, or multipli- 
cation between two numeric fields. Column 
totals and averages are available. You may 
select range for printouts, or you may 
search and print. 

The report section search is much more 
sophisticated than the search in the main 
program. You may search up to four fields 
with a choice of logical AND or OR. For ex- 
ample, the search could find everyone 
whose name is Smith AND who live in New 
York, or you could search for those named 
Smith OR those who live in New York, 
whether or not their name were Smith. As in 
the main program, the report section search 
uses only the first three characters of the 
search string. Thus in the example above, 
the program would also print Smithe. 

Like IDM-V, The Datahandler report for- 
matting section is fairly easy to use. The fea- 
tures available are quite different. You can 
choose whether or not to print record num- 
bers. There is no wrap around, so it is possi- 
ble to control the appearance of the second 
data line. Unfortunately, no math is avail- 
able for a printout, but full search functions 
are provided. 

The Datahandler has a quick, easy print- 
out via the "standard" mode of the Re- 
port command. If you desire a customized 
format, you may specify which fields are 
to be printed, and full search functions 
are available for selecting records. You 
may change file parameters if desired. 
Very few commands provide a surprisingly 
flexible number of printout choices; you can 
manipulate the maximum field length, the 
spaces between fields, and the size of the 
line to obtain the desired result. Some trial- 
and-error experimentation is necessary. 
Once perfected, turn the printer on and save 
the file parameters to the line printer to be 
reused at a later date. This overcomes the 
lack of disk storage for printer file com- 
mands and is similar to the approach you 
must take with Aids. The program remem- 



■■••^^.'.« --"-'-MfA^ 



I believe Super Utility or Super 
Jtility Plus should be preser " 



at every serio 
installation." 
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(We didn't say this; Paul Wiener did in 80 Micro- 
computing, Jan. '81. . .but we sure agree with him!) 



Get Yourself 
the most po 
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NOW AT SPECIAL PRICES: 



Super Utility* 

• Mod I, single density only 

• 24K machine language 

• Zap 

• Purge 

• Forma! 

• Special formar 

• Format without erase 

• Disk copy 

• Special disk copy 

• Tape copy 

• Disk repair 

• Memory utility 

• Protected disk 

• MORE 

• $29.95 

(Reduced from $49.95) 

'While they last! 



Quick Fix* 

• Mod I, single density only 

• Zap 

• Purge 

• Formar 

• Formar without etase 

• Copy 

• Disk repair 

• Recover killed files 

• Memory utility 

• TRS DOS. New DOS + (2.1' 

• MORE 

• $19.95 

(Reduced from $34.95) 

-While they last 1 



only 



Dealers! Place your orders now at this 
special price! 




THE 

KING 

OF UTILITY 



SuperUtility Plus 

You heatd about it! You read about 

it (80 Microcomputing). Now get the 
"cadilloc" at a special price! 
Compatible with Mod I, and Mod III, 
and all rhe current operating systems! 
Copy files from any DOS to any DOS, 
Mod I or III. without converting! 

» Zoo 

• Purge 

• i ormat 

• Special Formar 

• Formal without erase 

• Disk copy 

• Special disk cop/ 

• Tape copy 

• Disk repair 

• Memory 

• File Utility Configurable System 
MUCH MORE 

• Mod I b Mod III on Same Disk 

• $49.95 

(Reduced from $124.95) 




1 1500 STEMMONS EXPRESSWAY. SUITE 1 25 
DALLAS. TEXAS 75229 
PHONE (214) 484-2976 
MICRONET 70130.203 



DEALER INQUIRIES INVITED 

POWERSOFT IS A DIVISION OF BREEZE/QSD, INC. 

sSee List ol Advertisers on page 386 



Shipping is included in sales to Canada & U.S. 
FOREIGN ORDERS ADD $10 

80 Microcomputing, June/July 1982 • 153 



IEEE-488 TO TRS-80* INTERFACE 

Everything needed to add powerful 
BASIC GPIB-488 controller capability 
to TRS-80 Model 1 or 3, Level 2 or 
DOS with a minimum of 16K. 



488-80B 

For Model 1 

Ooeration 




mfwBt&'i 



488-80C 

For Model 3 

Operation 

Model 488-80B or 488-80C Price: $375. 

+ shipping, insurance & tax 

WHEN ORDERING SPECIFY DISK OR TAPE 

SCIENTIFIC ENGINEERING 
LABORATORIES 

11 Neil Drive • Old Bethpage, NY 11804 
Telephone: (516) 694-3370 
'Trademark of Tandy Corp. 
There is no a/filiation between Scientific 
Engineering Laboratories and Tandy Corp. or 
Radio Shack 
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COMPUTER 
DISCOUNTS 

• Factory Direct 

• Best Prices Anywhere 

• No Out-of-State Taxes 

• Full Radio Shack Warranty 

• Free Price List 

SCOTT TASSO 

Owner 
Radio Shack Associate Store #7053 

175 E North Delsea Drive 
Vineland, N.J. 08360 
800-257-0426 
NJ 609-691-7100 ^510 



B Dysan 

^CORPORATION 



Solve your disc problems, buy 1 00% surface 
tested Dysan diskettes. All orders shipped 
from stock, wtttun 24 hours. Cadi toll FREE 
(800) 235-4137 for prices and Information. 
Visa and Master Card accepted- 




PACIFIC 
EXCHANGES 

100 Foothill Blvd. 

San Luis Obispo. CA 
93401. (InCal. call 
(805) 543-1037.) 



"Speed is The Datahandler's 
most important special feature." 



bers your last requested printer layout and 
the command Redo prints the records as 
often as desired according to that layout, 
until the computer is turned off. The Break 
key safely aborts printer operations at any 
time and returns you to "Command?", the 
program's normal query. 

You can obtain continuous printer inter- 
action with the program so everything you 
type goes to the printer. Unfortunately this 
function causes the line printer to form feed 
whenever the screen is cleared. This severe- 
ly limits the option's usefulness. 

The Datahandler has an inventive mailing 
list printout option which examines the 
name field. If it sees a comma, it assumes 
the last name is first and it reverses it for 
the printout, eliminating the comma and 
printing one space between last and first 
names. This space insertion means none is 
needed when you enter the name, thereby 
saving one byte per name. 

The new version of Maxi Manager in- 
cludes a utility program to create printer 
command files. This is a considerable im- 
provement over the version reviewed in 
August. It is not necessary to learn all the 
print format commands, as the utility pro- 
gram creates a file of the proper commands 
based on your answers to various ques- 
tions. The utility program does not allow 
corrections, however, so if you desire 
changes it is necessary to start over or load 
the file into a word processing program and 
make the needed changes (assuming you 
understand the print commands so you 
know what to change). 

At first you could not use Scripsit with 
the Model III version of Maxi Manager. 
Scripsit is on a TRSDOS disk and Maxi for 
the Model III is supplied on DOSPLUS. Thus 
Scripsit could not read a print file created 
by Maxi Manager, nor could a Scripsit form 
letter be merged with Maxi Manager files. 
Fortunately, a patch is now available from 
Adventure International ($10 to present 
Model III owners) to overcome this problem. 
The patch will be included on all future Maxi 
Manager disks. 

While Maxi Manager's printout system is 
anything but simple, it remains the most 
sophisticated one I have seen, and the new 
version is easier to use than the old. 

Calculate 

Perhaps The Datahandler's greatest flaw 
is the lack of many math functions. Addi- 
tion is the only feature, and it is not 
available on printouts. The addition may be 
performed within a record as well as be- 
tween records, and like all Forth commands 



is quite rapid. The fact remains, however, 
that its inability to calculate beyond addi- 
tion may force some prospective users to 
look elsewhere for a data base. IDM-V, on 
the other hand, has a standard addition, 
subtraction, multiplication and division 
functions which are also available on CCA, 
Maxi Manager and Aids. IDM-V math is only 
available with a printout and is similar to 
Aids in this regard. CCA and Maxi Manager 
provide mathematical functions on screen 
as well as in printouts. 

Special Features 

The Datahandler's special features stem 
from the fact it is written in Forth rather 
than Basic. Actually The Datahandler is not 
a program so much as a new set of Forth 
words, defined to perform various func- 
tions. As such, a Forth programmer can 
easily modify it to include any new func- 
tions which might be needed. When using 
The Datahandler you are in the Command 
mode, similarto Basic's Ready, much of the 
time rather than in the program. To make a 
choice, type a command such as Add, 
Change or List. There is no menu, but the 
word Help lists all the commands the pro- 
gram understands. A directory is always 
available because of being in Command 
mode, and it is possible to stop using The 
Datahandler temporarily, if desired, to ask 
Forth to do a few calculations and then go 
right back into the program. 

Speed is The Datahandler's most impor- 
tant special feature. No other data base in 
these reviews even comes close. Type List 
and ask for all the records. Hold the space 
bar down and watch the records flip onto 
the screen faster than you can scan them. 
Release the bar and the record on screen 
freezes. Tap the bar to continue one at a 
time. One hundred record files may be load- 
ed in seconds. It is this fast disk I/O which 
makes the big difference between Aids and 
The Datahandler. Aids is about as fast in 
search and sort, but is extremely slow 
writing and reading files. 

A nice feature of IDM-V is the audit trail. 
If you select this function, all changed 
or added records are automatically sent 
to the printer— a very handy reference 
for data base transactions. Another feature 
■^hich may be important to some users is 
password security on two levels: one pass- 
word for read/write access and one for read- 
only access. 

IDM-V has made every effort to speed 
interaction between program and user 
by the liberal use of default values for any 
choice. In formatting a printout, for exam- 
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Teach Your TRS 80 R Second Language. 




Your TRS-80 Model III already speaks BASIC and now you 
can teach it APL too, thanks to STSC's APL*PLUS®/80 
Application Development System. Once you've run APL 
on your TRS-80, we' re sure you'll both think of it as your 

first language. 

Our APL*PLUS system features increase the well-known power and 
productivity of the APL language. You'll develop and maintain pro- 
grams in one-fourth to one- tenth the time needed with BASIC, and 
you'll write applications you'd have thought twice about attempting in 
any other language. 

Take a look at the following example. How long would it have taken 
you to program it in BASIC? 

Develop a subroutine which enumerates all the combinations of N things taken 
from a population P. Its result is a table showing each of the possible 
combinations in a different row. Examples: 



3 COME 4 
12 3 



COMB 

1 2 

: 3 

1 4 

2 3 

? 4 
>. 4 



4 COMB 
12 3 
1 2 3 
12 4 

1 3 4 

2 3 4 
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7 S+N comb P;R 
fl MAKE SETS OF N ITEMS FROM P CHOICES 
fl RECURSIVE ALGORITHM BY ALLEN J ROSE 
-UN=P)*R*fcl)t>L S*-(fft>l,P)piP +0 
£:S«-H-(0,(W-1)CTWB P-l ),[!]» COMB P-l 



This example is found in the textbook provided with the APL*PLUS/80, APL: An 
Interactive Approach, by Leonard Gilman and Allen J. Rose. A detailed explana- 
tion of this APL solution is included in our free information package. 

Your programming may not include a task such as this, but it will certainly benefit 
from APL's power in expressing algorithms. 

Worried that a language with this much power is hard to leam? Don't 
be. APL is easy\ The programs have simple structure— the power 
comes from many built-in functions and operators. And our complete 
documentation gives you everything you need to make yourself and 
your TRS-80 bilingual. You get/Vi is Easy! (an introductory tutorial), 
an APL textbook, a set of four detailed user's guides and reference 
manuals, and two reference cards. That's everything you need, whether 
you're a beginning user or an experienced APL programmer. 

When you ; >;i\ the APL* PLUS 80, you're getting a complete applica 
tion development system which includes: 

• complete APL language and system features, upwards compatible 
with our mainframe APL systems 

• powerful output formatter 



• array-oriented file system 

• access to regular TRSDOS® files and subroutines 

• communications as a "simple" terminal and under APL program 
control 

• traditional APL symbols or mnemonic keywords 

• utility program libraries 

• convenient access to many TRS-80 features. 

So if you want to develop and deliver solutions faster and better for 
yourself or for clients, teach your TRS-80 a second language — APL. 

Mail in the coupon below with your payment and we' 11 send you the 
APL* PLUS/80 Application Development System- all you need to run 
APL today on your TRS-80 Model III. If you' d like more details, check 

the box on the coupon and we'll send you our fret' information 
package. 

We' re STSC, Inc., the leading supplier of professional quality APL 
software and services in the United States. Our APL* PLUS systems 

have Deer; serving the business and professional world h >r more than 
12 years. 

APL* PLUS/80 runs under TRSDOS 1 .3 or LDOS» 5. 1 on a 48K RAM TRS-80 
Model III with two disk drives. The APL*PLUS/80 comes with custom APL 

character ROM 



stsc 
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Attn: APL*PLUS/80 Distribution 

STSC, Inc., 2115 East Jefferson Street 

Rockville, Maryland 20852 ( 30 1 ) 984-5000 ( orders only) 

Yes, send me the APL* PLUS/80 System. 

□ My check for $295 is enclosed. 

□ Charge my VISA Account * 



□ Charge my MasterCard Account '-' . 
Expiration date: 



I'd like to know more about APL*PLUS/80. 
Send me your free information package. 



Name 



Title 



Company. 

Address 

City 

Phones . . 



State, 



Zip_ 



80-682 



APL*PLUS is a service mark and trademark of STSC, Inc., registered in the United States Patent and Trademark Office. TRS-80 and TRSDOS are registered trademarks of Tandy Corporation. 
LDOS is a registered trademark of Logical Systems Corporation. 



■See List of Advertisers on page 386 
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CP/M Compatibility for you 
TRS-80 Model I and III, PM< 
and 81, and 



bVblfci 



Run CP/AA application 

programs in addition to 

TRSDOS 

INDUSTRY STANDARD 

Enter the world of powerful 
CP/M application programs; 
WordStar, dBase 11, etc. 

OPEN AND SHUT CASE 

EASY to install, plug-in 
boards; no wires or traces to 
cut; no soldering. 

TECHNICAL BACKGROUND 

Over 50 years of high 
technology experience. ..from 
Maxi's to Micro's... both 
Hardware and Software. 



I OtKJ. 
s-r/AA 



fdorn riys 



64K RAM for your TRS-80 
Model I and III. 




m OF CHOICE 
>r powerful Z-80 
"ating system) and 
if you choose. 



• Dealer Inquiries Invited 

• Six Month Warranty 
•30 Day Money Back 

Guarantee 

Freedom Option ....$275.00 

Freedom Plus $490.00 

Manual Only . $ 25.00 

Call us for information about 
our large selection of CP/M 
application programs. 



To order Call Toll Fr 
1-800-523-4067 
In Pennsylvania call 
(215) 569-2381 



TRS-80 is a registered trademark of 

Tandy Corp. 
LNW-80 is a registered trademark of 

LNW Research Corporation 
PMC 80,81 is a registered trademark of 

Pergonal Microcomputer Inc. 
TRSDOS is a registered trademark of 

Tandy Corp. 
CP/M is a registered trademark of Digital 

Research Inc. 
WordStar is a registered trademark of 

MicroPro Int. Corp. 
dBase II is a registered trademark of 

Ashton-Tate 



Freedom Technology 
International 
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119 North 18th Street, Philadelphia, PA 19103 



pie, pressing Enter quickly bypasses the 
mathematics questions. For every question 
in any section, pressing Enter automatical- 
ly selects the most commonly used 
choices. It is a great feature for beginners 
who aren't sure how to answer many ques- 
tions. Press Enter and see what happens, it 
can't do any harm! 

IDM-V is advertised as bug free and reli- 
able. It has been released for Models I, II 
and III, CP/M, and Heath computers. While I 
have not used it long enough to categorical- 
ly state there are no errors, it does appear to 
be a solid, dependable program. Many pre- 
cautions have been taken to protect files 
from accidental erasure or damage. 

A new feature in Maxi Manager is a utility 
program that allows it to read Aids III files. 
An Aids user who has outgrown that in- 
memory system can thus convert to Maxi's 
random access without retyping his files. 

Readers of part I of this article may wish 
to know how these two data base programs 
compare with the three previously reviewed. 
Since writing part I, I have changed to a 
Model III and should point out that Aids 
runs on my Model III if shift, down arrow Z is 
used as the control key, rather than just 
shift, down arrow. Maxi Manager users 
must trade in their old disk to convert to the 
Model III version ($15 charge). IDM-V Model I 
users may convert to Model III version for 
$10. I have not used CCA on the Model III. 

There is no best program. The best one 
must be chosen for the particular applica- 
tion. Of the three random access programs, 
Maxi Manager remains on top for sophisti- 
cation and file capacity, but it is the most 
complicated to use. IDM-V has powerful 
global change and delete, fast sort and 
good search with printouts. Its greatest 
flaws are the lack of full control of printout 
appearance, the need to break files up for 
sorting, and the inability to save records in 
sorted order. CCA has better printout con- 
trol and math than IDM-V, but has very poor 
search capabilities and a slow sort, IDM-V 
is the easiest to use of the three, but costs 
considerably more. 

Some programs are better than others for 
the single-drive owner. On a double density 
drive, any of the programs would be ade- 
quate since the program and data could all 
be on one disk. On a single density drive, 
there is often insufficient room for both pro- 
gram and data. Having a separate data disk 
allows for a larger file, but then the program 
and data disks must be switched. Maxi 
Manager requires this switching whenever 
sorting or printouts are desired, but does 

sSee List of Advertisers on page 386 



"There is no best program. 

The best one must be chosen 

for the particular application." 



prompt for the switch. CCA does not 
prompt for switching disks, so the user 
must change them at the right moments. 
IDM-V also does not prompt for the switch, 
but requires fewer switches than Maxi 
Manager. 

Of the two in-memory systems, either 
would work very well for a single-drive 
owner. Aids has the advantage of being 
able to manipulate files larger than memory 
size by calling in portions of a file. How- 
ever, this feature carries with it the poten- 
tial for large-scale damage to files if not 
handled with great care. The two programs 
are equally easy to use. While Aids is fast 
once the files are in memory, disk read and 
write time is very slow. The Datahandler is 
more pleasant to use because of its great 
speed, both for calling files in and out and 
for adding and changing records (faster typ- 
ing is allowed, and the cursor is at the cor- 
rect field automatically for changes). They 
both have great search and sort routines. 



Aids has far better mathematical ability and 
can give calculations on printouts (with 
CALCS III). 

Despite the fact that The Datahandler is 
extremely weak in some important areas, I 
am fascinated by it. After a few years at a 
computer keyboard one begins to feel half a 
life has been spent waiting for the computer 
to load and save files. Forth and The 
Datahandler end all that. I recommend the 
program for anyone willing to take the time 
to learn Forth, or willing to pay to have The 
Datahandler customized. The program can 
be modified to do most of the things a good 
data base needs to do. The missing Merge 
function, for example, was provided to 
MMSFORTH users, after The Datahandler 
was released, in a newsletter. The missing 
mathematical sophistication could be pro- 
vided by a good Forth programmer. Consi- 
der the program an exciting nucleus; plan 
on some customization for any sophisti- 
cated applications. ■ 



CompuServe: 
What's in it for the 




Plenty! First there's MNET80, a Special Interest Group 
(SIG) of TRS-80' users on the CompuServe Information 
Service. SIGs are active and growing groups of individuals 
who share a common interest and form an "electronic" 
club using the CompuServe Information Service as its 
communications medium. Share advice and exchange 
information with other TRS-80 users across town or 
anywhere around the country. TANDY services include an 
electronic newsletter, answers to your questions directly 
from Ft. Worth, product availability, tips and hints. 
Secondly, we think you'll like the CompuServe 
Information Service: CB simulation, electronic mail, 
news wires, financial information, games, data bases, 
programming languages, big mainframe computer power 
and free data storage. All for a basic charge of only $5.00 an 
hour nights and weekends. All you need is your TRS-80, a 
modem and some inexpensive software. See a free 
demonstration of CompuServe in action at your Radio 
Shack" Computer Center. CompuServe Information Service, 
5000 Arlington Centre Blvd., Columbus, Ohio 43220. 
(614) 457-8650. 



CompuServe 
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CALL TOLL FREE 

2738 






STELLAR ESCORT 
By Jeff Zinn from Big Five 

This new arcade game from Big Five continue 
their tradition of bringing you the most ex- 
citing action in innovative space games. Your 
fighting spacecraft must run the gauntlet of 
the attacking alien's weaponry in order to ac- 
complish your defense mission. You'll use all 
your skill and dexterity just to survive! 

16K tape. . . 515.95 32K disk. . .$19.95 

NEW TRISSTICK JOYSTICK FROM BIG FIVE! 
Can be used for all Big Five games plus pro 
grams you write. Utilizes the Atari joystick 
with special interface. Plugs right in! 

Specify model I or 1 1 1... $39. 95 




By Hogue £ Konyu from Big Five 
You are the lone defender of 10 Krotnium fuel 
cells essential for the survival of the planet. 
Aliens swoop down from above to steal the 
fuel; it's your job to destroy them. You can 
still save the cells after a raid, but you must 
shoot the alien and simultaneously move under 
the cell to catch it. If things look bad you can 
set off one of your 4 antimatter bombs and 
destroy all enemies on the screen! Arcade fun 
with action and sound. 

16K tape. . .$15.95 32K disk. . . $1 9. 95 



MYSTERIOUS 
ADVENTURE 



ARROW 

OF 

DEATH 

part 1 



By Brian Howarth from Acorn 
Proper English only! This British import is 
Acorn Software's first adventure and it meets 
their reputation for high quality. The vocabu 
lary you use in this adventure must conform 

to proper English standards not the bar 

baric tongue spoken here in the colonies! You 
and Sorcerer Zarda must restore the kingdom 
from the engulfing sense of bitterness and ill 
feeling that forced the ruler to flee the 
palace. 

16K tape or disk. .. $19. 95 Hint Sheet ... $1 . 00 



VOYAGER I 




From Avalon Hill 

A graphic science fiction game that puts you 
on board a spaceship infested with killer 
robots! Your job is to clear the four level, 144 
location ship of the robots and arm it to self 
destruct. The high speed graphics are rep- 
resented in a 3D perspective that represents 
your eye's view. Instant switching to floor 
plan maps aids your movement. The action is 
fast and furious! 

16K tape for model I £ 1 1 1 or 
Color (Ext. Color Basic) .. .$19.95 





By Philip Mitchell from Beam 

Armed with missiles and bombs, you must fly 
your fighter to the enemy's cache of neutron 
bombs and destroy them. Your mission is in 
four stages, involving rugged terrain, cav- 
erns and manmade obstacles not to mention 
enemy radar, missiles and paratroopers. This 
new departure in arcade gaming allows you to 
set up your own terrain and enemy emplace- 
ments, then save them for future use. Make 
your mission as hard or easy as you like! 



Tape or disk. . .$24.95 

SPACE 
CASTLE 



uf 
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From Cornsoft 

Ahead of you lies the menacing castle, float 
ing in space amidst its layers of orbiting 
shields. At intervals, smart mines spin off the 
shields and head for your ship. Dodging the 
mines and destroying the shields isn't your 
only problem, though: once you penetrate the 
innermost shield, The evil Yugdab will un- 
leash all his fury in an attack! A fast paced 
and challenging arcade game, indeed. 



Write Arcade Games in BASIC with. . . 

ACCEL 3 

BASIC COMPILER 

By Southern Systems from Algorix 
Ever wish your programs would run faster? 
Assembly language is one answer. But -- 
even after you spend the time needed to learn 
Z 80 code -- it is a long, tedious process to 
write in assembly language, and debugging is 
very difficult. Fortunately, there is another 
way - compiled BASIC. 

In our opinion ACCEL3 is the best compiler 
for the TRS-80. It's flexible: works with tape 
or disk, model I or III, and requires as little 
as 16K of memory. It's fast: only a few sec- 
onds to compile. It's a memory miser: only a 
15-35% increase in program size in most cases. 

ACCEL3 will work under TRSDOS, NEWDOS 
or LDOS, and there are very few program- 
ming restrictions. To save ACCEL-compiled 
programs on tape you will need TSAVE (sold 
separately, $9. 95) 

Tape or disk. . .$99. 95 

Instant Search/Sort 
DATABASE 

By G. Hatton from Acorn 

An easy-to-use, yet powerful database man- 
agement tool, ISS alleviates many of the 
complications usually found in setting up and 
maintaining information files. Written in 
machine language, ISS can provide a multi- 
tude of sorts, subsorts, searches and cate- 
gorizations in seconds. Because the proc- 
essing is done in memory, you can manipulate 
the data at will without risk to your database 
on tape or disk. The number of records is 
limited only by your file format and the 
amount of RAM in your system. 

16K tape or 32K disk. .. $49. 95 
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THE CUSTOM TRS 80 
By Dennis Kitsz from I J G 

The hardware hacker's delight! This book 
contains many, many useful modifications that 
could make your TRS-80 model I more reli- 
able, easier to use, faster, and more capable! 
Clear, concise instructions, along with many 
useful construction tips, guide your way 
through the computer's innards. Some unique 
software ideas are included as well. 
WARNING: some of the hardware modifications 
in this book will void any warranties and may 
cause Radio Shack to refuse repairs on mod- 
ified equipment. 
335 pages... $29. 95 



16K tape. . .$15.95 1 6K disk. . . SI 9. 95 

Visit oor other stores: Seven Corners Center • Falls Church, VA & W. Bell Plaza • 66OO Security Blvd. • Baltimore, MD 



m, TO ORDER CALL TOLL FREE 800 424-2738 



For information 
Call (202) 363-9797 



THE PROGRAM STORE 

4200 Wisconsin Avenue NW, Dept.8E206 Box 9609 
Washington, D.C. 20016 
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MAIL ORDERS: Send check orM.O. for total pur- 
chase price, plus $1.00 postage & handling. DC, 
MD & VA: add sales tax. Charge cards: include 
all embossed information on the card. 
©1982, The Program Store, mc. Prices Subiect to Change 



Get the most from your micro with 
software and accessories from one of 
the worlds largest selections. 



The 

n*ocjram 

Store 



CALL TOLL FREE 

800424-2 





From Med Systems 

Your eyes are bloodshot as you peer into your 
computer's screen and cry, "I must be 
CRAZY!" If this has never happened to you, 
you've never tried ASYLUM, the 3-D graphics 
adventure! ASYLUM places you on a cot in a 
small (padded?) room. Periodically the janitor 
lobs a hand-grenade through the window. 
What you do next could mean escape — or 
disaster. 

16K tape... $19. 95 16K disk. . .$22. 95 
Advice Sheets. .. S1 . 00 




Igjr* Crush.CrumHe 
and Chomp ! 



From Epyx 

It's a monster movie, and you are the 
monster! You can be The Glob, Kraken, 
Mantra, Mechismo, Arachnis, or Goshilla •■■ or 
even design your own "custom" monster (disk 
version only) . This hilarious action game is 
loaded with graphics and sound as you prac 
tice your villany . 

16K tape or 32K disk... $29. 95 



farriohter 




By Sparky Starks from Adventure Int. 
As mercenary and galactic police officer, you 
must maintain the condition and control of all 
parts of your spacecraft. Suddenly some 
thing appears on your screen: is it a Star- 
pirate or a friendly merchant ship? You can't 
tell yet, and at this speed you may have only 
a fraction of a second to make an attack /no 
attack decision. 

Model I 6 III, 16K tape...$2U.95 
Model I disk version S29.95 




By Wall £ Moncrief from Adventure Int. 
You get a vast lunar landscape, graphically 
depicted in both long range and close up, 
with many choices for landing sites. Choose a 
more difficult site and get more points if 

you can land successfully. Great graphics 
and sound add to the realtime challenge and 
f u n . 

16K tape. ..$14. 95 



VOYAGE OF THE 

VALKYRIE 




By Leo Christopherson from AGS 
Combine the animation and music techniques 
pioneered by Christopherson with the 
challenoe of his first fast-moving arcade game 
"and you have VOYAGE OF THE VALKYRIE! 
You speed through a magical maze guarded by 
ferocious birds that swoop down to attack ':' 
you don't get them first. To list all the play 
and options of ihis exciting game would take 
the 16 pages of instruction included. 

16K tape... $34. 95 

16K disk... $39. 95 

ALSO FROM CHRISTOPHERSON: 

DUEL N-DROIDS 

Teach your "animated android" how to wield a 

laser sword in mortal yet comic battle. 
Entertainment for all ages. 
16K protected tape... $14. 95 
16K protected disk... $2 0.9 5 




By John Allen from Acorn 

Once you load ASTROBALL into your 
TRS-80, the arrow keys become flipper 
buttons, the screen becomes the play board, 
and you become the "Pinball Wizard!" A 
flying saucer, spaceships, meteors, and 
black holes add to the fun as your ball realist 
ically zings around the board. Five skill 
levels. 

16K protected tape. .. $19.95 
16K protected disk. . .5 19.95 

Unbelievable Realtime 3-D Graphics! 



FrfGHT SIMULATION 

From Sub-Logic 

The wait is over! If j D graphics seen impos- 
sible On the low resolution TRS-80, you 
haven't seen this brilliant program. During 
FLIGHT SIMULATION, you instantly select 
instrument flight, radar, or a breathtaking 
pilot's-eye-view. But be sure to strap your- 
self In — you're liable to get dizzy! 

Once you put in some air time learning to fly 
your TRS-80, head for enemy territory and 
try to bomb the fuel depot while fighting off 

five enemy warplanes. Good Luck! 

NOW FOR MODELS I 8 

16K tape... $25. 00 
32K disk... $33. 50 



II ! (specify which) 




SCARF 



From Cornsoft Group 

Race your Scarfman around a maze, gobbling 
up scoring dots. You are pursued by five 
monsters: if you eat a "+" they'll lower their 
eyes and you can eat them, otherwise they'll 
eat you! SCARFMAN may be played using the 
keyboard or Alpha Product's Joystick. 
WARNING: MAY BE H AB IT-FORMI NG ! 

Tape... 16. 95 

Disk (specify 'nod. I or 1 1 1 ) . . . $20. 95 

Alpha Joystick : 

mod. I: $39.95, mod. Ill: $49.95 




By Hogue £ Konyu from Big Five 
While fighting off the alien convoys -- each 
more skillful than the last -- you must keep 
track of your rocket fuel or risk explosion. 
16K tape. ..$15. 95 32K disk. . .$19.95 
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By Hogue b Konyu from Big Five 

Unlike the usual space "shoot-em-ups," 

Attack Force lets you control both speed and 

direction as you maneuver all over the screen 

in search of the alien Ramships and Flag 

ships. 

16K tape.. .$15.95 32K disk. . . $19. 95 




By Hogue f, Konyu from Big Five 
Six astronauts are stranded on a desolate 
planet. You must undock from your command 
module and maneuver your rescue shuttle 
through the asteroid field to save them. 
16K tape.. .$15. 95 32K disk. .. $19.95 



COMING SOON : MYSTERIOUS ADVENTURES 
A new series of adventures from Acorn that is 
bound to keep you asking for more! 

©1982, The Program Store, Inc. 



THE PROGRAM STORE • Dept8E206 Box 9606- 4200 Wisconsin Ave, NW • Washington, D.C. 20016 



tern 



Price 



Specify model: D I Gill D Color 



Postage $1.00 
Total 



□ CHECK nVISA 

□ MASTERCARD MC Bank #. 



name 
addr 
city 



state zip 



Card# 



Exp 



.'See List of Advertisers on page 386 
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HOME/HOBBY 



Let your computer do the walking through the Yellow Pages. 



Telephone Di 




Jim Hie key 

Box 3123 

Clear lake, CA 95422 



How would you like to dial 
your phone by computer? 
Suppose you could just enter 
the name of a person you want 
to call and let the computer do 
all the work? 

Even better, with this hard- 
ware device all you need is a 
relay, a diode and some wire. 

Dial Pulses 

When you dial a phone 
number, a switch attached to 
the dial opens and closes in 
pulses. The number of pulses 
corresponds to the number 
dialed (except zero, which is 10 
pulses). 

I built a relay to handle the 
telephone switching load (ap- 
proximately 70 volts) and con- 
trol it from a Model I TRS-80 
cassette output port. 

Controlling the telephone 
switching directly from the 
cassette port might weld the 
relay. 

To further protect the sen- 
sitive TRS-80 relay, I wired a 
diode across the leads of my 
relay (Fig. 1). This diode shorts 
out the surge of current caused 
by the collapse of the magnetic 
field in the coil when the power 
is out. 

Inside the phone are two or 

160 • 80 Microcomputing, June, 'July 1982 



more wires going to the dial. 
Two of these are normally 
closed and are switched by the 
dialing action. They are pulsed 
open when you dial a number. 

Cut either one— it doesn't 
matter which— and connect it to 
the normally closed side of your 
relay. This way you will be able 
to use the phone without the 
computer. 

If there is enough room inside 
the phone's casing, install the 
relay there. If not, put it inside a 
container; an empty film can will 
work. 

I connected the relay to the 
computer by mounting two 
jacks: a miniature jack for power 
(I used a jack from a battery 
eliminator of the same voltage 
as the relay); and a sub- 
miniature jack for the remote 



FROM PHONE 



plug on the cassette cord. 

Control Program 

All of this wouldn't be worth 
much without a program to con- 
trol it, so I wrote a simple one 
that you can modify to suit your 
own needs (Program Listing 1). 

The subroutine in the first 
part of the program (lines 
20-100) does all the work. It 
turns on the relay by sending a 
four out to port 255. Normally 
this turns on the cassette motor. 
If we delay the program before 
turning off the relay (OUT 255,0), 
we create one pulse. Five of 
these pulses is the same as dial- 
ing the number five. 

Lines 200-390 are data lines 
containing names and ad- 
dresses. I put these in the pro- 
gram, so I wouldn't have to read 



them from the tape each time. 

The name comes first, followed 
by the phone number. Don't in- 
clude dashes or parentheses, but 
do include the 1 that precedes any 
long distance numbers. 

Lines 400-425 look for input. By 
typing List, the program lists all 
the names on file. Typing Hang- 
up, or H, gives you a dial tone, and 
typing Number, or N, finds a 
number without dialing it. 

Line 516 puts dashes in the 
number before it's printed, to 
make it easier to read (1-706- 
556-4563). 

Lines 500-510 search for the 
number corresponding to the 
name you enter. Then it reads this 
number into the NO$. Should you 
change your mind while the com- 
puter's dialing, hitting any key will 
hang up the phone and return the 



CUT 



TO DIAL 



■* 



NORMALLY CLOSED 



COMMON 



NORMALLY OPEN 



DIODE 



RELAY 



n j 



JACKS 



Fig. 1. Schematic 



system to command mode. 

Flashing Cursor Routine 

The subroutine in lines 800-910 
flashes the cursor faster and 
more efficiently than others I have 
used. I included my remarks in 
Program Listing 2. 

Very simply, it prints a graphics 
block (CHR$(128)), pauses, then 
backspaces (CHR$(13)), erasing 
the block. While the cursor is 
flashing, it is checking for input. 



If the key struck is not a left ar- 
row (backspace), shift backspace 
or Enter, then the character is 
added to A$. 

A backspace will erase the last 
character on screen, taking the 
last character out of A$. Shift 
backspace erases the whole line 
and clears A$. If you hit Enter, 
some variables are set up (List- 
ing 2, line 860), then the program 
returns to the calling subroutine 
with the input in E$. ■ 



1 CLEAR5000:CLS:GOTO400 ' PROGRAM STARTS AT 400 

10 IFNO=0THENNO=10 ' A "0" ON THE PHONE TAKES TEN PULSES. 

20 FORLP=lTONO' SUBROUTINE TO DIAL A NUMBER. 

40 OUT255,4' TURN ON RELAY... 

50 GOSUB60 0' DELAY A BIT... 

6 OUT255,0' TURN OFF RELAY... 

70 GOSUB600'WAIT... 

80 NEXT LP' FINISH UP 

90 FORLP=1TO100:NEXT: ' DELAY BETWEEN NUMBERS 

100 RETURN 

199 ' NAMES AND NUMBERS GO HERE 

200 DATATIME, 7671111 
210 DATAUS, 9942349 
215 DATAEV, 12798688 

220 DATAED ROBEY, 9944849 

225 DATAMARK, 9941 968 

230 DATAJASPER, 9942647 

235 DATASCOT r 9945980 

240 DATARADIO SHACK , 9941950 

245 DATAGEORGE, 9946299 

250 DATATODD, 994 4588 

255 DATARON,19166852093 

260 DATAKENT, 19176855482 

265 DATABRYCE, 19166852031 

27 DATAFRED PLANTE , 1 27 7 7 27 7 

275 DATADAN,99419 32 

280 DATAGENE-TRAILER, 9944044 

285 DATAGENE-HOUSE, 9946430 

390 DATAEND,END' DON'T FORGET THIS AT THE END OF YOUR LIST!! 

400 RESTORE: PRINT :PRINT n COMMAND"; : L=20 : GOSUB80 : INS=WS ' GET INPU 

T COMMAND. 

410 IF1NS="LIST"THENCLS:GOTO4 90 

420 IFIN$="H"ORIN$="HANG UP'THEN 610 

425 IFIN$="NUMBER"ORIN$= n N"THEN440 

430 GOTO500 

440 PRINT"NAME"; : GOSUB80 : IN$=WS : FL=1 : GOTO500 ' INPUT NAME. AND 

SET FLAG (FL) SO THE NUMBER WILL BE DISPLAYED ONLY. 

490 READNA$,NO$:IFNA$="END"THEN400ELSEPRINTNA$,; :GOTO490' LIST N 

AMES 

500 READNA$,NO$' GET A NAME AND NUMBER. 

505 IFNA$ = "END"THENPRINT"NOT FOUND ." :GOTO400 ' CHECK FOR END OF I, 

1ST 

510 IFNASOINSTHEN500' IF THIS ISN'T THE NAME, KEEP LOOKING 

516 LE=LEN(NO?) : Ql $=RIGHT$ ( NO$ , 4 ) : Q2 $=MID S (NOS , LE-6 , 3 )+"-": IFLE= 
8THENQ3$=LEFT$(NO$,l) * " - " : GOTO620ELSEIFLE=10THENQ3 $=LEFT$ ( NO$ , 3 ) 
+"-":GOTO620ELSEIFLE=llTHENQ3$=MIDS(NO$,2,3) + " - " : Q4S=LEFT$ (NOS , 1 
)+' , -":GOTO620ELSEGOTO620 , THIS ROUTINE PUTS THE DASHES, "-" 

517 ' IN THE PHONE NUMBER SO WE CAN READ IT AS WE ARE ACCUSTOMED 

TO. (X-XXX-XXX-XXXX RATHER THAN XXXXXXXXXXX AS IT IS 

STORED IN MERORY.) 
520 FORX=lTOLEN(NO$) ' SET UP LOOP TO LENGTH OF NUMBER. 
530 NO=VAL(MIDS(NOS,X,l) ) ' GET NUMBER FROM NOS... 
540 GOSUB 10' DIAL IT... 
550 NEXTX' DO ALL NUMBERS. 
560 GOTO400 

600 FORLM=1TO10:IFINKEY$=" 

610 OUT255,4:FORLP=1TO300:NEXT:OUT255,0:GOTO400: ' 
620 Q5$=Q4S+Q3S+Q2S+Q1S:Q4$ = "":Q3S='"":Q2S="":Q1S='' 
L=1THENFL=0:GOTO400ELSE520' ADD TOGETHER THE STRINGS TO GET THE 
NUMBER IN THE FORM X-XXX-XXX-XXXX 



"THENNEXT:RETURNELSE610: 'DELAY LOOP 
HANG UP 
" :PRINTQ5$:IFF 



Program Listing 1. Telephone Dialer 



800 HI=90:LO=32:E$=CHR$(13) :BS=CHR$(8) :CS=CHRS(24) :PRINT"? " ; 

** ENTER - L=MAX LENGTH IF INPUT EXIT - WS=INPUT 

810 PRINTCHRS(143) ; 

820 FORM = lTO50:RS = INKEyS:IFRS = " n THENNEXTELSEPRINTCHRS(8) ,- :GOT086 


838 PRINTCHRS18) ; 

840 FORM=1TO20:RS=INKEYS:IFRS=""THENNEXTELSE860 
85 8 GOTO810 

860 IFRS=E$THENW$=A$:A$=AS+"U":W=ASC(A$) : v=VAL(AS) : A$=" " : PRINT : I 
FW<58ANDW>4 8THENN=-1 : RETURNELSEN=0 : RETURN 
870 IFR$=B$THENIFLEN(AS)>0THENAS=LEFT$(A$,LEN(AS)-1) :GOTO90 0ELSE 

818 

875 IFRS=C$THENIFLEN(AS) >0THENFORM=1TOLEN ( AS ) : PRINTBS ,• : NEXT : AS = " 

":COTO810:ELSEGOTO810 

880 IFLEN(AS) ^LTHENS] 

865 IFASC(RS) >HIORASC(RS) <LOTHEN810 

890 AS=A$+R$ 

908 PRINTRS; 

910 GOTO810 

Program Listing 2. Remarks for Flashing Cursor Routine 




Scriplus is a modification to Scripsit c which enables 
you to take advantage of the special functions, 
features, and print formats of your printer while your 
document is being printed. Allows you to: 



change expanded print 
change no. of characters per inch 
or underline in mid-line! 



1) Send cowands to the printer to activate special 
fortats! 

2) SCRIPLUS will NOT crash program protected in hi-iei! 

3) 'END' returns to DOS READY instead of re-booting! 

4) Initial line feed is changed to a carriage return to 
eipty text buffer! 

5) The use gets an ALPHABETIZED Directory (with FREE 
space shown) froi within SCRIPLUS! 

6) Optionally select line feed after carriage return 

7) Supports custom printer drivers (NOT included) 

8) Modifies ALL versions of SCRIPSIT (t») for Hod I or 
III. Allows you to use Mod I version on Mod III! 

9) Printer can be STOPPED for insertion of text or forns 
alignaent! 

10) Inserted text can be edited prior to resumption Df 
printing 1 

11) Files can be killed, loaded, aerged, or chained froa 
the SCRIPLUS DIRectory 1 

12) Allows Mod III versions to be BACKED UP for 
protection! 

13) Works on ALL current major DOS's (Mod I or III) 

14) Works with new 3.2 Mod III Scripsit on 1.3 DOS! 

15) Specifically written for the MX-80, but will 
with ANY printer that accepts CHR$ codes for control 1 

16) Previous owners §ay send in their disks for upgrade 
($15) 



$39.95 



your 



work 




GREAT for EPSON'S 1 With or without GRATRAX-80(ti 



11500 Steaaons Expressway - Dallas, Texas 75229 



M/C-VISAI (214)484-2976 - HicroNet* 70130,203 
CARDS | Join OUR Xtra-80 Sig ON MicroNet! 
Accepted! Fro * tne " 0K " proipt, type: R QSD 



* 



Write for 

our FREE 
Catalog! 



DEALER INQUIRIES INV 



Jrders ADD $5 Shipping/Handling 
See us at NCC in Dallas! April 21-25! 
PowerSoft is a division of Breeze/QSD, Inc. 
SCRIPSIT is a registered TM of TANDY CORP. 




(U.S. FUNDS ONLY 

for shipping. 

NO CHECKS 1 



^See List of Advertisers on page 386 
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REVIEW 



First impressions on this language. 




MMSFORTH 

Miller Microcomputer Services 

Natick, MA 

$89.95 cassette 

$129.95 disk 

Nicholas Spies 
434 Grace Street 
Pittsburgh, PA 15211 

I was intrigued for some time by ads in 80 
Microcomputing for "MMSFORTH, The 
Professional Forth for TRS-80" (Miller 
Microcomputer Services). I read with in- 
terest claims that MMSFORTH was 10 to 20 
times faster than Basic, that it was stack- 
oriented, that you could add your own com- 
mands, that it had a great editor, a variety of 
utilities, and that MMS would provide pro- 
fessional support. It seemed almost too 
good to be true. 

I read some articles on Forth which fur- 
ther whetted my curiosity (A First Look at 
Forth, 80 Microcomputing, July 1981). But 
even with program examples, the structure 
and syntax of Forth make it difficult for the 
newcomer to appreciate its many advan- 
tages over Basic. 

Basic's Shortcomings 

Basic was developed at Dartmouth Col- 
lege in the mid-60's to take advantage of the 
miracle of time-sharing. Suddenly comput- 
ing power was available to anyone with a 
computer terminal and dimes for the phone 
bill. This caused a minor revolution; the 
power of the fabled mainframe computers 
was unleashed on nearly every college cam- 
pus and business. 

Basic fulfilled the need for an easily 
understood language of students and non- 
professional users. It was easily 
understood, could be written interactively, 
was fairly standardized (at least at first), 
and ran fast enough for a 110-baud ter- 
minal. Basic was derived from Fortran, 
originally designed to run batch programs 
by loading IBM cards into the mainframes 
of yesteryear. This may explain why Basic 
seems so stodgy today. 

Why, in this day of CRT displays and flop- 
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py disks, do we still number all lines, edit by 
line rather than by screen, assign variables 
codes rather than names, call subroutines 
by line number instead of by name, struggle 
to get system-level access, contend with a 
mysterious disk -system, and shift contin- 
ually between Basic and DOS modes. 

Yet Basic survives and probably will con- 
tinue to thrive for some time; it is burned in- 
to the ROMs of every TRS-80 Model I and III, 
Color Computer, Pocket Computer, Apple, 
PET, and so on. But you can bypass the 
ROMs by loading a completely different 
language into your TRS-80 and enjoy pro- 
gramming from changed perspective. I 
used MMSFORTH; now my Model I TRS-80 
has a new personality. 

What rollows is not a comprehensive pro- 
duct review but a subjective appraisal by a 
first-time user. Many functions of great in- 
terest are not covered. They are beyond the 
scope of an introductory article or I do not 
even know about them . . .yet. 

MMSFORTH— First Impressions 

MMSFORTH is available for the TRS-80 
Models I and III on disk or cassette. The 
Model I and cassette require only 16K to 
run; the Model III requires 32K. Both disk 
systems need only one drive. 

I ordered MMSFORTH by phone; it took 
about 10 days by first class mail. The 
System, Program and Utility disks arrived in 
an attractive three-ring binder with a 
126-page instruction manual. The manual 
includes chapters on Forth operations, 
editing commands, input/output to disk and 
printer, data declarations, text handling, con- 
ditionals, branches and loops. Three pro- 
grams, ranging from easy to difficult, provide 
detailed study notes. This is supplemented 
with instructions for using MMSFORTH 
system utilities and a system index. 

The optional Utilities disk includes a 
Cross-Reference utility (XREF), Floating 
Point Math, and a Z80 Assembler. 

For the rest of the documentation the 
user must sign two license agreement 
forms promising not to sell or give away 
MMSFORTH. Programs written for sale re- 
quire the end user to have the MMSFORTH 



system owners or be under a separate li- 
censing agreement. Personal use and back- 
ups are not restricted. 

This seems to exclude MMSFORTH as 
the vehicle for commercial program 
development, unless the programs sell for 
far more than the System (or System and 
Utilities) cost. I hesitate to comment further 
without knowing what royalties are involved 
with the separate licensing agreement. 
Both disks have embedded serial numbers 
to deter the rip-off artist. I sent off the 
license forms and within a week had the 
rest of the documentation (a complete 
glossary of commands, various system ad- 
dresses, a memory map and more material 
on the Assembler). 

I also got an MMSFORTH Version 2.0 
Modification Advisory, cures for bugs in 
their new system. The changes were easy to 
do using the editor. Newer versions do not 
require corrections. 

The documentation is complete and well 
written, but it is not a textbook on Forth pro- 
gramming and requires careful reading for 
the first-time user. (MMS offers other books 
and magazine articles on Forth, as well as 
their own "MMSFORTH Newsletter.") 

Starting Up 

First, Backup all the original MMS disks; 
Format and Backup utilities are provided. 
Make several backups to minimize use of 
your MMSFORTH masters. 

The Model I System disk comes ready to 
run on a 16K system, but you can configure 
the disk to your particular hardware. 

Customize permits you to specify the di- 
rectory block, the lowest unprotected block, 
memory size (to protect a printer driver in 
high memory), printer margin (set left 
margin of listings), the number of block buf- 
fers, disk startup speed (delay before 
reading and writing after motor is turned 
on), and number of disk drives. For each 
drive you may specify single or double den- 
sity (on Model III), number of tracks and 
track access speed (allowing a mix of dif- 
ferent densities and drives on line). Finally, 
there is an Auto command to perform a se- 
quence of commands on booting the 
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GREAT NEW PROGRAMS FOR YOUR TRS-BO!!! 

All programs work on both IVIod I and Mod III systems 



NON-DISKtm business software 

What Is N0N-DI8K software? If you own 
a small business, you may not require a 
$5,000 computer system. But a small com- 
puter would be a big help. With the aid of 
our packages, your present Mod I or Mod III 
computer and a small printer you can have 
business computer power without the un- 
necessary extra expense of disk drives. Our 
NON-DISK software keeps cassette access 
to a minimum by performing extensive 
memory crunching. All Information Is kept 
Inside the computer while In use, then 
stored to cassette when you are through for 
the day. All programs are VERY fast, and 
feature the unique MACH-S TM sort routine. 
Up to now, expensive disk drives have been 
required for efficient business operation. 
NON-DISK Is here to change that! 

NON-DISK SALES INVENTORY™ 
allows you to use your computer as an 
automatic ticket-writer and Inventory 
system. When you write up a sales ticket, 
the computer figures subtotals, taxes, 
totals, and at the same time subtracts sale 
quantities from Inventory. It keeps track of 
daily and weekly sales, sales tax, charge 
totals, sales totals for up to ten people at 
one time, and total cost and retail values. 
After all this work Is done, It hands you a 
neat, impressive sales ticket (with 
duplicates). Inventory Information Includes 
stock number, name, quantity, cost, and a 
retail price. A full list of Inventory is 
available at an; time. 
Make your job easier and more accurate. 
16K - 205 Item;; 32K - 835 Items; 48K - 1065 

Items $49.95 

NON-DISK SPEED WRITER TM 
Is the low cost typing package that Is 
FULLY INTERACTIVE with our ADDRESSER 
package. The SPEED WRITER allows the 
following capabilities: 1-Type as fast as you 
like. SPEED WRITER will keep up. 2-Choose 
any line length up to 120 characters. 3-Store 
Information for use or alteration at a later 
date. 4-Upper case AND lower case 
characters are standard (even on Mod II). 
5-Automatlc center and half-line tab. 6-Print 
Lout multiple copies using your printer's 
special print modes. 7-Edltlng, line Inser- 
tion, and line deletion without correction 
fluid. 8-Easy to understand Instructions. 
You can be operating this system within 
15-30 minutes ... no 8-hour lessons! 
9-Generate addresses using the NON-DISK 
ADDRESSER and have addresses 
automatically print on your letters. SPEED 
WRITER can be used for letters, reports, 
documents, virtually anything you can use 
a typewriter for. 
SPEED WRITER doesn't offer the extensive 
functions you'll find In larger word- 
processing packages, but it doesn't have a 
$100 price tag either! It makes an excellent 
normal typing generator, a useful addition 
to your business. 16K.32K $24.95 

NON-DISK ADDRESSER TM 
allows you to enter names and addresses 
into your computer and print them on either 
mailing labels OR envelopes (along with 
your return address)! You may sort by either 
name or zip code and store your list for later 
additions, or for use by SPEED WRITER. 
End the drudgery of hand addressing. 
16K-100 addresses, 32K-250 addresses, 
48K • 400 addresses $24.95 

TO ORDER: Band oheok or Manly Order. 
WE PAY POBTAQE! We will anawer non-crdi 
aalf-addraaaod «10 envelope [BABE]. All ord 
line 



NON-DISK 
ELECTRIC BOOKKEEPER TM 
At last, General Ledger for your cassette- 
based system! Keep records for up to 50 ac- 
counts Including CASH, SALES, EX- 
PENSES, A/P, A/R . . . all definable by YOU. 
Transaction Information Includes Date, 
Debit account, Credit account, Amount, 
and Reason for transaction. The ELECTRIC 
BOOKKEEPER allows full editing and print- 
out functions, Including Transaction 
Listing, Balance of Individual Accounts, 
Trial Balance Sheet, Trial Income State- 
ment, and End-of-Perlod Processing. Above 
all, the system is easy to understand and 
use. 16K - 230, 32K - 740, 48K - 1250 transac- 
tions per period $49.95 

NON-DISK CHECK SYSTEM TM 
A truly excellent check register and 
checkbook balancer. Its error checking 
functions can show you an error even if 
your checkbook seems to balance. CHECK 
SYSTEM will perform all math for you, 
balance your book, reconcile your state- 
ment, and keep a permanent record on 
cassette tape. CHECK SYSTEM supports 
two modes of operation for business or per- 
sonal use. Don't spend frustrating hours 
trying to balance your checking account. 
NON-DISK CHECK SYSTEM will easily keep 
track of all your records! Supports but does 
not require a printer. 16K-260 entries, 
32K - 725 entries, 48K - 1190 entries .. $24.95 



COMPUTER TYPING COURSE TM 
Teachers and parents especially will want 
this package. If you've ever wished you 
could touch-type, this package Is just what 
you need. You can learn to type at your own 
pace, getting to know finger positions, the 
keyboard, special characters, numbers, 
shift, and enter keys. CTC consists of 
several lessons, each taking a certain part 
of the keyboard and covering it thoroughly 
before continuing on to the next lesson. 
You may review any lesson as many times 
as you like. As an added bonus, CTC offers 
accuracy tests at the end of each lesson, 
and a "Practice Page" that allows you to 
type anything you wish in order to build 
your speed. We feel this Is the best on the 
market. 16K $19.95 




GIANT SPACE SLUG TM 
Worms, move over . . . QIANT SPACE SLUG 
Is here! You are a huge, slimy, Icky slug, 
almost the size of a planet! Your one Joy In 
life Is munching space ships that Invade 
your territory. Like all overeaters, however, 
the more you eat, the larger you grow. The 
larger you grow, the harder It Is to move. 
Someday you're bound to hit the deadly 
radiation belt . . . Fast arcade graphics, 
high score, multiple levels of play, and 
SOUND! 




THE PHASE VII TM GAME SYSTEM 
In 1978 the first easy-to-play role-playing 
game appeared on the market . . . PHASE 
VII. It was very popular because of It* 
unique feature of using the realms of fan- 
tasy AND science fiction. In 1980 It was In- 
troduced as a computer game In 16K and 
32K versions. The general response was, 
"It's pretty good, but It could be better." The 
programmer was crushed and holed him- 
self up In a 3 x 5 closet. He has been work- 
ing on the program now for two more years. 
Introducing: 

COMPUTER PHASE VII 3.0 
The new version Is Incredible! Imagine 
yourself aboard a huge space station where 
both magic and science work! Armed with 
your special powers you will fight terrible 
creatures (watch out for the deadly killer 
toadstools), while searching for the elusive 
treasures. As you play, you become more 
powerful and experienced. The game 
NEVER ends; one sequence of play leads 
Into the next. No two games are the same. 
You can take on any Identity you wish, and 
have but one single goal: TO SURVIVE. In- 
cludes Illustrated rule book $24.95 

Original PHASE VII (if purchased with COM- 
PUTER PHASE VII) $7.95 

(If purchased separately) $8.95 

FOR MASOCHISTS ONLY (solitaire module 
allows you to play PHASE VII by 

yourself) $3.95 

P7 FANZINE 
Science fiction/fantasy articles, artwork, 
trivia quizzes, question and answer articles, 
and the latest PHASE VII Info directly from 
the author! Of general Interest to all SF & F 
fans as well as PHASE VII players. All 
subscriptions start with Issue I (Jan. 1982), 
so you won't miss an Issue! 
One year (mailed first class) $10.00 

CHESS BOARD TM 
There are plenty of programs around that 
allow you to play chess with your computer. 
But what about when you want to play 
chess with your friend (and show off your 
computer at the same time)? CHESS 
BOARD allows you to use the computer as 
an automatic board. It uses a unique mono 
color field for easy recognition of pieces, 
and supports En Passant, Castling, and 
Pawn Advance. Now you can boast the 
most expensive chess in the neighborhood. 
Use your computer! 16K $14.95 



plus WARPWAR TM 
Hyper space Is dangerous; too dangerous 
for men. You are In command of a robot 
fleet, trying to outwit your opponent. 
Whoever gets his fleet trapped forfeits his 
home planet. Your ships will appear out of 
hyperspace, hoping to gain strategic posi- 
tion. The only problem Is that no ship Is ever 
In the same place twice! Three levels of 
play, one or more players. 16K $19.95 



NUCLEAR BEEHIVE TM 
"The reactor's gone critical I Run for 
cover!! I" The 'Beehive,' the world's most 
powerful and dangerous super-reactor, hat 
been sabotaged! The scientist In charge 
has been killed, leaving you to figure out 
the cell sequence required to damp down 
the reactor before It starts core meltdown. 
If you make a mistake, you will not live to 
regret It. The Beehive Is humming. Time Is 
running out. With sweat pouring down your 
face, you begin. 16K $14.95 




DRAGONLAIRTM 
Ages ago a great king lived in a series of 
caves. His daughter fell Into a deep sleep 
(actually, she hacked off a wizard and he 
put her In suspended animation. Served her 
right). The king died of grief (not to mention 
doctor bills), and out of loyalty his servants 
still remain. Also remaining Is a somewhat 
Incredible treasure. 

Oh, one little thing. Before he died, the king 
placed a small dragon to watch over his 
treasure. That was 500 years ago. Now 
there is a large dragon. 
DRAGONLAIR Is not an adventure game. 
There are over 100 rooms with no dangers. 
Well, almost none. There is one little sur- 
prise... 16K $14.95 

LASER LIGHTS TM 
Put on your favorite record or tape, dim the 
lights, lean back In your favorite chair, and 
turn on your computer for one of the most 
interesting display programs you'll ever 
see. LASER LIGHTS Is a unique, impressive 
computer light organ. Your favorite music 
suddenly becomes a pulsating, almost hyp- 
notic computer display. The patterns you 
see are not random or preset. They are 
generated completely by your music. Enjoy 
multiple speed and rhythm sensitivity. You 
are now within our power. 16K $12.95 



MAROONED AGAIN TM 
Are you sick of adventure games that go 
beyond all logic? Relief at last! This one Is 
the best we've ever seen. You have crashed 
your ship on a hostile planet (fifth time this 
week). But all Is not lost . . . you've found an 
alien ship! The crew Is dead, but the ship Is 
In perfect condition. You simply need to 
find the components to get It to blast off. 
You send an android to scout the ehlp, but 
It was damaged in the crash and It's liable 
to do almost anything. You must get the 
ship started and blast to safety. In 
MAROONED AGAIN all events ars 
logical . . . and dangerous. 16K $14.95 



■d, 



■m ahlppad within B daya. Phona 
op*n 10 a.m. - 3 p.m. [all time zonaa] Mon. - Frl. Qamaa mrm available on 
Mod III dlak [add SB.OO to prloa. Re^ulree S dlak ayatem.J. 

DEALERS: Band buelneaa oard and an BABE for oomplete daalar Information. 



PROGRAMMERS: Your aoftware la valuable, and we're the beat oholca for 
marketing! Bend ue en BABE and we'll tell you why. Or better yet, eend ue a copy 
of your program for anelyele. We merket your progrem FASTI There le no need to 
wait for a yeer or mora for a marketing deolelon. FUTUREVIEW will make you 
money, NOW! 

FUTUREVIEW it P. O. BOX 101 -Ct JOPLIN, MO. S4BOB i: [417)781-6999 



"All is written back to the disk 

and automatically configures the system 

whenever that disk is booted." 



system. These parameters are written back 
to the disk and automatically configures 
the system whenever that disk is booted. 

When you are more confident with the 
MMSFORTH system, you can further 
modify the system. You can select the max- 
imum number of block buffers (from the 
default of two), editor-like functions while 
inputting from the keyboard (recall the last 
line typed, for example), a lowercase driver 
and a special printer driver for the MX-80. 

Other utilities on the System disk allow 
copying a range of blocks to another loca- 
tion, finding any word in a range of blocks 
(with options to print and edit matches), and 
translating source code from Version 1.9 to 
the present 2.0 Version of MMSFORTH. 

You can design the system to match your 
needs and hardware. Disk systems for 
Models I and III have cassette functions. 
With the Model III version it is possible to 
select single or double density disks. Model 
I and Model III users can exchange disks. 

System Extensions 

As delivered, MMSFORTH is limited to 
character (8 bit) and single-precision (16 bit) 
integer arithmetic. What this lacks in handi- 
ness and dynamic range is compensated 
for by speed. You can add the following 
from the System disk (depending on mem- 
ory): double-precision integers, arrays, 
strings, random number, graphics, screen- 
print (works from any mode, and prints 
graphics on MX-80), cassette functions, 
clock, and a few other utilities. Loading 
them all takes an additional 8K when com- 
piled onto a System disk using Customize. 

Several demos and games on the Pro- 
grams disk allow the novice to appreciate 
the power of Forth. Then there is a very im- 
pressive string-sorting demo, the game of 
Life (with a Doodling program to input pat- 
terns), another version of Life with an 
assembler core (about one generation per 
second), and Breakforth (a challenging ver- 
sion of Breakout with sound written entirely 
in MMSFORTH). 

The optional Utilities disk has single and 
double precision floating point math de- 
rived largely from ROM routines to conserve 
memory. You can select radians or degrees 
modes for trigonometric functions, rec- 
tangular to polar coordinate conversions, 
complex numbers, imaginary numbers, and 
a superfast program to solve quadratic 
equations. A flexible cross-referencing pro- 
gram (XREF) will print (to printer or screen) 
all references to words you choose in the 
range of blocks specified. A complete Z80 
Assembler rounds out the Utilities disk. 

All the programs, extensions and utilities 
are written in MMSFORTH, not machine 
language. Customize them by editing the 
appropriate block of source code, or only 
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those portions of a utility which apply to 
your program. 

Blocks 

The basic storage unit of the Forth lan- 
guage is a Block, made up of 1,024 
characters (1 K). Because a block fits 
perfectly on the TRS-80 screen, writing, 
editing and listing programs is a breeze. 
Just POP from block to block without scrol- 
ling. Three blocks fit nicely on 8 1/2 by 11 
paper for listings. Each disk on the Model I 
contains 87 consecutive blocks numbered 
from to 86. The Model III has 179 blocks 
per disk. Each block is comprised of four 
256-byte sectors. Blocks are numbered con- 
secutively from drive to drive 3; the system 
behaves as if they were on one large drive. A 
relative addressing convention allows ac- 
cess to the Nth block on drive D in addition 
to absolute addressing. 

Information is transferred in one-block 
units from disk to block buffers in RAM. Ac- 
cess to disk blocks is almost as easy as ac- 
cessing RAM (either directly or under pro- 
gram control). With four drives you have the 
equivalent of more than 250K of virtual 
memory and more than 500K on the Model 
III. Files are created within blocks by calcu- 
lating the offset from the first byte of the 
block to where a particular record is written 
within the block. Any format developed by 
the programmer can be used. A completely 
documented example of data file handling 
is included with a Checkbook program. 

Words 

Forth consists of a dictionary of words. 
Words can be up to 31 significant charac- 
ters (without spaces); they act like named 
subroutines. 

Words are defined as in this example: 

: PAUSE 2000 DO LOOP ; 

Here the word Pause is defined as an 
empty loop counting from to 1999. The col- 
on begins the definition and the semi-colon 
ends it. Once a word is defined it becomes 
part of the system until you turn the com- 
puter off or tell the system to forget it. 

A word can be used to build other words: 

I LASH 15360 1024 191 FILl PAUSE 15360 1024 
Bl ANK PAUSE : 

Flash whites out the screen (fills from 
memory location 15360 for 1K with graphic 
code 191) executes Pause (waits), blanks 
out the screen (fills the screen with ASCII 
32), and waits again. The Fill and Blank 
functions are executed at machine-code 
speed; a timing loop prevents Flash from 
just being a blink. Define your own lexicon 
of functions and build your own language. 



(Use Customize to make Flash part of your 
own MMSFORTH version ready every time 
you boot up.) 

Execute Mode 

The Execute mode performs direct func- 
tions and enters temporary word defini- 
tions. 

In the execute mode, if you entered the 
definition above for Pause you could run it 
right away, although it would not do much 
by itself. 

After defining Flash you could still run 
Pause. This is clearly far more useful than 
the Basic immediate mode, limited to one 
line. You can define words until RAM is 
filled. To purge the dictionary from time to 
time, define a dummy word (by convention, 
Task) before defining your test words. The 
MMSFORTH words Forget Task remove 
Task and all words defined more recently 
from the dictionary. 

You may redefine words; only the most 
recent definition of the word is active when 
it is executed. The system prints a message 
warning you of the duplication. The user 
has total disk access in execute mode. You 
can copy blocks, list blocks, get an index of 
a range of blocks, and load programs writ- 
ten in the edit mode for execution. 

Edit Mode 

To save programs, write them with the 
editor and save the source code to disk. 
When the source code loads from disk it is in- 
terpreted as if you were in the execute mode. 

The editor is easy to use; I wish I had its 
range of commands in a word processor. In 
edit mode you can: insert or delete charac- 
ters or lines; lock into insert mode; truncate 
to end of line; copy lines; treat the block as a 
continuous page of 1024 characters (that is, 
characters wrap around when inserting or 
deleting); and use the arrow keys to position 
the cursor anywhere on the screen. 

When you want to quit edit mode, update 
the block and Quit. Your edit is stored in a 
block buffer, but not on disk. To force 
changes to disk for all Updated blocks, use 
the rather colorful word Flush. 

To reenter edit mode, type E and the cur- 
rent block appears on the screen. You can 
review all blocks on disk with a shift Clear 
Down-Arrow (or Up-Arrow to go backwards). 
This visual disk search proceeds at better 
than one block per second. 

The editor also can be used on non-Forth 
disks as a Superzap-type program with di- 
rect visual access to any byte on a disk. 
This can be useful for inspection of text 
files. 

Assembler 

It is easy to include 8080 assembler code 
in a program using the MMSFORTH word 




EXPENSIVE- The LNW 
System Expansion II and built-in \i'!ffi$-?$ 
comes with a full 32K of 200ns RAM&'- ' 
RS232c 20 MA current loop serial interface. 
That's for starters. Next, consider our heavy gauge 
steel case, power indicator lamp, gold-plated 
connectors, FR-2 glass epoxy circuit hoard with 
solder mask and silk screen legends. Then there is 
the parallel printer port, screen printer port, real 
time clock, and extra heavy duty onboard power 
supply with over current protection, over voltage 
protection and thermal shutdown. If that's not 
enough then there is the floppy disk controller, 
guaranteed operation at a 4MHz CPU speed and 
our 6 month warranty. Every <n\e of these features 
is STANDARD. This is true system expansion. 
You get every 'expensive' feature without 
spending more. 

('HEAD Our price is $:-\99.95. Any way you 
compare, features or price, LNW's System 
Expansion II is the clear winner. The LNW 
System has been field tested tor over two years 
with thousands of users. It works with any DOS, is 
100 'V TRS-80 Model I compatible and it works 
'right out of the box'. If there is any doubt in your 
mind as to whether you should buy ours or the 
'other guys', just ask an LNW owner! 

WE ARE #1 - Number one in price, features, 
reliability, performance and delivery. LNW is 
committed to 'expensive' features and quality at 
reasonable prices. LNW is committed to support, 
thorough documentation, and reliability. 

LNW Research Corp. 

2620 WALNUT Tustin, CA. 92680 

(714) 841-8850 (714) 544-5744 



made us the number one 
manufacturer of system expansion units 

and accessories for the Model I computer. 

EXPANSION OPTION - 8-inch drive capability- 
is as easy as plugging in the LNDoubler 5/8 
option*. Now you can have any combination of 
single- or double-density, single- or double-sided, 
8"* and/or 5" disks on-line! 8-inch disk storage 
increased to 591,360 bytes - 77-track single-sided, 
double-density or 1,182,720 bytes - 77-track 
double-density, double-sided. 

The LNDoubler 's unique 5/8 switch allows you 
to boot from 5- or 8-inch system disks and it's 
accessible from outside the interface. The $219.95 
LNDoubler 5/8 comes with a double-density disk 
operating system (DOS+ 3.3.9), complete with 
BASIC and utility programs... ready to run your 
software. 

Each of your present 40-track, single-sided 5-inch 
drives will store up to 184,320 bytes (formatted * 
storage) - that's an 80 '< increase in storage 
capacity for only half the cost of just one disk | A 
drive. With three 8-inch double-density, 
double-sided drives your Model I will have 3.75 
Megabytes of online storage - that's more storage 
than a Model II or Model III! 




• See List of Advertisers on page 386 



*H" drive operation requires special table, 8'*- 
double-density requires ii.iiSMHz CPU speedup 
modification or LNW-80 4MHz computer. 
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If you have 

anything to do 

with the TRS-80* 

System you 

should be 

reading the 

EIGHTY 

SYSTEM 

NEWSLETTER 

every week! 



Don't miss a single issue of the new Eighty 
System Newsletter . . . published weekly and 

mailed every Friday by first Class Mail This 
is the only publication designed for personnel 
in the TRS-80* industry, including manufac- 
turers distributors dealers and computer 
users The Eighty System Newsletter is 
compiled and edited by Ken Gordon, producer 
of 'tie National TRS-80* Show, the E ghty/ 
Apple Show, the NJ Microcomputer Show, 
and publisher of the Amateur Radio Equip- 
ment Directory, Here is valuable information 
in professionally prepared format about TRS- 
80* hardware, software, peripherals, trends in 
the industry, and latest news. In addition, 
each weekly issue contains brief digests of 
articles related to the TRS-80* system 
appearing in over 100 computer related and 
general interest publications. This bibliography 
will save you both time and money in keeping 
up with articles in print on the TRS-80* 
computer system. The Eighty System News- 
letter is a must for all active TRS 80" users. 
plus anyone involved in any way with the 
manufacturing, distributing or retailing of 
TRS-80* products. 

Subscribe today: Mail the coupon with 
your check for $39 for the next 52 weekly 
issues (sent First Class Mail that's only 
75 C per week.) If for any reason you are 
not satisfied with the Eighty System 
Newsletter — we will refund the undelivered 
portion of your subscription. 



KENGORE CORPORATION 

3001 Route 27 
Franklin Park, NJ 08823 
(201) 297-2526 

□ Enclosed is my check for 
$39 for the next 52 issues 
of The Eighty System 
Newsletter (sent First Class 
Mail). 

Name . ■ 

Company . 

Address 
City _ 



State 



Zip 



•TRS-80 is a Registered Trademark of Tandy 
Corporation/Radio Shack Division 
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''Edit and customize [utilities] 
by calling the appropriate block. 



Code to start the sequence and either Next, 
PSH, or PSH2 to return (passing nothing, 
HL, or DE and HL to the user stack). The 
8080 assembler is incomplete, but 
MMSFORTH words— like CMOVE (which 
moves a series of bytes from one memory 
location to another) render some assembler 
functions unnecessary. Control structures 
and word order for the assembler follow 
Forth conventions. 

Data Types 

Handle data in MMSFORTH by character, 
single, double and triple-precision integer, 
single and double-precision floating point 
and complex numbers. 

In an 8-bit computer all data is stored at 
memory locations as 8-bit bytes. Each byte 
can represent 256 different bit-patters or 
states. These 256 states represent ASCII 
characters, graphics codes, unsigned (posi- 
tive) numbers from to 255, or signed num- 
bers from minus 128 to plus 127 depending 
on the context. Numbers larger than 255 are 
represented by groups of two or more bytes 
called words (not to be confused with Forth 
words). 

You can consider a 16-bit FORTH vari- 
able as two characters, as two 8-bit num- 
bers or as a 16-bit number. The choice 
depends on the particular memory operator 
used to access the variable. Quite unlike 
Basic which is limited to the 8-bit PEEK and 
POKE commands, you can store and read 
from 8-bit characters to 64-bit complex 
numbers as units. 

Strings are a maximum of 255 bytes long 



Algebraic 


RPN 


(A* B) 


A B * 


«A * B) - C) 


AB * C - 


(A * (B - C)) 


ABC- 1 


(A + (B / (C - D))) 


A BC D - / + 


(A * (B / (C * D) + E)) 


A B C D * / E + * 


Table 7. Algebraic vs. RPN 
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B (C*D) 
A (B/(CD)) 
(B/(C'D)) E 

A «B/(C*D)) + E) 
(A*((B/(C*D)) + E| 


Table 2. Stack values during execution 



(the first byte is the length); string functions 
are a superset of Disk Basic string func- 
tions. Unlike Microsoft Basic there are no 
string pointers, making it easier to directly 
access and change strings in memory. 
$XCH (exchange strings) is useful in sorting 
programs. 

Memory Functions 

The MMSFORTH words to locate 
numbers or strings in memory are: 



' <word> "tick"— gets memory address of <word>, 

where <word> is the name of a variable, con- 
stant or system word 
@ "fetch"— gets contents of memory location 

! "store"— stores to memory location 



Use prefixes for memory, math, and stack 
operations applied to numbers other than 
single-precision integers. Speed and pro- 
gramming flexibility are gained. 

Constants, variables and arrays can be 
defined for any data type, including strings. 
A constant's name evokes its value; a vari- 
able's name evokes its memory address 
making it easy to change its value with !. A 
variable's contents are fetched with @. 

The Stack 

You can write complex programs in Forth 
without one variable or constant. Forth 
uses a stack (a set of memory locations) to 
hold values and pass them from word to 
word. Passing numbers from one word to 
another is as simple as leaving the results 
ot one calculation on the stack for the next 
word to pick up. The result is a great sav- 
ings in coding. 

The stack is just a pile of numbers in 
memory with a top-of-stack (TOS) pointer 
showing the top of the pile. As numbers are 
entered into the stack the pile gets deeper. 
The TOS pointer always indicates the most 
recently entered number. Numbers can only 
be entered and taken away from the TOS. 
This sort of stack is also called a Last-In 
First-Out (LIFO) stack. 

All Forth functions involve the numbers 
in the TOS and the stack positions immedi- 
ately below. When a function is executed, 
the stack pops up removing the parameters 
used in the function and making the stack 
less deep. The result is left in the TOS. 

To use a LIFO stack with its semi-auto- 
matic management of number, you cannot 
use ordinary algebraic notation, with its 
parentheses and equals signs. Instead you 
use a more efficient notation called Reverse 
Polish Notation. 

Reverse Polish Notation 

RPN is a generalized way to evaluate for- 
mulas developed by J. Lukasewicz. RPN 
was named both in his honor and because it 
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seems backwards to those used to algebra- 
ic notation. 

Table 1 shows some comparisons be- 
tween algebraic notation and RPN. 

To interpret an algebraic expression in 
RPN, take the operands (ABCDE) from left 
to right until there is an intermediate result 
(close-parenthesis) where the appropriate 
operator (+ - * I) is inserted. 

Each operand is pushed into the stack 
(further and further if there are no interme- 
diate results) and then popped back up as 
operations are performed on the top two 
numbers in the stack. Looking at the last ex- 
pression in Table 1, the stack would contain 
the values during its evaluation as shown in 
Table 2. 

In MMSFORTH in execute mode, for A = 2 
B = 20 C = 4 D = 5 E = 30, the entry for the 
above example would be: 

2 20 4 5 * I 30 + - . <ENTER> 62 

Each time a value is pushed into the 
stack, the stack gets deeper, and each 
time an operation is performed the stack 
pops back up with the result of that opera- 
tion. The result is that the original algebraic 
construct is faithfully executed, although 
the operators and operands are entered in 
an entirely different order. In addition to re- 
quiring fewer keystrokes than algebraic 
notation, RPN is relatively easier to imple- 
ment in machine language. This saves 
memory and increases speed. 

A variety of functions move around, dupli- 
cate and delete values on the stack to use 
the same numbers again and again if re- 
quired. In Forth, all functions involving 
numbers and operations are noted in 
RPN. Thus 17 88 ESET is the same as SET 
(88,17) in Basic (set a graphics character). 
Forth's difference of order looks strange to 
the Basic programmer. 

Programming 

Writing a program in Forth is unlike writ- 
ing a program in Basic. Programming in 
Forth consists of defining a hierarchy of 
words, up to the word that executes the pro- 
gramming. You add words of your own defi- 
nition to the dictionary. Each word's defini- 
tion must be in terms of system words or 
words defined earlier in the source code. 
The stack most often holds data to be 
manipulated by various words, although 
named constants and variables are also 
available. The main difficulty in learning 
Forth is visualizing and keeping track of 
values in the stack. The reward is faster ex- 
ecution using less RAM. 

As a program takes form you feel more 
and more power at your fingertips. Each 
word includes within itself more of the 
previously defined words and all the func- 
tions they imply. Tying together the pro- 
gram at the highest level is often the easiest 



Words can be up to 31 significant characters. . . 
they act like named subroutines." 



part. 

Debugging and testing can be done by re- 
vising the source code with the editor and 
running the updated program or by trying 
routines in the execute mode using PCRT 
(display to both printer and CRT) or the 



screen-print utility to record what you have 
written. If an error occurs during execution, 
the EEDIT function places the cursordirect- 
ly in the block where the error was sensed, 
ready to edit! Needless to say, this makes 
debugging far simpler than with Basic. 



BLOCK 184: 

8 < DYNAMIC STACK DISPLAY PAGE 1 OF 3 1 AUG 81 N. SPIES ) 
1 < MAKES STACK VISIBLE AND PERMITS FUNCTIONS ) 



2 
4 
5 

6 
7 

8 

9 

10 
11 

12 
13 

14 
15 



BLOCK 185 



TASK ; 

SETDISPLAY PAGE 
8 PTC 

5 PTC . " TOS" 

5 PTC 
5 PTC 



< SET DISPLAY, LABELS, PROMPTS > 



37 PTC 
37 PTC 
37 PTC 

37 PTC 
37 PTC 



STACK DISPLAY 1 



2 5 PTC . " 2ND" 



4TH" 5 
7TH" 8 
N NUMBER' 
D DROP " 
U DUP " 
S SWAP " 
OVER " 



5 PTC . " 5TH 
) PTC . " 8TH 

6 37 PTC . 

7 37 PTC . 

8 37 PTC . 

9 27 PTC . 
10 37 PTC . 



3 5 PTC . " 3RD" 

6 5 PTC . " 6TH" 

9 5 PTC . " 9TH" 

R ROT" 11 37 PTC . " -" 

<" 12 37 PTC . " *" 

13 37 PTC . " /" 

>" 14 37 PTC . " M /MOD" 

+ " 15 37 PTC . " BREAK" 



< CAUSES NEXT BLOCK TO BE LOADED ) — > 



< DYNAMIC STACK DISPLAV PAGE 2 OF 3 1 AUG 81 N. SPIES ) 



1 

2 

3 

4 

5 

6 

7 

8 

9 

18 

11 

12 

13 

14 

15 



DSTACK 1 
2 
3 

4 

5 
6 
7 



POS 8 

EL 38 

ENUMBER 

EDROP 

EDUP 

ESWAP 



15 PTC 
15 PTC 
15 PTC 
15 PTC 
15 PTC 
15 PTC 
15 PTC 
15 PTC 
15 PTC 
48 PTC ; 
EMIT 
POS1 EL 
DROP 
DUP 
SWAP 



'b 

•-s 

'S 
"5 

'"S 
'S 
'S 
'S 

• s 



2 
4 
6 
8 

10 

12 
14 

IS 



DUP U. 
+ DUP U. 
+ DUP LI. 
+ DUP U. 
+ DUP U. 
+ DUP U. 
+ DUP U. 
+ DUP U. 
+ DUP U. 
PGS1 8 



IS PTC 



TOS , 

2ND , 

ETC 



CLEAR TO END OF LINE 
NUMBER - ENTER" 
POS . " DROP" 
POS . " DUP" 
POS . " SWAP" 



; <. 9TH TOS > 
CURSOR POSITION 



#IN POS1 EL ; < 
EL ; (. DROP > 
EL ; < DUP > 
EL ; (. SWAP > 



NUMBER > 



— > 



BLOCK 186 



< DYNAMIC STACK DISPLAY PAGE 3 OF 3 



1 

2 
3 
4 
5 
6 
7 
8 
9 

10 
11 

12 
13 
14 
15 



EOVER 
EROT 

EC 



OVER 

ROT 

< 



:> 

+ 

/ 

/MOD 



POS 
POS 
POS 
POS 
POS 
POS 
POS 
POS 
POS 
POS 



1 OVER" 

' ROT" 

' LESS THAN" 

' EQUALS" 

' GREATER THAN" 

' ADD" 

1 SUBTRACT" 

1 MULTIPLY" 

1 DIVIDE" 

' /MOD" 

BEGIN DSTACK 

' KEY < WAIT 




E= 

E> 

E+ 

E- 

E* 

E/ 

E/M 

STACK SETDISPLAY 

. " SELECT BY KEY 
ACASE NDUSOR<=>+-*/M" ENUMBER EDROP EDUP ESWAP EOVER EROT 

E< E= E> E+ E- E* E/ E/M < ROUTINES ) 
CASEND 8 UNTIL ; STACK < EXECUTE PROGRAM WHEN LOADED ) 

Program Listing 1. Stack Memory Locations 



1 AUG 81 N. 
EL ; < OVER ) 
EL ; < ROTATE ) 
EL ; < LESS THAN > 
EL ■> (. EQUALS ) 
EL ; < GREATER ) 
EL ; (. ADD ) 
EL ; < SUBTRACT ) 
EL ; < MULTIPLY > 
EL ; C DIVIDE ) 
EL ; (. /MOD ) 

POS1 (. MAIN PROGRAM ) 
FOR INPUT, BRANCH ON INPUT ) 
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"RPN was named both in his honor 
and because it seems backwards 
to those used to algebraic notation. 



Program Listings 

Program Listings are easy to read 
because each word is defined by words de- 
fined earlier. Enter notes on program flows 
and the actions of words parenthetically. 

I have included two MMSFORTH utility 
programs. 

Program Listing 1 shows the top nine 
stack memory locations and their contents 
dynamically, with the option to perform a 
variety of stack functions. Do not enter the 
line numbers. 

Program Listing 2 shows the keyboard 
scan memory locations and how their val- 
ues change when you press various combi- 
nations of keys. This is useful for game 
planning and where branching is based on 
keys pressed. 

Conclusion 

MMSFORTH is a complete version of the 
Forth language (a superset of the Forth 79 
Standard) and makes the TRS-80 a very 
powerful tool for developing programs. 
Build a powerful set of subroutines and 



build on your previous work with an ease 
unknown to Basic. 

Be prepared to spend some time learning 



the system, getting familiar with the stack 
and RPN, and mastering the data types. 
Your effort will be well spent. ■ 



BLOCK 107: 





< KEVBORRD SCAN DEMO - PRGE 1 OF 1 28 JUL 81 N. SPIES ) 


1 


: TRSK i < DUMMY WORD TO FORGET PROGRAM RFTER EXECUTION ) 


2 


< PROGRAM - FIRST PART PRINTS LABELS FOR MEMORV LOCATIONS ) 


3 


: KEYS PAGE 25 PTC . " 14337 


" 1 25 PTC . " 14338 


" 


4 


2 25 PTC . " 14340 


" 3 25 PTC . " 14344 


" 


5 


4 25 PTC . " 14352 


" 5 25 PTC . " 14368 


" 


6 


6 25 PTC . " 14400 


" 7 25 PTC . " 14464 


" 


? 


< START PROGRAM LOOP - FETCH/PRINT CHARACTER AT EACH MEM LOC > 


8 


BEGIN 35 PTC 14337 C? . " "1 35 PTC 14338 C? . " 


9 


2 35 PTC 14340 C? . " "3 35 PTC 14344 C? . " 


10 


4 35 PTC 14352 C? . " "5 35 PTC 14368 C? . " 


11 


6 35 PTC 14400 C? . " "7 35 PTC 14464 C? . " 


12 


UNTIL ; < END FOREVER LOOP - BREAK TO EXIT PROGRAM ) 


13 




14 
15 


KEVS < EXECUTE PROGRAM WHEN LOADED ) 




Program Listing 2. Keyboard Scan Memory Locations 



MISOSYS MISOSYS MISOSYS MISOSYS MISOSYS MISO SYSMISOS YS MISOSYS MISOSYS MISOSYS MISOSYS MISOSYS 

IHES VI HIM 8 



CO 

> 
w 
o 
CO 

CO 

> 
co 

o 

CO 
CO 

>- 

CO 
O 
CO 



in 

> 

CO 
O 
CO 



CO 

> 

CO 

o 

CO 



CO 

>- 

s 

CO 



CO 

> 

CO 

o 

CO 



EDflS 15 

EDAS is a sophisticated Editor 
and Assembler for TRS-80 I & III 

• All text may be input in upper or 
lower case. 

. Assemble directly from one or 

more disk files via *GET. 
. Assemble to disk or memory 

• Binary, octal, decimal, hex, and 
string constants; Multiple con- 
stants may be input on a single 
line. 

. CMDFILE utility included. 

• Conditional assembly support. 

• Cross-Reference utility. 

. DOS functions DIR, FREE, KILL, 
and LIST are supported. 

• 14-character labels including 
special chars. "@", "$",".","?". 

• Editor includes block move, 
global change, renumber, find. 

. EDTASM & M-80 source files 
can be read or written. 

• Expression evaluator supports 
+, -, *, /, MOD plus logical AND, 
OR, and XOR. 

• Paged & titled listings with page 
numbers and date/time. 

. PAGE, TITLE, SUBTTL, SPACE, 
& COM pseudo-ops supported. 

• Set memory size, page prompt, 
JCL execution, Abort option. 

. EDAS is supported with TRSDOS 
compatible DOSs (LDOS, VTOS). 
. Price is $79.00 + $4.00. S&H. 




MISOSYS MISOSYS MISOSYSMISOSYS MISOSYS 

>. LDOS, Version 5.1 is the Ultimate in Operating ri 

<0 Systems for the TRS-80 Models I and III. g 

03 MISOSYS is your East Coast Headquarters ^ 

for LDOS, the documented system! Version < 

5.1 is priced at $129.00 + $5.00 S&H per " 
system. Deduct $35 if ordering both. 



CO 

O 

CO 

< 

CO 
SASOSIIAI SASOSIIAI SASOSIIAI SASOSIIAI SASOSIIAI 



LI a J 



DSMBLR: A 2-pass Z-80 labeling disassembler. 

Output tc Video, Printer, or Disk. $20 

DISKMOD: Turn EDTASM 1.2. into disk assembler 

with block move, global change, more. $30 
THE B00Ks: Volume I gives access to all math 

operations in Level II. Volume II explains 

KI, DO, PR & Cassette I/O. Per volume: $15 

All programs Model I/I 1 1 compatible. For S&H 
include $2 + $.50 per unit. {VA res. add 4%} 




MISOSYS - Dept. M4 

P.O. Box 4848 

Alexandria, VA 22303-0848 

703-960-2998 MicroNET 70140,310 

Dealers Inquiry Invited 




s 123 



CO 



CON80Z: Translates assembler 
source files from Intel 
8080 to Zilog Z-80. $50 

CONVCPM: Transfers CPM files 
(8"-SDEN, selected 5") 
to LDOS diskettes. $30 

FED: Screen-oriented FILE 
"zapping" utility. $40 

FILTER: Application pack of 
14 filter programs with 
assembler source. $60 

HELP/QRC: ^ery fast screen 
prompts for LIB, LBASIC 
Util i ties. With Quick 
Reference Card. $25 

MONITOR: Take control of I/O 
disk errors to attempt 
recovery w/o ABORT. $25 

LED: The LDOS ASCI I /HEX word 
processing type editor. 
Edit JCL KSM FIX + $40 

MSP-01: This support package 
includes PARMDIR: a JCL 
file generator & report 
generator for DIR info; 
MEMOIR: produces a DIR 
of high memory; DOAUTO: 
exec any AUTO command; 
DOCONFIG: re-initialize 
to a CONFIG/SYS. $50 

PDS: Add Partitioned Data 
Set functions. Directly 
exec CMD members. $40 

SOLE: Create Mod-I bootable 
DDEN diskettes. $25 

ZGRAPH: Graphic applications 
created on the screen 
With full ai:f:iq. U® 



CO 
O 
CO 

< 

CO 

1 

CO 

o 

CO 

< 

CO 



5 SASOSIIAI SASOSIIAI SASOSIIAI SASOSIIAI SASOSIIAI SASOSIIAI SASOSIIAI SASOSIIAI SASOSIIAI SASOSIIAI SASOSIIAI SASOSIIAI 
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COMPUTER BOOKS FOR BEGINNERS 

Everything you need to know to get started programming your own computer. These handy books of programs and about 
programming are jammed with easy-to-understand info for beginners. They are crammed with hundreds of tips, tricks, 
secrets, hints, shortcuts and techniques plus hundreds of tested ready-to-run programs. Our full line includes program 
books and programming aids for eight of the most popular computers for beginners: TRS-80 Color Computer. APPLE II. IBM 
Personal Computer. TRS-80, Sharp and Casio pocket computers, including the new TRS-80 PC-2 and Sharp PC-1500 



Color Computer 

101 Color Computer Programming Tips & Tricks, learn-by doing instruc- 
tions, hints, secrets, techniques, insights, ior TRS-80 Color Computer, 
128 pages. S7.95 

55 Color Computer Programs for Home. School & Office, practical ready- 
to-run software with colorful graphics. 128 pages. S9.95 
55 MORE Color Computer Programs for Home, School & Office, handy 
book packed with useful type-in-and-run sottware. with colorful 
graphics, for TRS-80 Color Computer, 1 12 pages. S9.95 
Color Computer Graphics, complete guidebook loaded with lips, tricks. 
hints, secrels. shortcuts, lor making the most ot TRS-80 Color Computet 
video graphics Learn-by doing instructions plus complete programs. 
128 pages. S9.95 
The Color Computer Songbook, 40 tavonte pop. classical, folk & seasonal 
songs arranged for TRS-80 Color Computer, ready-to-run music pro- 
grams. 96 pages. S7.95 
My Buttons Are Blue and Other Love Poems from the Digital Heart of an 
Electronic Computer, for poetry lovers, computer lovers, a hi-tech 
classic, 66 heartwarming poems written by a TRS-80 Color Computer. 96 
pages. $4.95 



PRACTICAL 

PROGRAMS 



FOR 
THE 



CASIO 



50 



Programs 
In BASIC 



ForTheHome, 



ini pock ' t 

| \f | Computer 

Programming 
Tips & Tricks 



POCKET 
COMPUTER 

PROGRAMMING 

MADE EASY 



■ ihi-i 



.no 'II 



1HSB0 PC-2 jnO PCI 

Slurp PCI5O0 and PC-171 1 

i ' Casio •< I02P 

and gllur 

pockel compute's 

/ \ 

/ ^ - 

INCLUDES NFW rP.S-80 PC-2/SMaBP PC-1500 



CA MORE 
w W Programs 
In BASIC for the 



Murder :"' 
In The 
Mansion 

And Other Computer Adventures 
In Pocket- BASIC For The TRS-HO 



II ! 









APPLE Computer 

101 APPLE Computer Programming Tips & Tricks, secrets, hints, short- 
cuts, techniques, insights, for APPLE II, 128 pages. S8.95 
33 New APPLE Computer Programs for Home, School & Office, practical 
ready-to-run software for APPLE II. 96 pages. $8.95 



My Buttons 
Are Blue 



55 MORE 



Color Compute 
For Home, Schc 



' Programs 
il&Office 



EC Color 

«j3 Computer 
Programs For The 
Home, School & Office 



S7.95 

The 
Color Computer 
Songbook 



Color 
Computer 
Graphics 




^^^^| Color 
|\# I Computer 

Programming 
Tips & Tricks 

«0)B£r 

tw Ran Cl,ir 



Pocket Computer 

101 Pocket Computer Programming Tips & Tricks, secrets, hints, short- 
cuts, techniques from a master programmer, for TRS-80 PC-2. PC-1, 
Sharp PC-1500, PC-1211 pocket computers. 128 pages. S7.95 

Pocket Computer Programming Made Easy, new fast easy read-and-learn 
way to make TRS-80 PC-2, PC-1. Sharp PC-1500. PC-1211. Casio FX- 
702P pocket computers work for you. Learn BASIC quickly; 
128 pages. S8.95 

50 Programs in BASIC for Home, School & Office, useful ready-to-run 
software for TRS-80 PC-2. PC-1. Sharp PC-1500. PC-1211 pocket com- 
puters, 96 pages. $9.95 
50 MORE Programs in BASIC for Home, School & Office, book of tested 
type-in-and-run software for TRS-80 PC-2. PC-1, Sharp PC-1500. 
PC-121 1 pocket computers, 96 pages. $9.95 
Murder In The Mansion and Other Computer Adventures, murder 
mystery, space adventure. 24 games for TRS-80 PC-2. PC-1. Sharp 
PC-1500, PC-1211 pocket computers, 96 pages. $6.95 
35 Practical Programs for the Casio Pocket Computer, useful type-in-and- 
run software for the FX-702P, 96 pages. $8.95 

Order direct from this ad. Send check, money order, or 
MasterCard or VISA account number and expiration date, 
include $1 shipping for each item ordered up to a 
maximum of $3. Or write for our free catalog. Mail to: 



Program Worksheets ARCsoft Publishers 



Handy printed forms make writing BASIC software easy and fun. 
Customized for your own computer system, or use the universal form 
good for any BASIC computer. 40-sheet tablets: 

Color Computer Coding Form $2.95 

Pocket Computer Coding Form $2.95 

APPLE Computer Coding Form $2.95 

IBM Personal Computer Form $2.95 

Universal Coding Form $2.95 



Post Office Box 132W 
Woodsboro, Maryland 21798 - 6 

(301) 663-4444 



Customers oulside North America wanting airmail send $4 postage per book Foreign customers 
pay in U.S. dollars Maryland residents add 5% sales tax Sorry, no COD rftS-80 is a trademark 
ol Tandy Corp /Radio Shack APPLE is a trademark ol APPLE Computer Inc 



^See List ol Advertisers on page 386 
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INTRODUCING 




NOW YOU CAN USE YOUR PRINTER 
WITHOUT WASTING COMPUTER TIME. 



Your computer is capable of 
sending data at thousands of 
characters per second. But the 
average printer goes no faster 
than 80 characters per second. 

This means your computer is 
forced to wait for the printer to 
finish one line before it can 
send the next. 

A waste of valuable time. 

THE NEW MICROBUFFER M 
INCREASES YOUR EFFICIENCY. 

Microbuffer allows you to print 
and process simultaneously. 
No waiting! 

MICROBUFFER 
ACCEPTS PRINTING DATA 

AS FAST AS YOUR 
COMPUTER CAN SEND IT. 

Microbuffer first stores the data 
in its own memory buffer and 
then takes control of your printer. 
This frees the computer for more 
productive functions. 

Additional output may be 
dumped to the buffer at any time 
and it will be printed in turn. 

Microbuffer — a must for any 
program that requires printed 
output. 



PARALLEL, SERIAL OR APPLE II. 




MICROBUFFER MODEL MBP-16K""' 
is a Centronics-compatible 
parallel interface for your Epson 
printer with 16,384 bytes of on- 
board RAM for data buffering. 




MODEL MBS-8K rv is a full-featured 
RS-232C serial interface for your 
Epson printer with both hard- 
ware and software (x-on/x-off) 
handshaking, baud rates from 
300 to 19,200 and a 8,192-byte 
RAM buffer. 



MICROBUFFER ir(pictured on the 
left-hand page) is a Centronics- 
compatible parallel interface for 
the Apple II computer with up to 
32K of on-board RAM for data 
buffering as well as on-board 
firmware for text formatting and 
advanced graphics dump 
routines. 

SIMPLE TO INSTALL. 

Microbuffer MBP-16K and 
MBS-8K mount easily in the 
existing auxiliary slot directly 
inside the Epson printer. 

Microbuffer II, being slot- 
independent, will fit into any slot 
directly inside the Apple 
except zero. 

MICROBUFFER FROM 
PRACTICAL PERIPHERALS. 

When you think of how much 
time Microbuffer will save, can 
you afford not to have one? 

PRACTICAL PERIPHERALS, INC. 
31245 LA BAYA DRIVE 
WESTLAKE VILLAGE. CA 91362 
(213) 991-8200 
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UTILITY 



Screen echo for your typed communications. 



Half Duplexer 



Richard C. McGarvey 
221 Hirschfield Drive 
Williamsville, NY 14221 



When you buy a Modem and an RS- 
232C for your TRS-80 you undoubt- 
edly plan on talking to other computers. 
You will get a machine language terminal 
program with the RS-232C to help you talk to 
other computers. When you power up you do 
not see what you type on your screen! 

Networks normally echo transmissions 
back so you can see what you type. But if 
you want to talk to another TRS-80 directly, 
you will not know what you are typing. 

The RS-232C manual suggests shorting 
pins 1 and 2 to get a CRT echo. Another sug- 
gestion is to go half duplex— a lot of work 
for a simple result. The new Modem I does 
not even have half duplex. If you short the 
pins you could disturb compatibility with 
CompuServe, The Source or any other net- 
work. Why bother with all that when a sim- 
ple software fix produces a CRT echo? 

My friend, John Storfer, and I went to 
work on the problem of RS-232C communi- 
cation. After looking at the RS-232C manual 
John's first reaction was, "This should be 
easy in Basic!" John wrote a short Basic 
program, transmitted it to me and together 
we debugged it. It worked! 

We wanted to write a game like Battle- 
ship to be played between operators on dif- 
ferent computers at remote locations. The 



success of our routine was an essential 
step toward that goal. 

How It Works 

The program checks for parity, sets baud 
rate at 300 (note line 90 in Program Listing 1) 
and sets the number of stop bits and all the 
rest. It is written for two TRS-80's with their 
RS-232C's set identically. If you want to 
make changes in baud, word length or other 
parameters refer to the RS-232C manual. 
Beware of manual errors. 

There are two clear screen options. To 
clear both screens, move the cursor to the 
top right corner of the screen and hit Clear. 
To clear only your CRT, just hit Clear. As 
long as the cursor is not in the home posi- 
tion it will clear only your screen. 

Using the Basic Terminal 

Enter the program, save and run it. The 
screen will clear and a message will print at 
the top of the screen. Call the other computer 
operator. Decide who will answer and who 
will originate. The other computer must have 
this program, or one like it, running. 

Set the Modems to Answer and Originate. 
Replace the phone as required by your 
Modem. Hit any key to start. The cursor will 
appear in the upper right corner of the 
cleared screen. Whatever you type on your 
screen will appear on the other and vice 
versa. 

You have full cursor control. To move the 
cursor without erasing text, hold the shift key 



Program Listing 1 



10 CLS:PRINT"PUT PHONE IN MODEM (OR HANG UP AS REQUIRED) AND 

SELECT 'ANSWER' OR 'ORIGINATE' - HIT ANY KEY TO START. 

** NOTE ** HIT <CLEAR> TO CLEAR IYOUR! CRT. 

20 I$=INKEY$:IFI$=""GOTO20 

30 PRINTCHR$(14) : ' TURN ON CURSOR 

40 0UT(232),A:' MASTER RESET - VALUE OF A UNIMPORTANT 

50 A=INP(233):' GET SWITCH POSITIONS 

60 B=A AND 248:' STRIP BAUD RATE BIT 

70 A=B OR 5:' SET BREAK , RESET REQUEST TO SEND AND TERMINAL 

READY 

Program continues 



while you use the arrow keys. The space bar 
alone will erase a character. The unshifted 
arrows erase lines. The right arrow has no ef- 
fect at all without holding the shift key. 

There appear to be incompatibilities be- 
tween different TRS-80's. I have full cursor 
control while John has only partial cursor 
control. On the other hand, John can use 
hexadecimal numbers in his OUT, INP and 
AND statements while I have to use dec- 
imals in those areas. 

The program was written using Radio 
Shack Modem I's and Radio Shack RS- 
232C's. The program might not work on a 
home brew or hybrid system. If you use this 
program with a network that echos your 
transmissions, you will get double char- 
acters and a displayed password. This echo 
can be eliminated by deleting line 250 in 
Listing 1. The program is designed for 
TRS-80 to TRS-80 over direct phone line. 

The Programs 

Refer to your RS-232C manual for further 
information. The RS-232C manual uses hex 
values and the listing uses decimal values; 
make a conversion table for easy reference. 
The back of your Level II guide will help. 

Listing 1 is almost all remarks. Program 
Listing 2 is the actual program compacted 
to operating size. Short and sweet. ■ 



Richard McGarvey, a veteran police officer, 
started computing when the first TRS-80 hit 
the market. 



The Key Box 

Basic Level II or Disk Basic 

Model I 

16K RAM 

Radio Shack Modem I 

RS-232C 
Expansion Interface 
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Program continued 



80 OUT(234),A:' LOAD CONTROL REGISTER WITH ITEMS LINE 50 

90 A=85:* SET BAUD RATE 

100 OUT(233),A:' SET BAUD OF 300 TO RS-232C 

110 P=INP(232) AND 32:' WAIT FOR MODEM TONE 

120 IFPO0THENGOTO110ELSECLS: * IF NO TONE TRY AGAIN/ IF TONE 

CLEAR SCREEN 

130 A=INP(234):' GET DATA RECIEVED BIT 

140 B=A AND 128:' STRIP ALL BUT 7TH BIT 

150 IF B=0 THEN 180:' IF NO INCOMMING DATA CHECK FOR OUTGOING 

160 C=INP(235) AND 127:' GETS INCOMMING DATA STRIPS ONLY 7TH BIT 

170 PRINTCHR$(C) ; : ' PUT INCOMMING DATA ON SCREEN 
180 H$=INKEY$: 'SCAN KEYBOARD 
190 IF H$=""THEN130 

200 IF ASC(H$)=31 THEN PRINTCHR$ ( 28) ; CHR$ (31) 
210 A=INP ( 234) : 'LOAD A WITH STATUS REGISTER 
220 B=A AND 64:' STRIP ALL BUT 6TH BIT 

230 IFB=0THEN210: ' CHECK AGAIN TO SEE IF READY TO TRANSMIT 
240 OUT(235) ,ASC(H$) : 'IF LAST DATA TRANSMITTED THEN TRANS- 
MIT NEXT DATA 

250 PRI NTH $;: 'ECHO TO CRT - THIS LINE CAN BE DELETED IF YOU USE 
A TIMESHARING SYSTEM THAT ECHOS YOUR INPUT. 
260 GOTO130:END 



10 CLS:PRINT"PUT PHONE IN MODEM (OR HANG UP AS REQUIRED) AND HIT ANY KEY TO START." 

20 IS = INKEYS:IFI$ = ""THEN20ELSEPRINTCHR$(14):OUT(232),A:A = INP(233):B = AAND248:A = BOR5:OUT 

(234),AA:A = 85:OUT(233).A 

30 P=INP(232)AND32:IFP< >0THEN30ELSECLS 

40 A = INP(234):B = AAND128:IFB = 0THEN50ELSEC = INP(235)AND127:PRINTCHR$(C); 

50 H$ = INKEY$:IFH$ = ""THEN40ELSEIFASC(H$) = 31THENPRINTCHR$(28);CHR$(31) 

60 A = INP(234):B = AAND64.IFB = 0THEN60ELSEOUT(235),ASC(HS):PRINTH$;:GOTO40 

Program Listing 2 




First in 

Its Class 

and 

Looking 

for 

Work. 



TRS-80 Model I, II, III 

Five multiple regression procedures 
(including stepwise, backward elimination, all 
subset, and ridge), 24 transformations, com- 
prehensive data base manager (with search 
and sort), descriptive statistics, hypothesis 
testing (7 tests), time series analysis (7 
models), random variate generation, discrete 
probability distributions, sampling distribu- 
tions, nonparametrics (5 tests), and com- 
plete documentation. 

Complete package with manual — $125 

To order, send payment plus $2.00 shipping 
and handling to: 

Quant Systems 

P.O. Box 628 

Charleston, S.C. 29402 

803-571-2825 

S.C. residents add 4% sales tax 
Overseas orders add $7 for shipping 
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FAVORITES 



ALL GAMES 

SOUND. 

SUIT TRS-80 MODEL 

ALL GAMES 2 

ALL GAMES 

PLACEMENT ON DISK. 




CODE FOR FAST REAL TIME GRAPHICS WITH 



-80. 

10 SCORES. 
HIGHER WITH NO LOADER TO FACILITATE EASY 



GHOST HUNTER. 

Gobble up the dots before a ghost gobbles you. Eat a power pill and it is 
your turn to chase the ghosts. 



INSECT FRENZY. 

Fight off an attack from the savage centipede but keep an eye out for the 
giant spider, it can appear anytime. 





Get your frog across the busy highway without being flattened. Then cross 
the river by means of jumping on logs and diving turtles. 



ALL GAMES $16.95 each. 

CHECKS AND MONEY ORDERS PA YABLE TO: DUBOIS 

POST TO: 495 ELLIS, SUITE 356 
DEALER ENQUIRIES WELCOME (415) 441-3080 „ 2m 



SAN FRANCISCO, CA 94102-1996 



sSee List ol Advertisers on page 386 
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PERSONALITY 



Build a better bulletin board and the world will beat a path to your door. 



Bob Rosen 
A Colorfu 




by Kerry Leichtman 
80 Micro Staff 



When forming an opinion of the Color 
Computer's success, it would be best 
to consider the story of Bob Rosen. Bob's 
claim to Color Computer fame is his bulletin 
board— Connection-80 of Woodhaven, NY. 
It is the only bulletin board exclusively serv- 
ing the Color Computer. 

It didn't start out that way. Bob began his 
bulletin board in March of 1981 on a Model I 
providing information on TRS-80 Models I 
and III. Then he bought a Color Computer. 
Bob's fascination with the Color Computer 
is similar to that of many other computer- 
ists. He was amazed by its power, ease and 
versatility. 

"I was kind of surprised there was no sup- 
port from Radio Shack— very little, like the 
Pocket Computer," Bob told 80 Micro. "I 
started putting things on about the Color 
Computer and all of a sudden I was getting 
a lot of out-of-state calls. 

"It just mushroomed; it's amazing. I can 
be here any time of the day and get a call 
from just about anywhere. I've gotten calls 
from England, Israel, Alaska, Puerto Rico, 
Canada, Mexico, Switzerland and all over 
the United States. 

Bob was a Radio Shack employee for 
seven and a half years. He enjoyed working 
for Radio Shack and, apparently, Radio 
Shack liked employing Bob. For four 
straight years, as a retail salesman, he was 
their area's number one man behind the 
counter in total sales. Is running a bul- 
letin board a profitable business? To leave 
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behind the salary a number one salesman 
earns should lead to some positive conclu- 
sions. 

To be a good salesman you have to be- 
lieve in what you are selling. Bob was one of 
the first, if not the very first, New Yorker to 
buy a Model I TRS-80. His sales receipt is 
dated August 5, 1977. At the time he was at- 
tending New York City Community College 
as an electrical technology major. 

"I was always fascinated by computers. 
One thing led to another. I met a gentleman 
by the name of Tom Vande-Stouwe of B.T. 
Enterprises at a computer user's group. 
He started what I believe was the first bul- 
letin board service in the New York City 
area. He told me all you need is a Model I, 
two disk drives, an auto-answer modem 
and a software package. So I bought the 
package and set up my Model I. At the 
time it was mainly a hobby." 

The package is called Message 80, writ- 
ten by Richard Taylor of Programs Unlim- 
ited with enhancements by Vande- 
Stouwe. It consists of a 1K machine-lan- 
guage driver program and a 15K Basic pro- 
gram. The bare-bones system requires a 
32K micro and two disk drives. 

But let's back up a little more, to where 
Bob Rosen and the wonderful world of 
electronics collide. "It's all because of 
Roger Maris and Mickey Mantle," Bob 
confessed. (For the younger hobbyists: 
Maris and Mantle were not Radio Shack 
salesmen. They were the driving forces 
behind an almost unstoppable New York 
Yankee baseball team in the 1960s.) 

"I was a sports fan. I was always a 
Yankee fan. I got intrigued by listening to 
the AM radio at night trying to pick up 
Yankee games when they were on the road. 
I got interested in that and started reading 
articles about short-wave listening. I got in- 



to short-wave DXing, I got my amateur radio 
license (K82HKO), and that got me into elec- 
tronics." 

Connection-80 has been in existence 
slightly more than one year. Some of its fea- 
tures are electronic mail, bulletins, down- 
loading, a products section, a merchandise 
section, user log and chatting with the 
system operator— Bob Rosen. "If I'm 
around a caller can chat with me on line. Ac- 
cessing the chat feature sends the control 
G to my MX-80 which sounds a little bell to 
get my attention." 

Connection-80's hardware consists of 
three 80-track, double-headed drives and 
one 40-track, double-headed drive, a 48K 
Model III, an auto-answer modem and an 
MX-80 printer. 

The bulletin board is accessed more for 
electronic mail than anything else. "What 
happens is a lot of people put on fixes, hints 
and general information that they have 
found out for themselves about the Color 
Computer that you can't get anywhere else. 
People go on the board asking for a solu- 
tion to a problem, or something about a 
software bug. 




Bob Rosen— one of the first TRS-80 pur- 
chasers with the Connection-80 hardware. 



"What we have here is a central point 
now where people can call in and reason- 
ably get an answer, instead of calling Radio 
Shack's 800 number in Texas and getting, 
'We don't know.'" 

For users accessing Connection-80 for 
help, there is one aspect to Bob's service 
that might remind them of Radio Shack— a 
busy signal. At present Connection-80 can 
only handle one caller at a time. "If I get 40 
callers a day, I might have had 200 attempts 
to get on." Corrective measures are in the 
works. "I have plans to go multi-user in the 
near future. Maybe I'll purchase a Model 16. 

"I'm also looking at getting a 10-mega- 
byte hard-disk system with DOSPLUS from 
MTI. The only reason I didn't have one be- 
fore is that there wasn't any software for 
the Model III. Now there is." 

Even with his one-caller-at-a-time limita- 
tion, Connection-80 is enjoying financial 
success and gaining itself a reputation as a 



"When Bob Rosen dreams he sees 

a multi-user bulletin board with a 

toll-free 800 number, no errors and 

no disk or memory crashes." 



Color Computer resource. "Color Computer 
gurus, such as Alfredo Santos, Cal Rasmus- 
sen, Syd Hahn, Wayne Day and Jorge Mir 
started calling Connection-80 with all kinds 
of Color Computer secrets not yet released 
by Radio Shack. For example, to speed up 
the CPU, all you have to type is a POKE 
65495,0. Or to get 6K more memory, POKE 
25,6:POKE 27,6:POKE 29,6:POKE 31,6." 

To access Bob Rosen and Connection-80 
users need a TRS-80, a full-duplex, 300-baud 
modem and the phone number: (212) 
441-3755. There is no charge, other than 
what Ma Bell requires. To download from 
the system users need a ROM pack called 
ColorCom/E for $49.95, available either 
from Bob or Eigen Systems. 

"If someone calls me from my same area, 
with the same message rate, they could be 
on 10 hours and it would only cost them 
eight cents. That's it." 

Bob, through his company Spectrum Pro- 



jects, runs the bulletin board full time. He 
makes his living by mail order selling many 
of the products listed on the board's mer- 
chandising section and by selling advertis- 
ing. Bob gets calls on a daily basis from 
businesses requesting space on Connec- 
tion-80. With all this instantaneous success 
attributable to the Color Computer's popu- 
larity, Bob finds Radio Shack's slow-to-sup- 
port attitude puzzling. 

"It's still amazing to me that after all this 
Radio Shack still does not do anything. 
They say it's in the works. I can believe 
some of that, but I can remember waiting 
eight months to get Level II chips when I 
first got my Model I." 

Connection-80's future looks bright. 
When Bob Rosen dreams he sees a multi- 
user bulletin board with a toll-free 800 
number, no errors and no disk or memory 
crashes. And everyone who calls up will be 
able to access it.B 



COLOR SCARFMAIM FORTRESS 



New 4K Color Scarfman 
Tape '. 



$19.50 



$19.95 



Master Control 

For Color Computer only 

Alien Defense II 

Newest version of the best arcade game ever written tor the - 
80 by Larry Asmun ot Sottsector has talking routines. Harder 
then original version. 

* NEW LOWER PRICE * 
Tape $14.95 Disk $18.95 



New! 

Baja 




Take your dune buggy and enter it in the 
famous Baja Desert race. The race has straight- 
aways, curves, S's, and obstacles. We feel that 

this is the best car race game made for the TRS- 
80. 

The game has 10 different action packed skill 
levels. The program is all machine language for 
last graphicsand excellenl sound 1 to 6 players. 

TRS-80 Model I or III 

1 6K Tape : . $1 5.95 Disk $1 8.95 



rtie N 'west game by Larry Hsmur ajthoi ol Alier Defence 
Fast paced graphics, sound etc. 

$14.95 Disk . 



Tape 



$18 9 r ' 



TOP TEN GAMES 

1. ALIEN DEFENSE iSoftsector Marketing! 14.95/19.95 

2. 0EFENSE COMMAND (Big five) 14.95/19.95 

3. ROBOT ATTACK! Big Five! 14.95/19.95 

4. SCARFMAN (Comsoft) 14.95/19.95 
5 0UNGE0N ESCAPE (Computer Shack) 19.95/19.95 

6. ATTACK FORCE (Big Five) 14.95/19.95 

7. ELIMINATOR (All N/A 

8. COSMIC FIGHTER! Big Fvel 14.95/19.95 

9. GALAXY INVASION (Big ^ivei 14.95/19.95 

10. LASER ATTACK (Med. Systems) 14.95/19.95 

We have a panel of expert game players who will give a 
monthly rating of the best games on the market. It will change 
monthly, so keep looking each month. Games with a price 
after them are carried by us and can be ordered. Games ' 
without prices are riot stocked by Computer Shack. 

Utner games that we carry that are not -n the top ten 

SPACE CASTLE ;C.;.r"sofl.i 15.95/19.95 

SUPER VADERS (Soft Sector) 15 95/19 95 

FORTRESS (Soft Sector) S15 95/19 95 

FORBIDDEN CITY (Fantastic) 39 00 disk 

VOYAGE OF VALKYRIE 34.95/39 95 

80 SPACE RAIDERS S24 95 tape onlv 

W Discount il you order 2 games- ! 5% it you order 3 or more' 



Modem Games 

Play CHESS, CHECKERS, and OTHELLO over your 
modem with your friends! Each game features full 

graphics, sound, and a chat mode permitting you to 
send messages and sounds. 

2 Tapes or 2 Disks S29.95 

WARZONE 

A new game that pits you against the computer Trying to isolate 
the computer before he stops your conquest. Exciting sound 
routines and great graphics. This is a fast paced game that is 
excellent for young and old It has three skill levels 

Tape SI 4.95 Disk $18.95 



New! 



Greymoon is the medieval land in which this 
simulation of conquest and economic develop- 
ment takes place. 

Even has sound routines. It will keep you interes 
ted for hours on end. Each game is different. The 
game is very fast but you can play at your own 
speed. All ages will like it and it takes no special 
skills but a sharp mind. This is better then an 
adventure game in the fact that each game is 
different and is more realistic. 

TRS-80 Model I or III 

1 6K Tape $1 5.95 Disk 1 8.95 



COMPUTER SHACK 

1691 Eason • Pontiac. Michigan 48054 (313)673-2224 



^See List ol Advertisers on page 386 



ORDERING INSTRUCTIONS: ^ 109 

MC and VISA OK please add $2.00 for Shipping in USA Also to 
help us send you the best possible version include the type of 
computer you have, your operating system if disk and if you have 
a doubler in the model I. ' 
DEALERS ... Wo are distributors for all items in this ad except 

for the games Scarfman, Laser Defense. Fortress, and Alien 
Defense. Write for our catalog and price list. 
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SERIES 



Flesh out this skeleton to match your needs. 




Yourself Data Base 



Karl Townsend 

103 Knollwood Drive 

Lansdale, PA 19446 



The abundance of data base programs 
available demonstrates the demand for 
this type of program. Most are specialized 
and, due to their complexity, are not easily 
adapted to individual needs. 

Preliminary Thoughts 

A program built of modules controlled by 
a menu is the easiest to understand and 
modify. Following this direction I will de- 
velop a data base program section by sec- 
tion, and explain the operation of each. It 
will be a skeleton which you can flesh out to 
fit your own needs. 

Two key elements in the program's con- 
struction are the menu and the chaining in- 
sertion sort. Since I want to add, edit or 
delete records at will, the file should not be 
completely re-sorted after each operation. 
Chained file sequencing fills the bill. The 
menu is necessary to structure the program 
logically and to enable program changes 
and enhancements. 

In its initial form, the program holds up to 
50 records of one to five fields. You can 
change these limits to suit yourself and the 
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size of your computer's memory. Memory is 
critical as the file is retained in memory for 
all operations. 

The program will contain two print for- 
mats. The first will print the records as con- 
tained in the file without alteration or se- 
quencing. This is a work print. The second 
print format is sorted, permitting you to run 
the listing in sequence by any selected 
field. This would be your normal output 
print. The resultant file is set up so you can 
use it for input to other programs for further 
data manipulation. 

For this or any other program, you must 
specify what the output is to be. In this case 
I have defined it to be a small data base 
which I can list in sequence by any field 



Add— Add new records to the file 

File P— Print the raw tile without modification 

Print— Print the file in sequenced format 

Edit— Provide corrections to individual records 

Delete— Delete selected records 

Purge— Remove unwanted records from the file 

Select — Select groups of records for printing 

Save-T— Save file to cassette tape 

Load-T— Load file from cassette tape 

Look — Scan records on the screen 

Save-D — Save file to disk 

Load-D — Load file from disk 

New— Start new file 

Restore— Restore file after a Select function 

Stop— End the program 

Table 1 



within the file record. It should also be able 
to serve as an input file for additional pro- 
grams. After you have made these deci- 
sions you can develop the functions re- 
quired for support. 

Menu 

To assist in the structure and to help in 
future program enhancements or mainte- 
nance, a menu will reference each function. 
Program Listing 1 shows the menu and the 
functions. Table 1 lists the definitions of 
these menu functions. 

I have made no attempt in these listings 
to save memory by compressing spaces or 
combining lines. Such programs are diffi- 
cult to analyze; one of the major objectives 
here is to demonstrate methods, so I have 
left the program in open format. The initial 
program (in this article) is about 2500 bytes 
long. It will approximately double in size 
before I finish. You may compress the 
spaces as you enter the various listings and 
save about 300 bytes. If you want to com- 
bine statements onto a single line, watch 
GOTO and If statements so you do not 
change the program's logic. 

Enter Listing 1 and then we can start add- 
ing the individual subroutines that do the 
work. Notice that the menu-referenced sub- 
routines begin each thousand lines. (It is 
better to have too much room than not 
enough!) Note also that each of the refer- 
enced lines now contains Print "Not yet im- 
plemented" and a Return. This avoids 

Reader Service lor lacing Page ^20-' 
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by Roger Schrag 

SKY WARRIOR! Nerves of steel and 
supreme concentration are your only 
defenses against an alien strike force pois- 
ed for the kill! As you pilot your spacecraft 
over a bizarre alien planetscape, ground-to- 
air missiles scream skyward without warn- 
ing. It's up to you to destroy or be 
destroyed! And adding to your problems, 
your spacecraft has an ever-diminishing 
fuel supply (which can be replenished in 
flight if you're lucky) — if you're not careful, 
you and your ship will spiral down into a 
fatal, fiery crash! 

SKY WARRIOR! Great fun for one 
player or double the action with a friend. 
Features include sound, high score tallies, 
and a realistic scrolling landscape! 



Super 

Arcade 

Action 




© 1981 



TRS-80 TAPE Model 1 & 3 16K 
010-0136 $14.95 

TRS-80 DISK Model 1 & 3 32K 
012-0136 $20.95 



dventur€ 

INTERNATIONAL 

A DIVISION OF SCOTT ADAMS, INC. 



BOX 3435, LONGWOOD FL 32750 

(305) 862-6917 (QUESTIONS) 

ORDER FROM YOUR FAVORITE DEALER 

or CALL TOLL FREE (800) 327-7172 

(ORDERS ONLY PLEASE) 

SHIPPING & HANDLING ARE EXTRA 

PRICES SUBJECT TO CHANGE WITHOUT NOTICE 



by Bob Shilling 
* War via the RS-232 • 
16K TRS-80's play against other TRS-80's or 
24K Atari 400/800's! 
Byte Magazine, December 1981: 
"The imaginary world of Commbat is in- 
teresting and intricate, and It really does 
test one's strategy, tactics, and reflexes 
. . . Commbat is a great success." 

Commbat is a strategic and tactical 
battle game that allows you to pit your skill 
and dexterity against that of another player 
in a real-time graphic battle to the death! 

You play against your opponent by 
direct connection to another computer (up 
to 300 feet away), by modem communica- 
tion, or through The Source < m . Each player 
has equal resources. Available weapons in- 
clude rockets, lasers, shells, mines, decoys, 
Drone Reconnaissance Aircraft, and one 
nuclear ICBM. You decide which weapons 
to carry, load them onto a maximum of 
eight remote-controlled tanks, and then 
maneuver your tanks to discover and 
destroy your enemy's base before he 
destroys yours. 

RS-232 port and either full-duplex 
modem or direct connection modem 
eliminator cable required. Works with CON- 
NECTION «m or LYNX tm modems. 
TRS-80 16K TAPE, Model 1 & 3 

010-0123 $19.95 
TRS-80 32K DISK, Model 1 & 3 

012-0123 $20.95 

ATARI 24K TAPE 

051-0123 $19.95 

ATARI 24K DISK (Requires DOS 2.0S) 

052-0123 $24.95 



Includes a coupon allowing you to 
purchase a copy for a friend for only 

$10.00 



by Wayne Westmoreland & 
Terry Gilman 
See the FANTASTIC Review in BYTE-June 
'82! 

Armored Patrol is a realistic arcade 
battle simulation that puts you into the 
driver's seat of a massive T-36 tank that's 
bristling with firepower. Your orders are to 
discover and destroy the enemy tanks and 
robots in your sector before they locate 
your tank and blow it up. 

Your perspective is from the inside of 
your tank, looking out across a bleak land- 
scape. Somewhere out among the deserted 
blockhouses, enemy tanks and robots are 
on the prowl. You may find the enemy either 
by a visual scan of the area or by making 
use of the radar tracking device displayed 
at the bottom of the screen. 

Armored Patrol is one of the most in- 
credible graphic simulations ever sold for 
the TRS-80! 
TRS-80 16K TAPE, Model 1 & 3 

010-0140 $19.95 
TRS-80 32K DISK, model 1 & 3 
012-0140 

ACTUAL TRS-80 SCREEN 



$24.95 




WRITE FOR OUR FREE 150-PROGRAM CATALOG 



"This avoids crashing the program by 
selecting a subroutine not yet written." 



10 'DBI/L01 






500 PRINT "MENU" 






510 PRINT "ADD -<1> 


PURGE -<6> 


SAVE-D 


<11>" 






520 PRINT "FILE P -<2> 


SELECT -<7> 


LOAD-D 


<12>" 






530 PRINT "PRINT -<3> 


SAVE-T -<8> 


{'•JEW 


<13>" 






540 PRINT "EDIT -<4> 


LOAD-T -<9> 


RESTORE 


<14>" 






550 PRINT "DELETE -<5> 


LOOK -<10> 


STOP 


<15>" 






560 INPUT ME 






570 ON ME GOSUB 1000, 2000, 


3000, 4000, 5000, 6000, 


7000, 8000,9 


000, 10000, 11000, 12000, 13000, 14000 




580 IF ME = 15 THEN GOTO 20000 ELSE GOTO 500 




1000 PRINT"NOT IMPLEMENTED": 


RETURN 




2000 PRINT"NOT IMPLEMENTED": 


RETURN 




3000 PRINT"NOT IMPLEMENTED": 


RETURN 




4000 PRINT"NOT IMPLEMENTED": 


RETURN 




5000 PRINT"NOT IMPLEMENTED": 


RETURN 




6000 PRINT"NOT IMPLEMENTED": 


RETURN 




7000 PRINT"NOT IMPLEMENTED": 


RETURN 




8000 PRINT"NOT IMPLEMENTED": 


RETURN 




9000 PRINT"NOT IMPLEMENTED": 


RETURN 




10000 PRINT"NOT IMPLEMENTED" 


: RETURN 




11000 PRINT"NOT IMPLEMENTED" 


: RETURN 




12000 PRINT"NOT IMPLEMENTED" 


: RETURN 




13000 PRINT"NOT IMPLEMENTED" 


: RETURN 




14000 PRINT"NOT IMPLEMENTED" 


: RETURN 




20000 END 






Program Listing 1 





crashing the program by accidentally 
selecting a subroutine not yet written. As I 
develop each subroutine, these lines will be 
overwritten and the subroutine will operate 
normally. 

Line 20000 provides the program end. On 
menu selection 15, Stop, the program will 
jump to 20000 for an orderly end. 

Housekeeping 

To begin any program, you should in- 
clude certain housekeeping items to ensure 
your program will work as planned. Enter 
the lines shown in Program Listing 2. 

Line 10 is a Remark statement identifying 
the program and the version number. I use 
an identification line within a program 
because there may be as many as a dozen 
different versions of a given program on my 
files at any given time. Using a version num- 
ber allows me to use a common program 
name to show relationship, but still permits 
selection of a specific program. 

To allow string space, we clear 2000 
bytes in line 100. Later you may need to ex- 
pand this figure; watch your memory size as 
you do so. Line 110 defines variables to 
save time entering the program, and to save 



INTERACTIV 

The INTERACTIVE CONTROL LANGUAGE is 
the most powerfull control language ever design- 
ed for the TRS80. It substantially increases ability 
of your computer and adds new features to the 
DOS and software you use. 

If you are tired of answering endless prompts, 
excessive typing or software inefficiencies, if you 
want to automate work with computer, customize 
and- improve your software in an easy way and 
make it work the way YOU want it to work — then 
ICL is a must. 

Imagine someone smart standing by. as you 
work with computer, ready to assist you with ad- 
vice as well as to take over part of your work! This 
is what ICL does — perfect "middleman" which 
stands between user, DOS and application pro- 
grams. 



iC 



ICL at a glance 
ICL monitor 



DOS-like command level for execution of DOS 

commands. /CMD files and /ICL procedures. 

Fast, efficient and convenient in use. 
Basic functions — automation of work with computer, software 

enhancement/customization, interfasing of 

different programs. 
Basic features — intelligent operation, virtual keyboard and 

display I/O. control interception 

commands (&RUN &JUMP &DOS &IF 

&QUEUE &EXIT...) variables, conditionals. 

literals. 

32K and 48K versions, service modules, 

10 ready to use procedures, new 63 page 

manual with lots of examples. 

Same version works with both models and 

all operating systems! 

TRSDOS ■ — NEWDOS/21 ■ — NEWDOS/80 

DOSPLUS-3.4 • 

32K 1 drive TRS80 Model I or Model III 



Language 



Package 



available 
for DOS 

Mm hardware 




XYZT 



ORDER NOW - ONLY $59.00, manual alone $15. 

(S/H — 1.50 N.Y. state residents — 5% sales tax) 

Check, money order, C.O.D. OK!!! 

(Please specify Model l/lll and diskette format) 

— registered trademarks. 
Previous release users — write for upgrades! 

EH DIMENSIONS. INI. 



2 PENN PLAZA, SUITE 1500, NEW YORK, N.Y. 10121 



(212)244-3100 



v* 158 
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How to maximize 
your 




You don't have to settle for 
standard equipment. Let MTI 
and Alpha Byte help you build 
the Model III you want. 




MTI FLOPPY DISK ADD-ON KITS 

Now you can upgrade your 16K level II Model III to 
a full 48K Disk System the easy way with MTI's 
Double Density Disk Controller and your choice of 
Disk Drives. You can choose 40 track. Double- 
Sided 40 track or Double-Sided 80 track Drives to 
supply your disk storage needs. Forty Track 
Drives store 175K, Double-sided 40 Track drives 
store 350K. Four Double-Sided 80 Track Drives 
provide up to 3 MEGABYTES of On-Line storage. 

INTERNAL DISK DRIVE KITS 

The first drive kit includes one Tandon Disk Drive, 
MTI Double Density Controller. Switching power 
supply, 32K of RAM, all mounting hardware, 
cables and Detailed Installation Instructions. The 
second internal drive kit includes a second drive 
and the necessary installation hardware. 

40 TRACK DRIVE SYSTEM 

DRIVE NO. 1 KIT 649.00 

DRIVE NO. 2 KIT 259.00 

40 TRACK DUAL HEAD SYSTEM 

DRIVE NO . 1 729 00 

DRIVE NO 2 369.00 

80 TRACK DUAL HEAD SYSTEM 

ORIVE NO 1 .... 889.00 

DRIVE NO. 2 549.00 



EXTERNAL DRIVE KITS 

Two external drives can be attached to any dual 
drive Model III Computer. 

40 TRACK EXTERNAL DRIVES 

DRIVE NO. 3 359.00 

DRIVE NO. 4 339.00 

DUAL HEAD 40 TRACK EXTERNAL DRIVES 

ORIVE NO. 3 .479.00 

DRIVE NO. 4 459.00 

DUAL HEAD 80 TRACK EXTERNAL DRIVES 
DRIVE NO. 3 .., 659.00 

DRIVE NO. 4 63900 

FIVE MEGABYTE EXTERNAL 

WINCHESTER HARD DRIVE 2795.00 

Add the Ultimate in Fast High Capacity Disk 
Storage to any Model III Floppy Disk system. 
Reliable Winchester technology provides enough 
storage for the largest business files. Winchester 
disk drives have greatly increased data transfer 
rates and that means faster program and file 
loading. This is a complete self contained system 
that connects to a standard Model III Disk System 
in minutes without any modification to the com- 
puter. 



MODEL III DIAGNOSTIC PROGRAM 49.95 

A complete diagnostic program for the Model III. 
Tests RAM and ROM, video display and all disk 
drives. Catch problems while they're small and 
be sure that your Model III is in perfect running 
condition. 




MODEL III CP/M-80 NOW AVAILABLE! .799 00 
CP/M f " & 80. Column Kit. 

Now you can run proven CP/M based software on 
your Model III. with standard 80-column display. 
A simple internal modification will transform your 
Model III into a NEW computer and allow you to 
run CP/M the industry-standard operating system 
and assure you of a large supply of fine software. 
Includes CP/M 2.2. 

MODEL III SPEED-UP MOD 149.00 

Now you can run your Model III at 4 MEGAHERTZ, 
that's almost double the standard speed. This 
simple-to-install kit does require some soldering. 

MODEL III COOLING KIT 44.95 

Heat build up is a major cause of system failures 
and 'flakey' operation. This kit provides excellent 
cooling. 

DOSPLUS OPERATING SYSTEMS 
FOR THE MODEL III 

Solid BUG-FREE operating systems for the Model 
III. Supports different size drives on the same 
system and Basic Program Chaining with 
variables saved in memory. 

40 TRACK . 99.00 

80 TRACK 119.00 

EXPANDED DOSPLUS 3.3.8 149 00 

Read and Write 40 Track Diskettes on an 80 Track System. 
HARD DISK DOSPLUS . . 299 00 

Supports Ihe MTI 5 MEG HARD DISK. 



We guarantee everything for 30 days. If 
anything is wrong, return the item and we'll make 
it right. And, of course, we'll pay the shipping 
charges. 

We accept Visa and Master Card on all orders; 
COD orders, up to $300.00. 

Add $2.00 for standard UPS shipping and 
handling on orders under 50 lbs, delivered in con- 
tinental U.S. Call for shipping charges over 50 
lbs. Foreign, FPO and APO orders add 15% for 
shipping. Californians add 6% sales tax. 

Prices quoted are for stock on hand and are 
subject to change without notice. 

31245 LA BAYA DR, WESTLAKE 
VILLAGE, CAUFORNIA 91362 



IPUTER 
PRODUCTS 

To order, or for information, call: 

(213)706-0333 

To use our 24-hour modem order line, call: (213) 883-8976. 



CP/M is a reg. trademark of Digital Research. 



"Bugs will usually be limited 
to the routine last entered. . . 



memory space and running time. Our main 
data storage array (DA) is a string array; 
defining D as a string saves typing the 
dollar sign each time we reference it. I have 
defined all other variables as integers to 
save memory space and to speed up the 
program. 

The final housekeeping item is dimen- 
sioning the arrays. I have dimensioned the 
main data array (DA) to 50 records of five 
fields each. I have also dimensioned the 
chaining array (KY) to 50 by 5 since it must 
provide a position to correspond with each 
position in the data array. These values are 
flexible. For example, you can set it up as 
100 records of 10 fields each (if you have 
sufficient memory). You may change the 
number of records allowed without disturb- 
ing the program's operation. Be certain 
the KY array dimensions agree with any 
changes you make to the DA array. If you 
change the number of fields, you will have 
to change some of the statements in the re- 
mainder of the program to agree. 

Now run the program. It will do little ex- 
cept print the menu. If you make a selection, 
it will print the "Not yet implemented" com- 
ment and return you to the menu. 

This illustrates one of the valuable fea- 
tures of modular programming — the ability 
to run and debug each routine as you pro- 
gram it. Bugs will usually be limited to the 
routine last entered, and this limits the area 
you must examine. Do not fall into the trap, 
however, of insisting that that bug has to be 
in the routine you are working on. For ex- 
ample, if you inadvertently delete a record, 
the print routine will not print it. Use this 
concept with care and you will find it a great 
assist in debugging. 

New 

Since we are just getting started, the 
most logical subroutine to enter first is 
New. Designed to initiate a new file, we will 
use this as we input test data and check the 
other routines. New has two functions: one 
is to clear the arrays to make certain there 
is no garbage left in them to interfere with 
the new data input; the second allows you 
to name your file and tell the program the 
number of fields per record that will be 
used. New is a very small subroutine now, 
but it will grow as we enhance the program. 

Type in New from Program Listing 3. 

Lines 13010-13060 clear the data array 



10 

100 

110 

120 


DBI/L02 
CLEAR 1000 
DEFSTRD: DEFINT A-C 
DIM DA(50,5) , KY(50 

Program Listing 2 


E-Z 
5) 



(set all positions to null) and set the chain 
array to all zeros. The record counter (RC) is 
set to one in line 13070, as the only record in 
file at this time is the dummy record show- 
ing where the first record will be positioned. 
Lines 13110 and 13120 input the title (Tl$) 
and field count (FC). With this completed, 
line 13130 returns the program to the menu. 

Add 

The record input routine includes multi- 
ple fields. Enter Program Listing 4 and we 
can review the actions taking place. 

Using the new record count (NC) ob- 
tained from the prompt in line 1000, a 
For... Next loop inputs the new records and 
stores them at the end of the data array 
(DA). This input loop prints rather primitive 
prompts (an early enhancement will fix 
that) to give the operator some idea of 
where he is in the input cycle. Lines 



1010-1070 contain this loop. 

Lines 1090-1210 contain the insert sort 
that will chain each field. It is a triple-nest- 
ed loop. The first (I) loop cycles each new 
record against the current sorted file 
records. The second (J) loop cycles the sort 
across the fields so that each is sorted in 
turn. The final (K) loop cycles the new 
record against each of the current records 
until its location in the sort is found. The K 
loop will perform this action for each field in 
the record. 

Enter the statements in lines 1140 and 
1 150 with care because they are the heart of 
the sort; any error here can give real 
problems. 

On completion of the sort, the program 
returns to the menu via the Return in line 
1220. The new records have been sorted 
into the file and are awaiting printing. Enter 
some records to see that there are no er- 
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13000 


PRINT " 


PREPARE FOR NEW FILE" 


13010 


FOR I = 


TO 50 


13020 


FOR J = 


TO 5 


13030 


DA(I,J) 


_ nit 


13040 


KY(I,J) 


= 


13050 


NEXT J 




13060 


NEXT I 




13070 


RC = 1 




13110 


INPUT " 


ENTER FILE TITLE. ";TI$ 


13120 


INPUT " 


HOW MANY FIELDS PER RECORD? 1-5" ;FC 


13130 


RETURN 


Program Listing 3 
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1000 


INPUT"H0W MANY NEW RECORDS TO INPUT?" 


;NC 


1010 


FOR I = RC+1 TO RC+NC 




1020 


PRINT "ENTER RECORD # " ; I 




1030 


FOR J = 1 TO FC 




1040 


PRINT "FIELD # ";J 




1050 


INPUT DA (I, J) 




1060 


NEXT J 




1070 


NEXT I 




1090 


FOR I = RC+1 TO RC+NC 




1100 


FOR J = 1 TO FC 




1110 


GO = 1 




1120 


FM = 1 




1130 


FOR K = 1 TO RC 




1140 


IF DA(I,J) =< DA(GO,J) THEN KY(I,J) = 
KY(FM,J) = I: 
K = RC: 
GOTO 1180 


GO: 


1150 


IF KY(GO f J) = THEN KY(I,J) = 0: 
KY(GO,J) = I: 
K = RC: 
GOTO 1180 




1160 


FM = GO 




1170 


GO = KY(GO f J) 




1180 


NEXT K 




1190 


NEXT J 




1200 


RC = RC + 1 




1210 


NEXT I 




1220 


RETURN 

Program Listing 4 
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You've Cot 

TOTAL A 




( Specializing In TRS80 & IBM) 



Rose 



TO YOUR COMPUTER HARDWARE & SOFTWARE 
NEEDS. CALL ROSE TODAY! 



ive got 

• DISK DRIVES 

TA400 (40-T) $289 

TA800 (80-T) $399 

TA400 Flippy $319 

TA800 Flippy $409 

TA400-2 Dual Head $409 

TA800-2 Dual Head $549 

Complete with silver enclosure & power supply. 
All ta Drives are mpi. 

• CABLES 

2-Drive $23.95 

4-Drive $33.95 

Extender Cable $14.95 

• BARE DRIVES 

TA400B $249 

TA800B $349 

TA400B Flippy $269 

TA800B Flippy $359 

• EPSON PRINTERS 

MX80 $469.00 

MX80 F/T $579.00 

MX100 $769.00 

Parallel Cables $24.95 

MX 70-80 Ribbons $9.95 

• OPERATINC SYSTEMS 

trsdos 2.3 Disk & Manual. . . . $19.95 

LDOS $119.95 

NEWDOS/80 $129.95 

DOSPLUS 3.3,3.3D $89.95 

• IRON 

Disk Drive Power Supply, 

Single $37 

Disk Drive Case (silver)and Base $19 
Memorex Diskettes (bx of 10) . $25 

90 day warranty on DRIVES. Add S5.00 freignt per 
drive incont. U.S. UPS COD charge $1. 50. There is 3lso 
a 15 day FREE tpial on ta drives if not completely 
satisfied ill refund your money (less shipping), ill 

take exception to improper use or mishandling. 

• RADIO SHACK COMPUTERS 

26-1061 Mill, LI, 4K $595 

26-1062 Mill, Lll, 16K $835 

26-1065 Mill, 48K, 1 Drive $1695 

26-1066 Mill, 48K-2 Dr-RS232. . $2099 
26-3001 4K Color Computer. . . $31 5 

26-3002 16K w/ext. Basic $485 

26-3003 32K w/ext. Basic $566 

26-3501 Pocket computer. . . . $185 
26-4002 Mil, 64K, 1-dr $3288 

• PERIPHERALS - Model I, II, III 

26-1140 OK Exp. interface $249 

26-1140 With 16K Mem. Tstd/$299 
26-1140 With 32K Mem. Tstd/$349 

26-1145 Ml RS232 W/cable $85 

26-1148 Mill RS232 w/cable $89 

26-6001 M16,128K,1DR $4399 

26-6002 M16.128K.2DR $5099 

26-1172 D.C. Modem I $135 

26-1173 D.C. MOdem II $199 

26-1206 CTR-80 Recorder $51 

26-3008 cc Joysticks, pr $21 

26-3010 13" Color Video $353 

26-4150 Mil 8.4MB Disk $3820 

26-4151 Mil Hard Disk N0.2. . . $2970 

16K 200nsec Memory Guar lyr. $29 



• OTHER PRINTERS & ACCESSORIES 

26-1158 Daisy Wheel II $1694 

26-1455 Acoustic Cover $339 

26-1447 Tractor Assy $208 

26-1448 sheet Feeder $1111 

26-1165 Line Printer V $1581 

26-1166 Line Printer VI $986 

26-1167 Line Printer VII $339 

26-1168 Line Printer VIII $679 

26-1191 Flat Bed Plotter $1695 

26-1195 Digitizer $379 

ANADEX DP-9500, 9501 $1 295 

starwriter F10 Daisvwheel $1499 
Daisy Wheel Printer, 45cps. . . $1779 

Tractor for above $237 

Sheet Feeder for above $1250 

26-1308 Printer Stand $88 

26-4302 printer stand $1 29 

26-1401 or 4401 Printer Cable. .$32 

HOT PRICES-CALL!! 



ROSE GOES IBM 

ALL NEW DISK DRIVES 

FOR IBM PERSONAL 

COMPUTER 

INTERNAL & EXTERNAL 

ADD-ON DRIVES 

"FLIPPY"* or STD. 40-track 

• A&B INTERNAL DRIVES 

(First & Second) 
Standard $249ea. 

(List 569.99) 

Flippy $269ea 

(Not available from IBM) 

Purchase your IBM PC without 
drives but with the disk drive 
controller/adapter & cable 
and the Disk Operating 
System (DOS) and SAVE A 
BUNCH! 

• C&D External Drives 

(Third & fourth) 

Standard $289ea 

"Flippy" $3l9ea 

complete with matching 
case & power supply 

• 2 External Drive Cable $23.95 

*"Flippy" allows flipping the 
diskette over & 
reading/writing to the back 
side. Cuts diskette cost in 
half. No special diskette 
required. 



The complete line of Radio Shack products is 
available through ta with standard RS limited 
warranty. Call me for price and deliverY. Just 
cause you don't see it don't mean we ain't got it. 

ROSE 



ZEN! 



12" Screen * Green Phospher 
This is the one you have been waiting 
for. Well built. Works great with the 
model i. Also has 40/80 column switch so 
the Apple folks can use it. 90 day warran- 
ty good Nationwide. Sell your old Model I 
monitor and be the first on your block to 
have a "real'green screen. 

12" Zenith Green Phos. Mon $135 

Cable for Model I $7 

Why pay $344.99 for an IBM 
monitor when you can buy this 

One. Requires 21022 color /graphics card. 



• RADIO SHACK SOFTWARE 

I have most all R/s software instock 
and it can be yours at 15% off the 
R/S retail price. Call me for the 
latest availibility. 

Double Density 
Disk Controller 
from Aerocomp 

("DDC") $139.95 

Make your Model l run in double 
density. The "DDC" has the most 
sophisticated data separation cir- 
cuitry available. "DDC" is available 
with DOSPLUS 3.3D for a mere 

179.95. RUN FOR THE PHONEI 




Write or call ROSE TOLL FREE at 
1-800-527-3582. Texas residents call 
214-458-1966. Please use the toll 
free lines for orders and literature 
requests only. Technical help or ser- 
vice use the Texas line. Prices are 
mail order only. You pay by VISA or 
mastercard, you can send check or 
money order (allow a couple of 
weeks for personal checks to clear) 
or order COD (we ship COD'S cash, 
certified check or money order on- 
ly). Rose win take American 
money in just about any form. Add 
freight (UPS where possible) on all 
orders.Texas residents cough up 5% 
sales tax. Allow 2-4 weeks for 
delivery, order today - l need the 
money! 

TOTAL ACCESS, 

P.O. BOX 3002 
RICHARDSON, TX 75080 

214-458-1966 - 



Trademark of PERCOM DATA CO , * 'Trademark of LNW * TRS80 & Radio Shack are trademarks of Tandy Corp. Copyright 1981 TOTAL ACCESS 



sSee List ol Advertisers on page 386 
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"Any change of data in a field 

is likely to change its sequence in the file." 



rors. Without a print routine, however, it is 
difficult to ensure proper operation. 

Print 

The print routine (also somewhat primi- 
tive) is found at line 3000 of Program Listing 
5. When you run the program and select the 
print option you are asked which field the 
listing should follow. On response to this, 
the position count (PC) will direct the print 
routine to select the proper chain listing. 
Once the title is printed in line 3040, the "go 
to" (GO) variable is set to a one; in line 3100 
it looks at the "go to" chain in the dummy 
record to find where the first sorted record 
is located. The PC within the parenthesis 
will select the proper field. 

This routine uses nested loops. The I loop 
will cycle through each of the records from 
two (we do not want to print the dummy 
record) to the end of the file. The J loop 
prints each field in each record before drop- 
ping back to the I loop for the next record. 
After printing the last record, the Return in 



line 3240 sends execution back to the 
menu. 

Each line will contain the following infor- 
mation in order: a sequential line number, 
the position of the record in the storage 
array, and the data fields themselves. Since 
we are using very simple formatting via the 
comma, the print will be rather messy— 
another early enhancement required! 

We have now implemented three subrou- 
tines: New, Add, and Print. Play with the 
program to see how it works. Try entering 
different combinations of data and number 
of fields. Build the file by entering two or 
three records; then go back to enter a few 
more. Remember, if you are going to 
change the file, go back to New to clear 
everything. When you are satisfied that all 
is working properly, move on to saving and 
reloading data using tape. 

Save-T 

The tape save routine as shown in Pro- 
gram Listing 6 is straightforward: Once the 



10 'DBI/L05 

3000 PRINT "WHICH FIELD SHOULD THE PRINT FOLLOW? FIELD 1 

3020 INPUT PC 

3040 LPRINT TI$: LPRINT"" 

3 06 GO = 1 

3 80 FOR I = 2 TO RC 

3100 GO = KY(GO,PC) 

3110 IF DA(GO,0) = "D n THEN GOTO 3220 

3120 LPRINT 1-1, GO, 

3140 FOR J = 1 TO FC 

3160 LPRINT DA(GO,J) , 

3180 NEXT J 

3200 LPRINT 

3220 NEXT I 

3240 RETURN 

Program Listing 5 



- ";FC 
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8000 INPUT "MOUNT TAPE AND SET FOR RECORD - <ENTER>";X$ 




8010 PRINT#-1,TI$,RC,FC 




8020 FOR I = TO RC 




8030 PRINT#-1, KY(I,0), KY(I,1), KY(I,2), KY(I,3), KY(I,4), 


KY(I 


,5), DA(I,0), DA(I,1), DA(I,2), DA(I,3), DA(I,4), DA(I,5) 




8040 NEXT I 




8050 RETURN 




Program Listing 6 
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9000 INPUT "MOUNT TAPE AND SET FOR PLAY 


- <ENTER>";X$ 




9010 INPUT#-1,TI$,RC,FC 






9020 FOR I = TO RC 






9030 INPUT#-1, KY(I,0) , KY(I,1), KY(I,2) 


, KY(I,3) , KY(I,4), 


KY(I 


,5), DA(I,0), DA(I,1), DA(I,2), DA(I,3), 


DA(I,4) , DA{I,5) 




9040 NEXT I 






9050 RETURN 






Program Listing 7 







heading data is saved, the routine cycles 
through the file arrays saving chaining keys 
and data records. Since the chaining infor- 
mation will be saved in the same 
PRINT#-1 statement as the data, limit the 
character count in the data record to a 
maximum of 200. 

Line 8000 supplies a prompt reminding 
the operator to prepare the cassette and 
press Enter to start the save. The first 
record saved (line 8010) consists of the file 
title, the record count and the field count. 
These will be required next time the file is 
read in. 

The For.. .Next loop in lines 8020-8040 
saves the body of the text. Each cycle of the 
loop transfers one data record along with 
its chaining keys to the cassette. Line 8050 
returns the program to the menu when the 
subroutine completes the save. 

Load-T 

The tape load routine in Program Listing 
7 is almost the same as the save routine (ex- 
cept for the INPUT#-1 statement rather than 
the PRINT#-1 statement). Again, a prompt in 
line 9000 tells the operator to prepare the 
cassette unit for input and to press Enter 
when ready. Line 9010 reads into the pro- 
gram the file title, record count and field 
count. The loop in lines 9020-9040 reads in 
the individual records and chaining infor- 
mation. On completion, the program re- 
turns to the menu. The file is resident in 
memory awaiting your application. 

Edit 

One final subroutine completes the basic 
program. Since we are all likely to make 
mistakes on data entry, or find that we must 
modify our data, we will have to make pro- 
vision to edit the data file. 

To do this, a listing of the data file is re- 
quired, showing the record numbers and 
the fields to be edited. The program re- 
quests the record and field number to be 
edited, prints the current file data and waits 
for your corrected input. When editing is 
complete, entering minus one will return the 
program to the menu. 

Editing a chained file poses a particular 
problem: Any change of data in a field is 
likely to change its sequence in the file. To 
accommodate this, it would be necessary 
to remove the record from its current posi- 
tion in the chain, close up the chain to skip 
around the record and find its new location 
in file. This, as you can readily visualize, is a 
rather complex problem and requires some 
fancy programming. We are going to do it 
the easy way for now. 

When you select a record for editing, the 
Edit subroutine copies it and any changes to 
the end of the file where it will be treated as a 
totally new record. When editing is complete, 
these edited records will be sorted into the 
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. keep a copy of the unmodified program 
for addition of the remaining functions." 



file just as any new record would be. In fact, 
the program jumps to the Add sort routine to 
do this. The initial location of the record that 
was edited will remain exactly as it was with 
one exception: A D will be inserted into the 
field zero position of the DA array. Before the 
program is complete, we will find uses for 
these zero positions. 

Looking at the Edit subroutine in Pro- 
gram Listing 8, you will note that the new 
record counter (NC) is set to zero. The new 
counter will keep track of how many records 
are changed and must be sorted into file 
again. 

Line 4020 prompts the operator for the 
record number to be edited. Entry of minus 
one at this point indicates that you are fin- 
ished editing and the program will go to line 
1090 to sort the edited records into file. En- 
try of a record number does three things im- 
mediately. First, the new record counter 
(NC) is incremented by one; second, the 
specified record is copied to the end of the 
file; and third, the current record is marked 
deleted. 

The program then requests the particular 
field to be changed (line 4060). On input of 



the selected field, the program prints the 
current field data contents and awaits key- 
board input of the new entry. This input is 
written to the "new" record at the end of the 
file. The program then returns to the field 
prompt to allow selection of another field 
within the same record. If there are none, 
entry of minus one returns the program to 
the "which record" prompt, where you can 
select another record for editing or enter a 
minus one to complete the editing function. 
This method has a drawback: If you do 
much editing, the file will grow as it is filled 
with deleted records. We will have to pro- 
vide a way to rid the file of these unwanted 
records. This is a function of the Purge sub- 
routine, which we will look at next time. 

Tune in Next Time 

You now have a rudimentary but usable 
data base program. You can enter data, 
save and retrieve it, edit it and provide a list- 
ing. Looking at our original specifications, 
many functions have not yet been imple- 
mented, but for the moment we can work 
around them. 

Until next time try different exercises 



with the program, making your own ten- 
tative modifications to fit your needs. 
However, be certain to keep a copy of the 
unmodified program for addition of the re- 
maining functions. Also keep notes on the 
glitches you may encounter; some of them 
can be frustrating as well as a lot of fun to 
overcome. Consider some humanizing fea- 
tures, making it easier for the operator to 
use the program. ■ 
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4000 


NC = 


4020 


INPUT "EDIT WHICH RECORD?", «RN 


4040 


IF RN = -1 THEN GOTO 1090 


4042 


NC = NC + 1 


4044 


FOR I = 1 TO FC 


4046 


DA{RC+NC,I) = DA(RN,I) 


4048 


NEXT I 


4050 


DA(RN,0) = "D n 


4060 


INPUT "WHICH FIELD?" ; CN 


4080 


IF CN = -1 THEN GOTO 4020 


4100 


PRINT DA(RN f CN) 


4120 


INPUT DA(RC+NC,CN) 


4170 


GOTO 406 




Program Listing 8 




G in the 48 continental states on prepaid 
.00 or more. 

ected on out-of-state shipments. 

MasterCard and American Express, or you 

onal money by paying cash. 



Pan Am 




TOLL FREE ORDER NUMBER 800/531-7466 

1117 Conway • Dept. EMC • Mission, Texas 78572 
Phone 512/581-2766 • Telex Number 767339 

FORT WORTH BRANCH 




2912 N. Main • Ft. Worth, Texas 76106 
Phone 817/625-6333 • Telex Number 794836 



►'See List ot Advertisers 
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GENERAL 



Back to April '80 80 Micro. 



tint That Index 



Carl Everett 

6835 Bridge Lk. Rd. 

Clarkston, Ml 48016 



After purchasing my printer, 
I found I needed a cassette- 
based address file. I found Wil- 
liam Klungle's "Magazine In- 



dex" program (80 Micro, April 
1980) convenient to modify. 

The file holds 175 addresses 
and the printer routine is spaced 
to print equally on 15/16 inch la- 
bels. It creates, corrects, stores, 
lists, and searches just as the 
original program. 

The essential program 
change, other than minor data 
handling routines and titles, is 
the printer routine in lines 700- 



800. (See the Program Listing.) 
This routine allows you to print 
only selected names, selected 
cities, or start with any file num- 
ber you choose. Selecting a file 
number allows you to interrupt 
the printing and start again with- 
out reprinting the complete 
list.B 

Carl Everett is an electrical 
supervisor at Pontiac Motor Di- 



vision. He uses industrial com- 
puter systems at work and a 
family computer at home. 



The Key Box 

Basic Level II 
Model I and III 
16K RAM 
Any printer 



1 REM: ADDRESS FILE PROGRAM - MODIFIED MAGAZINE INDEX PROGRAM 

2 REM: MAGAZINE INDEX PROGRAM BY WILLIAM KLUNGLE 

3 REM: 80 MICROCOMPUTING - APRIL 1980 

4 REM: MODIFIED BY CARL EVERETT, 6835 BRIDGE LK . RD . , CLARKSTON, 
MICHIGAN 48016 

5 CLEAR11000:DIMR$(175) :XS=" " :NS="ADDRESS" 
10 CLS:PRINTNS;" FILE INDEX" : PRINT: PRINT" 1 = KEYBOARD ENTRY":PRI 
NT"2 = READ DATA TAPE" : PRINT" 3 = CORRECTIONS" : PRINT" 4 = PRINT LI 
ST":PRINT"5 = NAME SEARCH ": PRINT" 6 = CITY SEARCH" : PRINT" 7 = PRIN 
TER":PRINT"8 = STORE DATA ON TAPE" : PRINT" 9 = EXIT" 

15 ONERRORGOTO10:PRINT:E=1:INPUT"SECTION";S:ONSGOTO100,200,300,4 

00,500,600,700,800,900:GOTO10 

100 IFLEN(RS(E) ) >1THEN125ELSECLS:PRINT"NEW ENTRY RECORD *";E;" 

(0=RETURN) ":DS=" ":TS=" ":SS=" " 
105 P=3:GOSUB1000:INPUT"NAME (20 MAX): " ;DS : IFDS=" 0"THEN10 
ELSEIFDS = "DELETE"THEN305ELSEPRINTTAB(22) ;CI(RS(27) ; " " ; DS : IFLEN ( D 
S) >20THENGOSUB1100:GOTO105 

110 P=4:GOSUB1000:INPUT"ADDRESS (20 MAX): " ; TS : PRINTTAB ( 22) ; C 
HRS(27) ;" " ;T$: IFLEN (TS) >20THENGOSUB11 00 :GOTO110 

115 P=5:GOSUB1000:INPUT"CITY (20 MAX): " ; SS : PRINTTAB( 22) ; C 
HR$(27) ;" ";S$:IFLEN(SS)>20THENGOSUB1100:GOTO115 

120 P=7:GOSUB1000:INPUT"MORE ENTRIES ( Y-N-E) " ; YS : I FY$= " "THEN1 20 
ELSEIFYS="E"THEN105ELSED$=D$+XS:TS=TS+X$:SS=S$+X$:R$(E)=LEFTS(DS 
,20)+LEFTS(T$,20)+LEFTS(SS,20) : IFY $="N"THEN10 
125 E=E+1:IFE>175THEN10ELSK100 
200 CLS:PRINT"READ DATA TAPE" : PRINT: PRINT "SET TAPE TO READ (*PLA 

Y') DATA.": INPUT" ENTER WHEN READY (0 = RETURN) " ; Y 5 : I FY S = " "TH 

EN10ELSEINPUT#-1,NS:E=) : PRINT@386 ,N$; " DATA READ IN PROGRESS." 

205 PRINTP530, "READING FILES " ; E ; "-"E+3 ; : INPUTI-1 , RS ( E) , RS ( E+l ) , 

R$(E+2) ,RS(E+3) :IFR$(E+1)=""ANDR$(E+2)=""ANDRS(E+3)=""THEN10ELSE 

E=E+4: IFE>175THEN10ELSE205 

300 CLS:PRINTNS;" CORRECTIONS (COMMANDS: 0=RETURN, DELETE) " : PR 

INT: INPUT "CORRECT FILE * " ; E : IFE=0OR ( E) >300THEN 10 ELSE IFLEN ( R$ ( E) ) 

<1THEN300ELSED$=MID$(R$(E) ,1,20) : TS=MIDS ( RS ( E) ,21,20) :SS=MIDS(R$ 

(E) ,41,20) :GOSUB1200:GOTO105 

3 05 IFSO3THEN10ELSERS(E)="":GOTO300 

400 E=1:L=0:GOSUB490 

40 5 IFRS(E)=""THEN410ELSEGOSUB480 

410 E = E + 1:IFE<17 6ANDL<5THEN40 5EI,SEPRINT@990,"C = CONTINUE, F = FINIS 

H"; :INPUTYS:IFY$="F"ORE>17 5THEN10ELSEL=0:GOSUB4 90:GOTO405 

480 PRINT:PRINTE;TAB(9) ;MIDS(RS(E) ,1,20) :PRINTTAB(9) ;MIDS(RS(E) , 

21 ,20) :PRINTTAB(9) ;MIDS(RS(E) ,41,20) : L = L+1 : RETURN 

490 CLS:PRINT"REC #" :L-2: RETURN 

500 CLS:PRINTNS" SEARCH BY NAME (0=RETURN - S=STOP SEARCH) " : PR 



INT:B=1:IN=20:E=1:INPUT" ENTER NAME : " ; SS : IFSS = " "THEN10ELSEGOS:i 
B490 

505 YS=INKEY$:IFY$="S"THENL=3ELSEZ$=MIDS(RS(E) ,B,IN) :GOSUB1300:I 
FI=0THEN510ELSEGOSUB4 80 

510 E=E + 1:IFE<176ANDL<5TIIEN50 5ELSEPRINT@9 90,"C = CONTINUE, F=FINIS 
H"; : INPUTYS: IFE>17 5ORYS="F"THEN10ELSEGOSUB490 : GOTO505 
600 CLS: PRINT" SEARCH ";NS;"FILE FOR CITIES . (0=RETURN - S=STOP 
SEARCH) ": PRINT: B=41 : IN=20 : E=l : INPUT" ENTER CITY :"; SS : IFSS=" "THE 
N10ELSEGOSUB4 90:GOTO50 5 

700 CLS: INPUT" L=COMPI,ETE LIST, N=SELECTED NAMES, C=CITIES" ; AS : I 
FA$=""THEN10ELSE1FAS="L"THEN7 6 8ELSEIFAS="N"THEN710ELSEIFA$="C"TH 
EN740 

710 B=1:IN=20:E=1:INPUT" ENTER NAME : " ; SS : IFSS=" 0"THEN10ELSEIFLE 
N(SS) <10RLEN(SS) >20THEN710 
712 INPUT" STARTING RECORD #";E 

715 ZS=MIDS(RS(E) ,B,IN) : GOSUB1300 : IFI=0THEN720ELSEGOSUB780 
720 E=E+1:IFE<176THEN715ELSE10 

740 B=41:IN=20:E=1:INPUT" ENTER CITY : " ; SS : IFSS=" "THEN10ELSEIFL 
EN(SS) <10RLEN(SS) >20THEN740ELSE71 2 
76 8 INPUT" STARTING RECORD #";E 
770 IFRS(E) =""THEN775ELSEGOSUB780 
775 E=E+1:IFE<176THEN770ELSE10 

780 GOSUB480:LPRINT:LPRINT;MIDS(RS(E) ,1 ,20) : LPRINT; MIDS ( RS ( E) ,21 
,20) :LPRINT;MIDS(RS(E) ,41,20) : LPRINT: LPRINT: RETURN 
800 CLS:YS="":PRINT"STORE ";NS;" DATA ON TAPE ( 0=RETURN) " : PRI 

NT:PRINT"SET RECORDER TO PRINT ('RECORD') DATA ":INPUT"ENTE 

R NAME OF DATA FILE : " ; YS : IFYS="0 "THEN10ELSEIFLEN ( YS) >0THENN$=Y 

805 CLS:E=1:PRINT@130, "STORING "N$" DATA ON TAPE" : PRINT : PRINT#-1 

,N$ 

810 PRINT@390, "WRITING FILES * " ; E ; n -"E+3 ; : PRINT#-1 , RS ( E) , RS ( E+l ) 

,RS(E+2) ,R$(E+3) :IFR$(E+l)=""ANDRS(E+2) =" " ANDRS ( E+3 ) =""THEN10ELS 

EE=E+4:IFE>300THEN10ELSE810 

900 CLS : PRINTTAB) 20 ) ;"* WARNING *": PRINT: PRINT"WHEN THE PROGRAM 

TERMENATES, ALL DATA WILL BE LOST I ": PRINT: INPUT'HAS THE DATA BEE 

N STORED ON TAPE " ; YS : IFLEFTS ( YS , 1 ) <> " Y"THEN800ELSEEND 

1000 PRINTCHRS(28) ; : FORI=lTOP : PRINTCHRS ( 26) ; : NEXTI : RETURN 

1100 PRINTTAB(22) ;CHRS(27) ;" 1 *:PRINTTAB( 

55) ;CHRS(27) ; "* ERROR *":RETURN 

1200 CLS:P=3:GOSUB1000:PRINTTAB(23) ; DS : PRINTTAB ( 23 ) ; TS : PRINTTAB ( 

23) ;SS: RETURN 

1250 FORI=lTOLEN(WS)-LEN(DS)+l:IFD$=MIDS(W$,I,LEN(DS) ) RETURN 

13 00 FORI=lTOLEN(ZS)-LEN(SS)+l:IFS$=MIDS(ZS,I,LEN(SS) ) RETURN 

1305 NEXTI:I=0:RETURN 



Program Listing 
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The systems approach to selling Girl Scout cookies. 
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The development of a com- 
puter software system is not 
an easy task. It involves good 
communications, sound prob- 
lem analysis, efficient program- 
ming, extensive testing, docu- 
mentation, audit trails, user 
acceptance and program/file 



The Key Box 

Basic Level II 

Model I 

4-48K RAM 

NEW DOS 80 

One 80-track disk drive 

Epson MX-100 Printer 

Material in this article is not 

machine dependent. 



maintenance procedures. Unfor- 
tunately, microcomputer users 
are often their own program- 
mers and analysts. As a result, 
they never learn the systems 
development process. 

The next few articles in this 
series will address the systems 
development process as prac- 
ticed by the best data proces- 
sors in industry. We will ex- 
amine each step necessary to 
transform a user concept into a 



step becomes more apparent. 
Throughout the process, keep in 
mind the system we develop is 
only serving as a vehicle for the 
process we are learning. Its 
value is as a teaching aid, rather 
than as a unique application 
package. 

Problem Definition 

Computer programs are not 
created in a vacuum. No pro- 
grammer develops a system 



Wo programmer develops 

a system without a 

need for that system." 



computer reality utilizing the 
TRS-80. The systems develop- 
ment process is usually ex- 
plained by paralleling an exist- 
ing complex business system, 
but we will concentrate our 
efforts on actually developing a 
system that can be used in most 
homes. Since our problem will 
be much simpler than a complex 
business system, some steps in 
the process may seem trivial. 
But, as the complexity of a prob- 
lem increases, the value of each 



without a need for that system. 
The need usually arises when 
someone develops a problem or 
foresees a potential problem. 

Shortly after I began writing 
this series, my daughter re- 
turned from a Girl Scout meet- 
ing and casually announced 
that my wife would again be 
Cookie Mother. Painfully, I re- 
membered the two previous 
years we experienced as Cookie 
People. Hundreds of cases of 
Girl Scout cookies littered the 
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house. We ordered, reordered, 
returned and distributed cook- 
ies, keeping track of over two 
thousand dollars trickling in, in 
dimes, nickels and crumpled 
dollar bills. Who owed how 
much? How many boxes of 
mints were available? Both 
years we had to make up pay- 
ment shortages totalling $45.00. 
Who didn't pay? Who knows! 
My wife thought this problem 
would be an excellent applica- 
tion for this E.D.P. series. 

I asked my wife, the potential 
user, to help define the problem. 
The following list of problems 
emerged: 

• Past experience showed a 
lack of control over money and 
cookies. My wife could not al- 
ways be sure who had outstand- 
ing money and who was given 
what type of cookies. The prob- 
lem would take on another level 
of complexity this year— two 
troops merged for the cookie 
drive, but each troop's sales and 
profits had to be kept separately. 

• My wife consistently or- 
dered too many cases of one 
kind of cookie or too few cases of 
another. No attempt had been 
made to analyze initial and re- 
plenishment orders based upon 
past sales. 
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• Money was not adequately 
controlled in past years, and 
attempts to balance inventory 
and cash received were never 
successful. 

• Adequate records of how 
many boxes each child finally 
sold and paid for were a dis- 
aster. Since the Girl Scouts off- 
ered incentive awards for the 
sale of cookies, it was not an 
easy task to decide which girls 
earned what incentives. 

System Goals 

Assuming the problem defini- 
tion is accurate, step two in the 
systems development (SD) pro- 
cess is to define what the user 
expects of the new system. 
Users often have neither the 
knowledge, nor the appreciation 
of computers and their program- 
ming limitations. It is the job of a 
computer analyst to temper 
user expectations with reality 
without destroying the useful- 
ness of the project. System 
goals and expectations are ar- 
rived at by communication be- 
tween the ultimate user and the 
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Table 1. COMS system data elements 









system analyst. 

Based on the problems stated 
above, the following goals of the 
proposed Cookie System were 
negotiated: 

• The System would recom- 
mend an initial ordering quanti- 
ty for each type of cookie based 
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on a user-supplied percentage 
of total sales of the previous 
year. 

• The System would com- 
pute an average sale per child 
for each type of cookie from pre- 
vious-year data supplied by the 
user. 

• The System would subtract 
or add to the total initial order a 
per-child average based upon 
children no longer in the troop or 
children who joined the troop 
since the last cookie drive. This 
figure would become the actual 
initial order for each type of 
cookie. 

• The System would keep 
track of all children participat- 
ing in the cookie drive, their 
troop number, the number of 
boxes sold by type, payments to 
date, payments outstanding 
and boxes outstanding. 

• The System would com- 
pute reorder levels for inventory 
falling below a specific user- 
supplied quantity based upon 
total sales of that item to date. 

• The System could, at any 
time, display totals of cookies or 
money or both for each child, 
each troop or both troops. 

• The System would com- 
pute which children qualify for 
incentive awards based on user- 
supplied data. 

• The System could produce 
a composite file of data used for 
future year projections. 

Feasibility Analyses 

At this point, the analyst has 



some serious thinking to do. 
How much effort will be involved 
in producing such a system? 
How much data will be entered 
to initialize the system? How 
much effort is necessary to 
maintain the system? Is the ef- 
fort involved in producing, up- 
dating and maintaining the sys- 
tem greater than that of the 
manual system? How long will 
the new system be used? How 
frequently will it be updated or 
accessed? In short, is the devel- 
opment of the new system 
worth the effort? 

There is always a tendency 
for the user to underestimate 
the labor in developing a 
system. After all, television com- 
puters answer English language 
questions effortlessly. New 
analysts often fall into this 
same trap. A good rule of thumb 
is to double the estimate of 
work hours and costs projected 
by an inexperienced analyst. 

Our Cookie System is certain- 
ly not worth the effort if it will on- 
ly be used for the eight week 
cookie drive. However, realizing 
this is our third year of cookie 
distribution, there is no reason 
to conclude that future years' 
cookie drives will not be our re- 
sponsibility. In addition, the 
final product can be adapted to 
a host of other Girl Scout drives, 
including calendar drives, 
subscription drives, fund drives 
and just about every other kind 
of drive except disk drives. Be- 
cause I estimate the system 
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could be used for at least three 
months per year, I decided to 
create it. 

The next step in feasibility 
analysis is to examine software 
that can be purchased and mod- 
ified without sacrificing the 
goals of the proposed system. 
The only applicable software 
available which would satisfy 
our criteria were a few Data 
Base Management Systems 
(DBMS). A good DBMS costs be- 
tween $90 and $400. Despite the 
fact that a DBMS is almost es- 
sential to a serious disk user, I 
chose to develop the system 
from scratch to better demon- 



On a lesser system, the pro- 
gram and file access times and 
the reliance on hand copying 
CRT screens would make the 
system slow and inconvenient. 

Identifying Necessary Files 

Our next task is to examine 
the goals and decide which files 
will be necessary to accomplish 
those goals. Goals 1-3 are 
calculations, based upon user- 
prompted data. They will not re- 
quire external files. Goal 4 re- 
quires a disk data file. For the 
sake of simplicity, the example 
system will be called COMS, an 
acronym for the Cookie Man- 



" . . double the estimate 

of work hours and 

costs projected by 

an inexperienced analyst." 



strate the SD process. 

Hardware Analysis 

Next, we must determine if 
the proposed application can be 
utilized on the available hard- 
ware. Since the data will be 
assessed and updated while ac- 
tually receiving cash or dis- 
tributing cookies, the programs 
necessary to query and update 
the data base should load quick- 
ly and operate in a real-time 
mode. These factors effectively 
eliminate a cassette based sys- 
tem. Reports must be portable 
and should have the option to be 
printed as well as displayed on 
the CRT screen. The minimum 
system adaptable to this appli- 
cation is a one disk, 32K system 
with a printer. 



agement System. The file re- 
quired to fulfill Goal 4 may be 
called the Girls Cookie File 
(GCF). This same file should 
contain enough information to 
satisfy Goals 6 and 7. 

The fifth goal requires a file to 
compute reorder levels of inven- 
tory. We will call this file the 
Cookie Reorder File (CRF). 
Finally, Goal 8 requires combin- 
ing and storing the data from 
the two original files (GCF and 
CRF) for next year's use. We will 
call this combined file the 
Cookie History File (CHF). 

Access Keys 

For every file updated ran- 
domly, one data element must 
be used as a key. A key is a data 
field unique to a specific record; 
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the program can call it to access 
that specific record. The GCF is 
accessible by the Girl Scout's 
last name. The CRF will be ac- 
cessed by cookie name. 

Data Elements 

A data element is a data field 
that enhances the meaning of 
the record. At this point it is 
necessary to define what infor- 
mation is needed to initialize, 
maintain and update the sys- 
tem. It is also necessary to 
determine what data elements 
the system will compute from re- 
lated user supplied information. 
Table 1 contains the data 
elements necessary to ac- 
complish system goals. The first 
column supplies the data ele- 
ment name. The second column 
outlines the file containing the 
data element. In some cases, 
the data element appears in 
more than one file. Column 
three supplies the future pro- 
grammer with information on 
the data element's size and 
composition. A field marked "X" 
is alphanumeric and can con- 



tain any letter or number. A field 
marked "A" is alphabetic and 
will contain only letters. A field 
marked "9" is numeric and can 
only contain numbers. The num- 
ber in parentheses represents 
the character length of the field. 
These symbols can be mixed to- 
gether. A field marked 9(3) 
XXA(2) would accept the follow- 
ing data: 736A9RAK. 
The next column shows the 



source of the data. Some of the 
data elements are supplied by 
the user; others are computed 
based upon other user-supplied 
data. Notes and Goal columns 
are self-explanatory. The Alter- 
able column tells if the data 
element can be changed after 
it is initially given a value. 
Any data element defined as a 
key cannot be changed. The final 
column, JUST, is the data 
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storage field justification. A 
right-justified field places the 
data to the far right with trailing 
spaces. Left justified fields do 
the opposite. If a data element 
fits the field size exactly, 
justification is moot. Fig. 2 
shows the field First Name as it 
would appear justified. Fig. 3 
shows justification if the value of 
the field is larger than the al- 
located field space. When a data 
element is larger than the field it 
occupies, truncation occurs. 

Summary 

So far, we have looked at the 
first phase of systems analysis. 
We have identified the problem, 
and explored the goals, objec- 
tives, scope and limits of the 
potential solution. We have de- 
termined the system software, 
hardware files and data elements 
necessary to begin system prep- 
aration. In Part IV we will begin to 
design the system. ■ 

Gary Dilllio is a Computer 
Systems Analyst for the Depart- 
ment of the Navy. 
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with the following features: • 32K memory • Serial RS232C and 20Ma port • Real time clock • 
Parallel printer port • 5 inch single density disk controller • Expansion bus(screen printer port) • 
Onboard power supply • Solder- masked and silk screened legend- S69. 95 (tin plated contacts) - 
$84.95 (gold plated contacts) 

C KEYBOARD- 74 key expanded professional keyboard- includes 1 2 key numeric keypad. Fully 
assembled and tested. - $99.95 

D. COMPUTER CASE -This stylish instrument-quality solid st eel case and hardware kit gives your 
LNW80 that professional factory-built appearance. - $84.95 Add $1 2.00 for shipping. 

E. SYSTEM EXPANSION CASE- This stylish instrument-quality solid steel case and hardware kit 
gives your SYSTEM EXPANSION interface that professional factory-built appearance. - $59.95 
Add $10.00 for shipping. 

F. LNW80 CPU - HARD TO FIND PARTS KIT- $82.00 

G. LNW80 VIDEO - HARD TO FIND PARTS KIT - $31 .00 

H. SYSTEM EXPANSION - HARD TO FIND PARTS KIT- $27.50 
I. LEVEL II ROM set. (6 chip set) - $1 20.00 

VISA and MasterCard accepted. Add S3. 00 for shipping plus S1 .00 for each additional item. All 
shipments via UPS surface. Add S2. 00 for U.S. Mail. Shipments outside continental U.S.: funds must 
be U.S. dollars. Sufficient shipping costs must be included with payment. 

ORDERS & INFORMATION - (714) 544-5744 
SERVICE- (714) 641-8850 



LNW Research Corp. 

2620 WALNUT Tustin. CA. 92680 
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MACRO-MONIT 
...THESHADO 







What secrets lurk deep 

within the heart of your 

micrQprocessor? Only THE 

SHADOW knows. Advanced 

Operating Systems shines the 

light on the intricate workings 

of your *TRS-80 Model I or 

Model III microcomputer. 

MACRO-MONITOR, THE 

SHADOW is a machine 

language program by Jake 



to disassemble and examine 

program instructions from any 

part of your computer's 

memory. THE SHADOW even 

enables you to single-step 

through your computer's ROM. 

With THE SHADOW, you can 

load a machine language 

program from disk or tape an ' 



begin execution at a user- 
specified breakpoint, oti£ 
instruction at a time, with a 
user-defined time delay 
between instructions. It will 
disassemble each instruction as 
it is being executed and route 
it along with all current 
jister values to your video 
_n or printer. The user may 



(ASCII or Hex) up to 16 bytes 

in length. 

THE SHADOW permits machine 

language programs to be 

relocated within memory with 

all internal calls and jumps 

changed to execute in the new 

location. The program also 

provides a visual displa' 

tape LOADS and SA 



THE SHADOW is completely 

user-relocatable in RAM 

making it an extremely 

valuable tool for all 

programmers. 

Now available at your local 

software retailer, or call (800) 

348-8558 to order. (Indiana 

residents, call (219) 879-4693) 

MasterCard and VISA accepted. 



EL III DISK $69.95 



St. John Road 
IN 46360 








GENERAL 



The Key Box 

Basic Level II 
Model I or III 
16K RAM 



An aid to learning graph theory. 



DIGRAPH Digressions 



Len Gorney 

Box 91 R.D. 5 

Clarks Summit, PA 18411 



Do you remember the last 
time you solved a problem in 
chemistry, economics, opera- 
tions research, physics, probabil- 
ity, or numerical analysis? You 
probably applied some aspect 
of graph theory to the problem 
solution. 

Graph Theory 

Graph theory uses the funda- 
mental concepts of set and rela- 



tion to depict the relationships of 
a given graph. Mathematically, a 
graph G consists of a finite non- 
empty set of N nodes and E 
edges. Think of the cities listed 
on a road map as nodes and the 
highways linking these cities as 
edges. 

My program takes this defini- 
tion of a graph further by intro- 
ducing a directed graph (digraph). 
In this case, the nodes of the 
graph represent the same collec- 
tion of points of interest; but, the 
edges which connect one node 
to another have direction. If you 
think of the program flowchart 
shown in Fig. 1 as a graph, the 





Program Listing 


i a a ■<• 


DIM G(25,25), Sl(25), S2(2S): 




CLEAR 2000: 




DEFSTR G, L, 


1010 


CLS: 




INPUT-ENTER NUMBER OF NODES IN GRAPH";N: 




IF N <= THEN GOTO 1620 


1020 


PRINT'ENTER LOGICAL VALUES OF GRAPH" 


1 ii J 


FOR R ■ 1 TO N 


1040 


FOR C - 1 TO N 


1050 


PRINT"NODE";R; "TO NODE";C; 


1060 


L = "": 




L = INKEYS: 




IF L » "" THEN GOTO 1060 


1070 


IF L X "T" AND L >< "F" THEN GOTO 1050 




ELSE PRINT L: G(R,C) - L 


1080 


NEXT C 


1090 


NEXT R 


L100 


CLS 


1110 


FOR R - .' TO f. 


1120 


FOR C = 1 TO N 


1 ! 3 


PRINT G(R,C) ; 


1140 


NEXT C 


1150 


PRINT 


1160 


NEXT ft 


1 1 / 


INPUT-STARTING NODE'jS: IF S > N THEN GOTO 1170 


1180 


INPUT-TERMINAL NODE";E: IF E > N THEN GOTO 1180 


1190 


■ 




PATH FOUND WHEN STARTING NODE EQUALS TERMINAL NODE 




AND NODE IS REFLEXIVE. 


1200 


IF S - E AHD G(S,E) - "T" THEN OK = "T": PI = 2: 




Program continues 



operations enclosed in the flow- 
chart symbols are the nodes of 
the graph while the arrows con- 
necting specific operations 
represent the edges of the graph. 
Organizational charts apply 
graphs to real-world situations. 

We must now define a path. 
Use our road map example (as- 
suming one-way and two-way 
roads) to find a way from one city 
to another. We initialize our start- 
ing point at our present location 
and follow the edges through the 
various connecting nodes to the 
destination. Our path is the list of 
cities (nodes) passed through 
following the various roads 
(edges). 

Our physical world allows us 
to represent a digraph with 
circles for nodes and arrows for 
edges, but computers do not 
recognize this type of data. For 
this reason, we will use an array 
which contains the logical values 
relating to the presence or the 
absence of a connecting edge 
between particular nodes. This 
array is known as the adjacency 



matrix. An example of a digraph 
and its associated adjacency 
matrix is in Fig. 2. The matrix is a 
square array where the number 
of rows and the number of col- 
umns are both equal to the 
number of nodes in the digraph. 
Whenever an edge connects two 
nodes, the matrix entry has a 
logical value of T. A logical F 
represents no connecting edge 
between two nodes. 

The Program 

I will use the example shown in 
Fig. 2 to demonstrate the pro- 
gram. Load and run the program 
as listed. The program requests 
the number of digraph nodes; en- 
ter four. The dimension state- 
ment for the adjacency matrix G 
as well as the two other lists ac- 
cepts up to 25 nodes. If you have 
a larger digraph, redimension 
these lists and the matrix. 

Next, enter the adjacency ma- 
trix values. Load a logical T or F 
into the required edge; input is 
row by column (left to right and 
top to bottom). Do not use the 









1 


2 


3 


4 


1 


T 


T 


T 


T 


2 


F 


F 


F 


F 


3 


T 


F 


F 


F 


4 


F 


F 


F 


F 



Fig. 2. Digraph and Adjacency Matrix 
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Enter key during this data input. 
Next enter starting and ter- 
minal node values. To determine 
if a path exists from node three to 
node four of the digraph, enter 
three for the starting node and 
four for the terminal node. The 
program will search for a path 
through the adjacency matrix. If 
you entered the program cor- 
rectly, it will tell you that the path 



from node three to node one to 
node four exists as a path from 
node three to node four. 

Trace a few other paths 
through this digraph and try the 
program. It tells you if a path 
does or does not exist at the end 
of its search. 

As a final test of the program, 
convert the flowchart in Fig. 1 to 
its equivalent adjacency matrix. 



Program continued 



Sl(l) = S: Sl(2) = E: 
GOTO 1550 



PATH FOUND WHEN STARTING NODE AND TERMINAL NODE ARE 
SEPARATED BY ONE EDGE. 



1226 
1236 



1246 
1251 



1266 
1276 
1286 
1296 



1306 
1316 



1326 
1336 



1346 
1356 
1366 



1376 
1386 



1396 

1406 



1416 
1426 



1436 
1446 



1456 
1466 



1476 
I486 



1496 
1501 



1516 
1526 



1546 
1551 



1566 

L57I 

1586 
1596 
1606 
1616 



IF G(S,E) = 



THEN OK = "T": PI =2: 

Sl(l) = S: Sl(2) = E: GOTO 1556 



INITIALLIZE FIRST LOCATION IN STACK TO STARTING NODE. 

P2 » 1: S2(P2) = S 

DOES A PATH EXIST FROM THE STARTING NODE TO ANY NODE? 
IF AT LEAST ONE EDGE EXISTS, THEN OTHER EDGES MAY EXIST 
FROM THE J(TH) NODE TO THE TERMINAL NODE. 

POR J ■ 1 TO N 

IF G(S,J) = "T" THEN GOTO 1310 
NEXT J 

FALLING THRU ABOVE LOOP SAYS NO PATH EXISTS FROM THE 
STARTING NODE TO ANY OTHER NODE. 

OK = "F": GOTO 1560 

A PATH EXISTS FROM THE STARTING NODE. INITIALIZE R TO 
THE STARTING NODE THEN TO THE NODE TO WHICH THE STARTING 
NODE CONNECTS TO ETC. 

R = S 

PI KEEPS TRACK OF THE PATH BEING TRACED INTO STACK SI. 

PI = 1: S1(P1) = S 
FOR C = 1 TO N 

DISREGARD REFLEXIVE LOOPS. 
IF R = C THEN GOTO 1490 

DOES AN EDGE EXIST BETWEEN NODE R TO NODE C? 
IF G(R,C) » "F" THEN GOTO 1490 

SKIP OVER NODE WHICH HAD PREVIOUSLY BEEN TRACED. 
IF SI (PI) = C THEN PI = Pi - 1: GOTO 1490 

WHEN NODE C IS AT TERMINAL NODE, PATH IS TRACED IN SI. 
IF C=E THEN PI = PI + 1: S1(P1) = C : OK = "T": GOTO 1550 

P3 IS THE RETRACE POINTER THRU SI. 

P3 - PI 

CHECK IF PATH IS BEING RETRACED; I.E., IF THE C(TH) NODE 
IS ALREADY IN SI THEN THE PATH HAS BEEN TRACED INTO SI. 

IF P3 <= THEN PI = PI + 1: P2 = P2 + 1: S1(P1) = C: 

S2(P2) = C: R = C: GOTO 1350 

IF C = S1(P3) THEN GOTO 1490 

ELSE P3 = P3 - 1: GOTO 1470 
NEXT C 

EXIT LOOP WHEN NO PATH FOUND FROM R TO C . 

IF P2 < = THEN GOTO 15 40 

ELSE P2 = P2 - 1 

BACK UP ONE NODE SINCE NO PATH IS FROM R TO C. 

IF P2 <= THEN GOTO 1540 

ELSE R = S2(P2): GOTO 1350 
OK = "F" 

IF OK IS TRUE THEN A SIMPLE PATH EXISTS FROM THE 
STARTING NODE TO THE TERMINAL NODE ELSE ( WHEN OK 
IS FALSE ) NO PATH EXISTS. 

IF OK » "F" THEN PRINT'NO PATH EXISTS FROM NODE" ; S; "TO" ; E : 
GOTO 1610 

PRINT'SIMPLE PATH EXISTS FROM NODE" ; S; "TO" ; E: 

PRINT'PATH IS";S; 

FOR J ■ = 2 TO PI 
PRINT"TO";Sl(J) > 

NEXT J 
PRINT: 

INPUT'ENTER Y FOR SAME GRAPH ELSE ENTER N";L: 
IF L •= "Y" THEN GOTO 1100 ELSE RUN 1000 
END 



Trace through the flowchart to 
see the paths taken by program 
logic. The next time you develop 



a flowchart, use the path tracing 
program as a test of the program 
logic. ■ 




-•/STARTJ 




INITIALIZE 
PATH STACK 




CD- 
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UTILITY 



Keyword changes for Basic dialects. 



Basic Translator 



Howard E. Miller 

335-E Winding River Drive 

Atlanta, GA 30338 



Telephone line computer in- 
formation exchanges have 
become a subset of the comput- 
er hobbyist field. In the Atlanta, 
GA area alone, there are at least 
six full time and three part time 
bulletin board services. 

Unfortunately, there are sev- 
eral dialects of Basic. Reediting 



a program written in one dialect 
to run in another can bedifficult. 
My character change program 
uses the computer to shorten 
the job (see Program Listing). 
CLOAD this program and ap- 
pend the program to be altered. 
The appended program must 
have a starting line number 
greater than 32. 

Basic statements such as If, 
Then and Print are stored in 
memory as single byte numbers 
ranging from decimal 129-250. 
These numbers decode the 
corresponding subroutine's 



location in ROM and shorten the 
amount of memory space taken 
by the program. When a pro- 
gram is listed, the Basic key- 
word is substituted for the num- 
ber. Keyword numbers are on 
page E/1 of the Level II Basic 
manual. Note particularly the 
keyword numbers 205-214. 

When the program begins it 
prompts Character To Change?. 
Type in the character you want 
changed. To change a keyword 
or character not on the key- 
board, type shift-A. The program 
will respond Keyword Number?. 



Enter the keyword number or 
character you want changed. 
The program prompts Change 
To?. Respond with the character 
you want. 

Once the entries are com- 
pleted, the program's text will 
appear on the screen. Char- 
acters in quotation marks are 
not changed. ■ 



The Key Box 

Basic Level II 



TRST 
5 RU 


TIME PROGRAM 


POKE 
INTO 
READ 


PATCH ADDRESS 
KEYBOARD 
ADDRESS 






I 








BACK 
TO 

BASIC 
PROMPT 





IME A KEY 



PAUSE FOR A FEW 








NSURE THAT KEY 








TWICE 






MOVE SCREEN 

INTO 

HIGH MEMORY 



Fig. 1 
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1 CLS:DEFSTR K :D=17129 : DIM K(122):FOR K=l TO 122:READ K(N) jNEXT 

2 PRINT-CHARACTER TO CHANGE?"; 

3 AS=INKEYS:IF AS=" n THEN 3 

4 IF AS="a" THEM PRINT: INPUT" KEYWORD NUMBER" ; Al : A$=" " : ELSE PRINT 
A? 

5 PRINT"CHANGE TO?"; 

6 B$=INKF.Y$:IF B$="" THEN 6 

7 IF BS="a" THEN PRINT: INPUT"KEYWORD NUMBER" ; Bl : B$=" ": ELSE PRINT 
B$ 

8 IF AS<>"° THEN A1=ASC(AS) 

9 IF BSO"" THEN B1=ASC(B$) 

IB A=PSEK(D)+PEEK(D+l)*256:B=PEEK(D+2)+PEEK(D+3)*2S6:C=( PEEK (166 
33) +PEEK(16634) *256)-3 

11 IF B<=34 THEN 19 

12 PRINT B; 

13 FOR J=D+4 TO A-l 

14 :F=PEEK(J) : IF F=Al,POKE J,B1:F=B1 

15 :IF F=34 THEN GOSUB 20 

16 :IF F>31 AND F<129 THEN PRINT CHRS(F); 

17 :IF F>128 AND F<251 THEN PRINT K(F-128); 

18 NEXT:PRINT 

19 D=A:IF D<C THEN 10 ELSE RUM 

20 PRINT CHRS(F) ; : J=J+1 :F=PEEK ( J) : IF F<>34 THEN 20 ELSE RETURN 

21 DATA FOR, RESET, SET, CLS,CMD, RANDOM, NEXT, DATA, INPUT, DIM 

22 DATA READ, LET, GOTO, RUN, IF, RESTORE, GOSUB, RETURN, REM 

23 DATA STOP, ELSE, TRON ,TROFF ,DEFSTR,DEFINT,DEFSNG,DEFDBL 

24 DATA LINE, EDIT, ERROR, RESUME, OUT, ON, OPEN, FIELD, GET, PUT 

25 DATA CLOSE, LOAD, MERGE, NAME, KILL, LSET,RSET, SAVE, SYSTEM 

26 DATA LPRINT,DEF, POKE, PRINT, CONT, LIST, LLIST, DELETE, AUTO 

27 DATA CLEAR, CLOAD, CSAVE, NEW, TAB, TO, FN, USING, VARPTR,USR 

28 DATA ERL, ERR, STRINGS, INSTR, POINT, TIMES, MEM, INKEYS, THEN 

29 DATA NOT, STEP, +,-,*,/, [ , AND ,OR, > , = , < ,SGN, INT, ABS ,FKE 

30 DATA INP,POS,SQR,RND, LOG, EXP, COS, SIN, TAN, ATN, PEEK, CVI 

31 DATA CVS,CVD,EOF,LOC,LOF,MKI$,MKS$,MKD$,CINT,CSNG,CDBL 

32 DATA FIX, LEN,STRS,VAL,ASC,CHRS, LEFTS, RIGHTS, MIDS 
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ALL PRICES & SPECIFICATIONS FOUND IN THIS CATALOG 
ARE SUBJECT TO CHANGE WITHOUT PRIOR NOTICE 



50 N. PASCACK ROAD 

SPRING VALLEY. NEW YORK 1097", 

(914) 425-1535 



Dear Computer Owner: 

Here is your NEW H & E COMPUTRONICS, INC. CATALOG. Feel free to rip the pages apart. Everytimeyou place an 
order, we will send you a new catalog with our latest catalog updates. 



FREE • FREE • FREE • FREE • FREE • FREE • FREE • FREE • FREE • FREE • FREE • FREE • FREE • FREE * 



CATALOG #10 WILL CONTAIN MANY NEW ITEMS FOR OWNERS OF THE TRS-80, APPLE, PET, 
ATARI, XEROX, IBM, HEWLETT-PACKARD. SHARP. CASIO AND MANY OTHER COMPUTERS. TO 
RECEIVE A FREE COPY OF CATALOG #10. JUST FILL OUT THE POST CARD ATTACHED TO THIS 
CATALOG AND AFFIX A STAMP. YOU WILL REMAIN ON OUR CATALOG MAILING LIST FOR THE 

NEXT 12 MONTHS. NOTE-PRESENT SUBSCRIBERS TO ANY OF OUR THREE PUBLICATIONS AND 
THOSE H & E COMPUTRONICS, INC. CUSTOMERS WHO HAVE PURCHASED ANYTHING FROM US 
SINCE JANUARY 1, 1982 WILL AUTOMATICALLY RECEIVE OUR NEXT CATALOG AND DO NOT 
HAVE TO FILL OUT THIS POST CARD. 



*FREE • FREE • FREE • FREE • FREE • FREE • FREE • FREE • FREE • FREE • FREE • FREE • FREE • FREE * 



NOW THREE PUBLICATIONS 

H & E COMPUTRONICS, INC. NOW HAS THREE PUBLICATIONS. 

1. BUSINESS COMPUTING is a NEW publication for serious business computer users and owners (and those people considering the pur- 
chase of a business computer). The publication is fact oriented and non-technical in nature The publication deals with all small business 
computers. (IBM. APPLE, TRS-80, PANASONIC. SHARP, XEROX. HEWLETT-PACKARD, NEC ). 

2. THE H & E COMPUTRONICS MAGAZINE was the first and original publication for TRS-80 OWNERS. The magazine is now in its fifth year 
of publication, 

3. The MOD-II NEWSLETTER is an essential publication for all owners of the TRS-80 MOD-II COMPUTER. It is especailly geared to a non- 
technical audience and is especially aimed at letting MOD-II owners learn more about their computer and what is available for their com- 
puter. 

SEE THE INSIDE OF OUR CATALOG FOR MORE INFORMATION ABOUT THE ABOVE THREE PUBLICATIONS 



IMPORTANT NOTICE ABOUT YOUR ORDER 

H&ECOMPUTRONICS. INC. selects its software very carefully. We feel that the items we choose to sell are the best products currently available. 
Our software selections are based on value, documentation, support, saleability and reputation of the software house writing the product. We mon- 
itor the return rate of each piece of software very carefully We normally only sell software written by the major software houses (such as MICRO- 
SOFT, PERSONAL SOFTWARE, RACET COMPUTES. ADVENTURE INTERNATIONAL, etc.), but we do choose software written by lesser known 
software houses when we feel the product has merit. We currently sell about 400 different items (out of the over 50,000 items available to MICRO- 
COMPUTER owners). If you disagree with our choice we offer our money-back guarantee because we feel that our customers should not be 
"stuck " with software that they consider unsatisfactory. If you do not feel satisfied with the product we have sent you, please follow the return (or 
exchange) procedures below. IN ANY CASE, H & E COMPUTRONICS. INC. IS NOT RESPONSIBLE FOR THE RESULTS OF ANY DEFECTS THAT 
MAY APPEAR IN THE SOFTWARE PURCHASED FROM H& E COMPUTRONICS. INC. OR ANY FINANCIAL LOSS INCURRED DUE TO THE USE 
OF ANY SOFTWARE PURCHASED FROM H & E COMPUTRONICS. INC. It is up to the user to properly test any software that they purchase. 

TO EXCHANGE OR RETURN MERCHANDISE 

1 . Merchandise must be returned within 30 days of the day it was shipped. The 30 days are calculated from the day that your package was in- 
voiced until the day your package was re-shipped to H & E COMPUTRONICS, INC. 

2. It is the customer's responsibility to insure each package and obtain a receipt. We can NOT be responsible for packages that are lost in the 
mail. If the package is valuable.. .we suggest that you insure it (although it is certainly not mandatory). 

3. Our receiving department will reject all packages shipped to H & E COMPUTRONICS, INC. that do not contain our return authorization label 
affixed to the outside of the package. This return authorization label is contained in every order shipped by H & E COMPUTRONICS. INC. If 
your return authorization label is missing, please call (or write) to Darlene at Customer Service (914) 425-1535 (between 10:00 A.M. to 
4:00 P.M. New York Time) for a replacement 

4. A copy of your original invoice must be included within the package. WE WILL RETURN ANY PACKAGE THAT DOES NOT CONTAIN THE 
ORIGINAL INVOICE (OR MACHINE COPY) WITHIN THE PACKAGE. 

5 Please include brief instructions so that we know what to do with your returned package. For example, do you want credit towards another 
. program? PLEASE do not send a lengthly description. PLEASE do be short and to the point. If you have any further comments to makeabout 
the software, please address them to Darlene, Software Manager (and send them in a separate envelope). We wish to process your return as 
soon as possible. please do NOT complicate the process by referring to previous phone calls or letters. 

6. If you are returning, exchanging, or updating any material that you have had for more than 30-days, you must obtain prior approval before 
returning the merchandise. You may obtain a special return authorization number by calling (914) 425-1535 and speaking to Darlene, our 
software manager. Approval may also be obtained by sending a request through the mail. 

7. Merchandise must be returned in NEW condition. Although we do expect that sealed packages will undergo some damage, please keep it to a 
minimum. In any case, we reserve the right to refuse any package we feel has been overly abused. 

POSTAGE RATES: 

1. Add S3. 00 for postage and handling for any order shipped within the United States by U.P.S. 

2. Add $4.00 for orders shipped C.O.D. or by U.S. Mail within the U.S. 

3. Add $5.00 for postage and handling for any order shipped to Canada and Mexico. 

4. Add exact postage outside of U.S.. Canada and Mexico. 

5. Overnight delivery is available through EMERY AIR FREIGHT and other air services. If you require overnight delivery, the appropriate 
charges will be added to your order. 

METHOD OF PAYMENT: 

1. We accept VISA, MASTER CARD or AMERICAN EXPRESS. 

2 Your PERSONAL CHECK is welcomed. All checks must be payable in U.S. Funds. 

3. C.O.D. on request. (C.O.D. orders in excess of $100 require cash or certified check). 

4. We do not have open accounts. Cash, Check, Credit Card Number or C.O.D. request must accompany each order. 

5. N.Y. STATE RESIDENTS MUST ADD LOCAL SALES TAX. 
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Tired Cf your 

CAL LEDGER? 

* THE ULTIMATE PERSONAL CHECK REGISTER 

* A PROFESSIONAL ACCOUNTING SYSTEM 

* A PERSONAL FINANCIAL MANAGER 

* A SMALL BUSINESS ACCOUNTING SYSTEM 

* A COMPLETE GENERAL LEDGER 



'"* 



mm 






V 



"TRS-80 is a trademark of Tandy Corp. - 'APPLE is a Irademark of Apple Corp - "IBM is a trademark of IB M. Corp - "XEROX is a trademark of Xerox Corp 
"ATARI is a trademark of Atari Inc - "OSBORNE is a trademark of Osborne Corp 

HOW IT WORKS 

VERSALEDGER is a complete accounting system that grows as you or your business grows. To 
start, your VERSALEDGER acts as a simple method of keeping track of your checkbook. Just 
enter your check number, date and to whom the check is made out to. As you or your business 
grows, you may add more details to your transactions .... account number, detailed account 
explanations, etc. 



VERSALEDGER 



VERSALEDGER can give you an instant cash 
balance at anytime. (IF YOU WANT IT TO) 

VERSALEDGER can be used as a small per- 
sonal checkbook register. (IF YOU WANT IT 
TO) 

VERSALEDGER can be used to run your 
million dollar corporation. (IF YOU WANT IT 
TO) 

VERSALEDGER prints checks. (IF YOU WANT 
IT TO) 

VERSALEDGER stores all check information 
forever. (IF YOU WANT IT TO) 

VERSALEDGER can distribute one check to 
multiple expense accounts. (IF YOU WANT IT 
TO) 

VERSALEDGER can handle more than one 
checkbook. (IF YOU WANT IT TO) 

VERSALEDGER can be used to replace a 
general ledger. (IF YOU WANT IT TO) 

VERSALEDGER HAS AN ALMOST UNLIMITED CAPACITY 

( 300 checks per month on single density 5V»" disk drives such as the TRS-80 Model I) (6000 checks per month on the TRS-80 Model II) 

( 500 checks per month on the Apple II) (3000 checks per month on single density 8" CP/M) 

(2400 checks per month on the TRS-80 Model III) (almost unlimited capacity on hard disk drive) 

VERSALEDGER will soon have an add-on payroll package. (IF YOU NEED IT) 

— CAN BE USED WITH 1 or MORE DISK DRIVES with 48K — 




INTRODUCTORY PRICE 
$9995 



VERSALEDGER HAS BEEN CREATED WITH THE FIRST TIME COMPUTER USER IN MIND 



30-Day Money Back Guarantee 
Also Available: VERSARECEIVABLES, VERSAPAYABLES, VERSAPAYROLL, and VERSAINVENTORY 



iCQiriPlJTRQMICS! 



N^lIX^AflTI^,. fl^VCJX'Ofc b£"^i' 



50 N. PASCACK ROAD 
SPRING VALLEY, NEW YORK 10977 




* ADD $3.00 FOR SHIPPING IN UPS AREAS 

• ADD $4.00 FOR C.O.D. OR NON-UPS AREAS 

* ADD $5.00 TO CANADA AND MEXICO 

• ADD PROPER POSTAGE OUTSIDE U.S., CANADA & MEXICO 



HOUR 
24 ORDER 
LINE 

(914) 425-1535 




NEW TOLL-FREE 

ORDER LINE 

(OUTSIDE OF N.Y. STATE) 

(800) 431-2818 



ALL PRICES & SPECIFICATIONS SUBJECT TO CHANGE 
DELIVERY SUBJECT TO AVAILABILITY 




• THE ULTIMATE PROFESSIONAL PAYROLL SYSTEM 

• HANDLES ALL PAYROLL FUNCTIONS AND REPORTS 

• QUICK QUARTERLY AND END OF YEAR SUMMARIES 

• PERFECT FOR A SMALL BUSINESS 

• EXPANDS TO HANDLE LARGE CORPORATE PAYROLLS 

. 00, 000 9 W • MS * • JJL* • »®1F • mSD ft 
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HOW IT WORK! 



VERSAPAYROLL is a complete menu driven payroll system that grows as you or your business grows. YourVERSA- 
PAYROLL acts as a simple payroll system keeping track of all government required payroll information. Just enter the 
employees, VERSAPAYROLL will perform all the necessary payroll calculations automatically and display to totals 
on your screen. The user has complete control to accept the totals, to print or not print out a check and to post or not 
post the total to our VERSALEDGER system. 

• VERSAPAYROLL automatically prints out your PAYROLL checks. (IF YOU 
WANT IT TO) 

• VERSAPAYROLL allows you to override any payroll deduction. (IF YOU WANT 
IT TO) 

• VERSAPAYROLL automatically posts all checks written to our VERSALEDGER 
system. (IF YOU WANT IT TO) 

• VERSAPAYROLL allows the user to print out PAYROLL checks one at a time. 
(IF YOU WANT IT TO) 

• VERSAPAYROLL allows the user to print out all your PAYROLL checks at the 
same time (IF YOU WANT IT TO) 

• VERSAPAYROLL gives you a summary of any employee's year to date payroll 
totals or all employee totals at any time. (IF YOU WANT IT TO) 

• VERSAPAYROLL will allow you to correct any error made at any time and auto- 
matically refigure all totals. (IF YOU WANT IT TO) 

• VERSAPAYROLL works in every state. (IF YOU WANT IT TO) 

• VERSAPAYROLL automatically calculates all federal and states taxes. (IF YOU 
WANT IT TO) 

• VERSAPAYROLL allows for all of the standard deductions plus state, city and 
three miscellaneous deductions. (IF YOU WANT IT TO) 

• VERSAPAYROLL prints all government required reports. (IF YOU WANT IT TO) 

• VERSAPAYROLL permanently stores all PAYROLL transactions. (IF YOU WANT 
IT TO) 

• VERSAPAYROLL HAS AN ALMOST UNLIMITED CAPACITY 

Can handle up to 300 employees on a TRS-80 MODEL I, 600 employees on a TRS-80 MODEL 1 1 1, 1200 employees on a TRS-80 MODEL 
II. 500 employees on an APPLE II, 600 employees on any single density 8" CP/M computer and almost unlimited capacity on hard disk 
systems. 

CAN BE USED WITH 1 or MORE DISK DRIVES (AND 48K) 




INTRODUCTORY PRICE 
$QQ 95 
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50 N. PASCACK ROAD 
SPRING VALLEY, NEW YORK 10977 

ADD $3.00 FOR SHIPPING IN UPS AREAS 
ADD $4.00 FOR C.O.D. OR NON-UPS AREAS 
ADD $5.00 TO CANADA AND MEXICO 
ADD PROPER POSTAGE OUTSIDE OF U.S., 
CANADA AND MEXICO 



NEW TOLL-FREE 
ORDER LINE 

(OUTSIDE OF NY. STATE) 

(800) 431-2818 



HOUR 

ORDER 

LINE 




ALL PRICES AND SPECIFICATIONS SUBJECT TO CHANGE* 



(914) 425-1535 




• THE ULTIMATE ACCOUNTS RECEIVABLE SYSTEM 

• HANDLES ALL ACCOUNTS RECEIVABLE FUNCTIONS 

• QUICK PERIODIC SUMMARIES AND REPORTS 

• PERFECT FOR PERSONAL OR BUSINESS USE 

• EXPANDS TO HANDLE LARGE CORPORATE 
RECEIVABLES 



•TRS-80 is a trademark of Tandy Corp. - "APPLE is a trademark of Apple Corp. • 1B.M. is a trademark of I.B.M. Corp. - "XEROX is a trademark of Xerox Corp. - 'ATARI is a trademark of Atari Inc. 



HOW IT WORKS 

VERSARECEIVABLES is a complete menu driven accounts receivable system. It keeps track of all 
information related to who owes you or your company money. It prints all necessary statements, 
invoices and all summary reports to keep you in touch with the flow of money owed to your com- 
pany. In short, VERSARECEIVABLES is a complete invoicing and monthly statement generating 
system which keeps track of current and past due receivables. 

• VERSARECEIVABLES invoices your customers. (IF YOU WANT IT TO) 

• VERSARECEIVABLES prints customer mailing labels. (IF YOU WANT IT 



TO) 
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• VERSARECEIVABLES generates monthly (or periodic) statements at 
any time (IF YOU WANT IT TO) 

• VERSARECEIVABLES uses commonly available preprinted statements 
and invoices. (IF YOU WANT IT TO) 

• VERSARECEIVABLES allows partial payments on open invoices. (IF 
YOU WANT IT TO) 

• VERSARECEIVABLES prints out all commonly used ACCOUNTS 
RECEIVABLE reports to give you a total picture of money owed to your 
company. (IF YOU WANT IT TO) 

• VERSARECEIVABLES keeps a history of each account, both current and 
aged. (IF YOU WANT IT TO) 

• VERSARECEIVABLES is ideal for doctors, lawyers, small and large 
businesses. 

• VERSARECEIVABLES HAS AN ALMOST UNLIMITED CAPACITY .... 

400 customers and transactions per month on single density 5'V' disk drives such as the TRS-80 Model i 

600 per month on the APPLE II 
'2400 per month on the TRS-80 MODEL III 3000 per month on single density 8" CP/M 

6000 per month on the TRS-80 MODEL II Almost unlimited on hard disk drive systems 

Above capacities are estimates and depend on the customer-transaction mix and the amount of disk space available 
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INTRODUCTORY PRICE 
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'CQMPUTRQMCS! 



50 N. PASCACK ROAD 
SPRING VALLEY, NEW YORK 10977 

ADD $3 00 FOR SHIPPING IN UPS AREAS 
ADD $4.00 FOR C.O.D. OR NON-UPS AREAS 
ADD $5.00 TO CANADA AND MEXICO 
ADD PROPER POSTAGE OUTSIDE OF US. 
CANADA AND MEXICO 
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(800) 431-2818 
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• THE ULTIMATE ACCOUNTS PAYABLE SYSTEM 

• HANDLES ALL ACCOUNTS PAYABLE FUNCTIONS 

• QUICK PERIODIC SUMMARIES AND REPORTS 

• PERFECT FOR PERSONAL OR BUSINESS USE 

• EXPANDS TO HANDLE LARGE CORPORATE PAYABLES 
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VERSAPAYABLES is a complete menu driven accounts payable system. It keeps track of all 
information related to how much money you (personally) or your company owes. It prints all 
necessary checks and statements on easily obtainable tractor feed forms (or on plain paper). 
Prints all summary reports to keep you in touch with the flow of money going out of your hands (or 
leaving your company). In short, VERSAPAYABLES is designed to keep track of current and aged 
payables. The system maintains a complete record of each vendor, helps determine which trans- 
actions to pay by due date within certain cash requirements and prints checks automatically with 
a detailed check register. 

• VERSAPAYABLES prints out your checks. (IF YOU WANT IT TO) 

• VERSAPAYABLES prints out a detailed check register. (IF YOU WANT IT 

TO) 

• VERSAPAYABLES allows for full or partial payments. (IF YOU WANT IT 
TO) 

• VERSAPAYABLES prints out vendor mailing labels. (IF YOU WANT IT 
TO) 

• VERSAPAYBLES prints out all commonly used ACCOUNTS PAYABLE 
reports to give you a total picture of money you or your company owes. 
(IF YOU WANT IT TO) 

• VERSAPAYABLES integrates with VERSALEDGER. (IF YOU WANT IT 
TO) 

• VERSAPAYBLES HAS AN ALMOST UNLIMITED CAPACITY 

400 vendors and transactions per month on sinlge density 5 V disk drives such as 

the TRS-80 MODEL I 

600 per month on the APPLE II 
2400 per month on the TRS-80 MODEL III 
6000 per month of the TRS-80 MODEL II 
3000 per month on single density 8" CP/M 
Almost unlimited capacity on hard disk drive systems 

Above capacities are estimates and depend on disk space available and your vendor-transaction mix 




NTRODUCTORY PRICE 
$99_95 
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ADD $3.00 FOR SHIPPING IN UPS AREAS 
ADD $4.00 FOR COD. OR NON-UPS AREAS 
ADD $5.00 TO CANADA AND MEXICO 
ADD PROPER POSTAGE OUTSIDE OF U.S., 
CANADA AND MEXICO 
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ORDER LINE 

(OUTSIDE OF N Y STATE) 

(800) 431-2818 
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• THE ULTIMATE INVENTORY SYSTEM 

• HANDLES ALL INVENTORY FUNCTIONS 

• QUICK PERIODIC SUMMARIES AND REPORTS 

• PERFECT FOR PERSONAL OR BUSINESS USE 

• EXPANDS TO HANDLE LARGE CORPORATE INVENTORIES 
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HCW IT WORKS 

VERSAINVENTORY is a complete menu driven inventory control system. It keeps track of all 
information related to how many of a particular item you have. It prints all necessary inventory 
reports and gives you instant access to any inventory item. VERSAINVENTORY allows the user 
to stay in touch with items that directly affect sales. Update INVENTORY through easy MENU 
driven processes. 

• VERSAINVENTORY allows the user to instantly add to or deduct from 
INVENTORY (IF YOU WANT IT TO) 



' NTFi0 ^CTn 
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• VERSAINVENTORY handles reorder point levels. (IF YOU WANT ITTO) 

• VERSAINVENTORY gives period-to-date and year-to-date sales reports. 
(IF YOU WANT ITTO) 

• VERSAINVENTORY can be linked to VERSARECEIVABLES and 
VERSALEDGER. (IF YOU WANT IT TO) 

• VERSAINVENTORY gives all standard INVENTORY REPORTS. (IF YOU 
WANT IT TO) 

• VERSAINVENTORY instantly values your INVENTORY. (IF YOU WANT 
IT TO) 

• VERSAINVENTORY HAS AN ALMOST UNLIMITED CAPACITY ..... 

To figure out estimated VERSAINVENTORY limitations, just multiply 8 by the number of kilobytes of disk 

storage available. For example, the store capacity on a TRS-80 MODEL II disk drive is500K That will allow 
the user to have about 4,000 inventory items on record. This total is an estimate and depends on how you 
set up your inventory system 
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ADD S3. 00 FOR SHIPPING IN UPS AREAS 
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ADD PROPER POSTAGE OUTSIDE OF U.S., 
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• • EVERYTHING FOR YOUR TRS-80™ • ATARI™ • APPLE" • 

• TRS-80 is a trademark of the Radio Shack Division of Tandy Corp. - • ATARI is a trademark of Atari Inc. - • APPLE is 
* CP/V. is a trademark of Digital Research - 'XEROX is a trademark of Xerox Corp. - 
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a trademark of Apple Corp. - " 
IBM is a trademark of IBM Cc 
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PET is a trademark of Commodore 
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Business Programs 



(ON CASSETTE OR DISKETTE) Includes 128 Page Users Manual 

Inventory Control Payroll Bookkeeping System Stock Calculations. 

Checkbook Maintenance Accounts Receivable Accounts Payable 



BUSINESS 100 PROGRAM 



NAME 



1 RULE78 


2 ANNU1 


3 DATE 


4 DAYYEAR 


5 LEASEJNT 


6 BREAKEVN 


7 DEPRSL 


8 DEPRSY 


9 DEPRDB 


10 DEPRDDB 


11 TAXDEP 


12 CHECK2 


13 CHECKBK1 


14 MORTGAGE/A 


15 MULTMOri 


16 SALVAGE 


17 RRVARIM 


18 RRCONST 


19 EFFECT 


20 FVAL 


21 PVAL 


22 LOATH PAY 


23 REGWJTH 


24 SIMPDISK 


25 DATEVAL 


26 ANNUDEF 


27 MARKUP 


28 SINKFUND 


29 BOMDVAL 


30 DEPLETE 


31 BLACKSH 


32 STOCVAL1 


33 WARVAL 


34 BOMDVAL2 


35 EPSEST 


36 BETAALPH 


37 SHARPE1 


38 OPrWRrTE 


39 RIVAL 


40 EXPVAL 


41 BAYES 


42 VALPRINF 


43 VALADINF 


44 UTILITY 


45 SIMPLEX 


46 TRANS 


47 EOQ 


48 QUEUE 1 


49 CVP 


50 CONDPROF 


51 OPTLOSS 


52 FQUOQ 


53 FQEOWSH 


54 FQEOQPB 


55 QUEUECB 


56 NCFANAL 


57 PROFlhD 


58 CAP1 



DESCRIPTION 

Interest Apportionment by Rule of the 78s 

Annuity computation program 

Time between dates 

Day of year a particular date falls on 

Interest rate on lease 

Breakeven analysis 

Straightline depreciation 

Sum of the digits depreciation 

Declining balance depreciation 

Double declining balance depreciation 

Cash flow vs. depreciation tables 

Prints NEBS checks along with dairy register 

Checkbook maintenance program 

Mortgage amortization table 

Computes time needed for money to double, triple, 

Determines salvage value of an investment 

Rate of return on investment with variable inflows 

Rate of return on investment with constant inflows 

Effective interest rate of a loan 

Future value of an investment (compound interest) 

Present value of a future amount 

Amount of payment on a loan 

Equal withdrawals from investment to leave over 

Simple discount analysis 

Equivalent & nonequivalent dated values for oblig. 

Present value of deferred annuities 

% Markup analysis for items 

Sinking fund amortization program 

Value of a bond 

Depletion analysis 

Black Scholes options analysis 

Expected return on stock via discounts dividends 
Value of a warrant 
Value of a bond 

Estimate of future earnings per share for company 

Computes alpha and beta variables for stock 

Portfolio selection model-i.e. what stocks to hold 

Option writing computations 

Value of a right 

Expected value analysis 

Bayesian decisions 

Value of perfect information 

Value of additional information 

Derives utility function 

Linear programming solution by simplex method 

Transportation method for linear programming 

Economic order quantity inventory model 

Single server queueing (waiting line) model 

Cost-volume-profit analysis 

Conditional profit tables 

Opportunity loss tables 

Fixed quantity economic order quantity model 

As above but with shortages permitted 

As above but with quantity price breaks 

Cost-benefit waiting line analysis 

Net cash-flow analysis for simple investment 

Profitability index of a project 

Cap. Asset Pr. Model analysis of project 



59 WACC Weighted average cost of capital 

60 COMPBAL True rate on loan with compensating bal. required 

61 DISCBAL True rate on discounted loan 

62 MERGANAL Merger analysis computations 

63 FINRAT Financial ratios for a firm 

64 NPV Net present value of project 

65 PR1NDLAS Laspeyres price index 

66 PRINDPA Paasche price index 

67 SEASIND Constructs seasonal quantity indices for company 

68 T1METR Time series analysis linear trend 

69 T1MEMOV Time series analysis moving average trend 

70 FUPRINF Future price estimation with inflation 

71 MAILPAC Mailing list system 

72 LETWRT Letter writing system-iinks with MAILPAC 

73 SORT3 Sorts list of names 

74 LABEL 1 Shipping label maker 

75 LABEL2 Name label maker 

76 BUSBUD DOME business bookkeeping system 

77 TIMECLCK Computes weeks total hours from timeclock info. 

78 ACCTPAY In memory accounts payable system-storage permitted 

79 INVOICE Generate invoice on screen and print on printer 

80 INVENT2 In memory inventory control system 

8 1 TELDIR Computerized telephone directory 

82 TIMUSAN Time use analysis 

83 ASSIGN Use of assignment algorithm for optimal job assign. 

84 ACCTREC In memory accounts receivable system-storage ok 

85 TERMSPAY Compares 3 methods of repayment of loans 

86 PAYNET Computes gross pay required for given net 

87 SELLPR Computes selling price for given after tax amount 

88 ARBCOMP Arbitrage computations 

89 DEPRSF Sinking fund depreciation 

90 UPSZONE Finds UPS zones from zip code 

91 ENVELOPE Types envelope including return address 

92 AUTOEXP Automobile expense analysis 

93 INSF1LE Insurance policy file 

94 PAYROLL2 In memory payroll system 

95 DILANAL Dilution analysis 

96 LOANAFFD Loan amount a borrower can afford 

97 RENTPRCH Purchase price for rental property 

98 SALELEAS Sale-leaseback analysis 

99 RRCONVBD Investor's rate of return on convertible bond 
100 PORTVAL9 Stock market portfolio storage-valuation program 



D Cassette Version (TRS-80 Only) $99.95 
□ 5-1/4" Diskette Version $99.95 

D TRS-80* Model II & CPM Versions $149.95 

ADD $3.0U FOR SHIPPING IN OPS AREAS 
ADD $4.00 FOR C.O.D. OR NON-UPS AREAS 
ADD $5.00 TO CANADA AND MEXICO 
ADD PROPER POSTAGE OUTSIDE OF U.S., 
CANADA AND MEXICO 
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ASK FOR OUR 64-PAGE CATALOG 
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^ H LINE 
(914) 425-1535 



... ALL prices AND SPECIFICATIONS SUBJECT TO CHANGE" 
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BUSINESS AND PERSONAL FINANCE 

1. CHECKBOOK MAINTENANCE 

2. TIME FOR MONEY TO DOUBLE 

3. FEDERAL FICA & WITHHOLDING TAX 

3. COMPUTATIONS 

4. HOME BUDGET ANALYSIS 

5. ANNUITY COMPUTATION 

6. UNIT PRICING 

7. CHANGE FROM PURCHASE 

8. NEBS CHECK PRINTER 

9. DAYS BETWEEN DATES 

10. MORTGAGE AMORTIZATION TABLE 

11. INVENTORY CONTROL 

12. PORTFOLIO VALUE COMPUTATIONS 

13. VALUE OF A SHARE OF STOCK 

14. SALES RECORD KEEPING SYSTEM 

15. FUTURE VALUE OF AN INVESTMENT 

16. EFFECTIVE INTEREST RATE (LOAN) 

17. PRESENT VALUE OF A FUTURE AMOUNT 

18. RATE OF RETURN VARIABLE INFLOW 

19. RATE OF RETURN-CONSTANT INFLOW 

20. REGULAR WITHDRAWAL FROM INVESTMENT 

21. STRAIGHT LINE DEPRECIATION 

22. SUM OF DIGITS DEPRECIATION 

23. DECLINING BALANCE DEPRECIATION 

24. BREAK EVEN ANALYSIS 

25. SALVAGE VALUE OF INVESTMENT 

26. PAYMENT ON A LOAN 

27. FUTURE SALES PROJECTIONS 

28. CREDIT CARD FILE 

29. ECONOMIC ORDER QUANTITY (EOQ) 
INVENTORY MODEL 

30. VALUE OF HOUSE CONTENTS 

31. TEXT EDITOR 

32. MONTHLY CALENDAR 

33. DAY OF WEEK 

34. CASH FLOW VS. DEPRECIATION 

35. COMPLETE MAIL SYSTEM 

36. INTEREST RATE ON A LEASE 
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STATISTICS AND MATHEMATICS 

37. RANDOM SAMPLE SELECTION 

38. ANGLO METIC CONVERSION 

39. MEAN, STANDARD DEVIATION, 
MAXIMUM AND MINIMUM 

40. SIMPLE LINEAR REGRESSION 

41. MULTIPLE REGRESSION ANALYSIS 

42. GEOMETRIC REGRESSION 

43. EXPONENTIAL REGRESSION 
44 SIMPLE MOVING AVERAGE 

45. SIMPLE T-TEST 

46. CHI SQUARE TEST 

47. NORMAL PROBABILITIES 

48. BINOMIAL PROBABILITY 

49. POISSON PROBABILITY 

50. MATRIX ADDITION AND SUBTRACTION 

51. MATRIX TRANSPOSE 

52. MATRIX INVERSE 

53. MATRIX MULTIPLICATION 

54. SOLUTION OF SIMULTANEOUS EQUATIONS 

55. QUADRATIC FORMULA 

56. LINEAR EQUATION SOLUTIONS 

57. ROOT HALF INTERVAL SEARCH 

58. ROOTS OF POLYNOMIALS 

59. ROOTS-NEWTON'S METHODS 

60. PRIME FACTORS OF INTEGER 

61. LEAST COMMON DENOMINATOR 

62. RADIAN DEGREE CONVERSION 

63. NUMERICAL INTEGRATION 

UTILITIES 

64. QUICK SORT ROUTINE 

65. PROGRAM STORAGE INDEX 

66. MULTIPLE CHOICE QUIZ BUILDER 

67. FORM LETTER WRITER 

68. SHELL SORT 

69. CASSETTE LABEL MAKER 

70. CODES MESSAGES 

71. MERGE TWO FILES 

72. SORT WITH REPLACEMENT 
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GRAPHICS 

73. DRAWS BAR GRAPH 

74. DRAWS HISTOGRAM 

75. MOVING BANNER DISPLAY 

GAMBLING AND GAMES 

76. RANDOM SPORTS QUIZ 
77 GOVERNMENT QUIZ 

78. HORSE RACE 

79. MAGIC SQUARE 

80. ARITHMETIC TEACHER 

81. HIGH LOW GAMBLE 

82. UNSCRAMBLE LETTERS 

83. HANGMAN 

84. GAME OF NIM 
85 RUSSIAN ROULETTE 

86. ROULETTE GAME 

87. ONE ARMED BANDIT 

88. HIT THE TARGET 

89. WALKING DRUNK 

90. STATE CAPITAL QUIZ 

91. TIC-TAC TOE 

92. DICE GAME 

93. LUNAR LANDAR GAME 

94 BIORHYTHM 

95 HORSE SELECTOR (CLASS CALCULATOR) 

96. RANDOM DICE ROLL 

97. RANDOM ROULETTE ROLL 

98. RANDOM CARD DEALER 

99. GUESS THE NUMBER 
100. WHITE OUT SCREEN 
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GUARANTEED SATISFACTION 

30-DAY MONEY BACK GUARANTEE 
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D MASTER PAC 100 CASSETTE VERSION $99.95 

□ MASTER PAC 100 DISKETTE VERSION $99.95 

□ MASTER PAC 100 (MODEL II DISKETTE VERSION) . . $149.95 



(914) 425-- 



NEW TOLL-FREE 

ORDER LINE 

(OUTSIDE OF N.Y. STATE) 

(800) 431-2818 

+ All orders processed within 24-Hours 

•k 30-Day/ money back guarantee on all Software 




CREDIT CARD NUMBER EXP. DATE. 



SIGNATURE. 



NAME • 

ADDRESS CITY STATE ZIP 

*** ADD $3 FOR POSTAGE & HANDLING - ADD $4 FOR COD. OR NON-UPS AREAS • ADD $5 CANADA & MEXICO - EXACT POSTAGE ELSEWHERE 









VERSION 2.0 



The New Enhanced Version Of The 
World's Greatest Word Processor Is Here. 



The new ELECTRIC PENCIL 2.0 for TRS-80 Models I and III 
Available for Disk, Cassette and Stringy Floppy Systems 

The ELECTRIC PENCIL System is easy to learn and easy to use - its simple command structure will make you a word processing 
expert in minutes. The ELECTRIC PENCIL Manual serves both as a quick reference guide and as a self-teaching manual, including 
pictures and examples. 
The ELECTRIC PENCIL 2.0 has more features than any other word processor for the TRS-80, including: 



D Easy lo learn-easy to use-menu driven 

D Alt settings are displayed in menus 

D Extensive HOW-TO' documentation with examples 

□ Disk version supports tape and Stringy Floppy 

D Compatible with all ASCII files (including BASIC'S) 

□ Configure program to your own format 

□ All print format settings saved with file 
D Runs on Model I and Model III 

D Runs under all versions of TRSDOS and NEWDOS 
D Fast buffer shift and type-ahead in INSERT' mode 

□ Underlining 

D No keyboard modifications required 

D Compatible with all lower case modifications 

□ Three print drivers, (parallel, serial and TRS232) 
D Recognizes high memory 

Q Uses printer DCB - you can use any print driver 
D Commands to load and save special print-drivers 
D Special print drivers may be loaded at any time 

□ Set RS232c and TRS232 options from SYSTEM menu 
D Supports serial baud rates from 110 to 9600 baud 

D Supports 1500 and 500 baud tape operations 

D Cursor speed command 

D Incomplete/'bad' loads saved for your inspection 

D 'Printer hangs' eliminated 

D All file commands use standard TRS-80 mnemonics 

D ALL versions runs with 16K, 32K or 48K 

P Automatic print formatting 

D Automatic repeating keyboard 

D Automatic 'whole word' wrap-around 



□ Cursor control - up - down - right - left 
D Cursor to end of file 

D Cursor to beginning of file 
O Tabbing 

□ Scrolling - 5 speeds forward and reverse 
D Freeze and continue scrolling 

D Cursor to top of screen 
D Cursor to beginning of line 
D Delete and insert characters 

□ Delete and insert lines 

D Erase line from cursor position to end 
D Insert and delete blocks of text 
D Backspace and erase characters 

□ Search from 1 to 38 characters at one time 

□ Replace from 1 to 38 characters at one time 

□ Search without replace 

D 'Conditional' search and replace 

D Cursor positions over 'search' character 

D Selective (wild card) search and replace 

□ Selective (wild card) search without replace 

D Search and replace carriage return and form feed 

□ Repeal command 

D Hard Space character 

D Concatenation of long lines 

D Upper and lower case shift key lock 

D Exit any command with a single keystroke 

D Automatically displays free memory 

□ Automatically displays words in file 
D Selection of cursor speeds 



□ Selective clearing of memory 

□ Set your own power-up configuration 
D Warm start command 

D Optional automatic titling 

D Optional automatic page numbering 

D Right justification 

D Left margin may be set from to 255 spaces 

D Line length may be set from 1 to 255 characters 

D Line spacing may be set from 1 to 255 lines 

D Page length may be set from 1 to 255 lines 

D Page spacing may be set from to 255 lines 

D Starting page number may be from 1 to 65535 

D Optional print length may be set to print partial files 

D Multiple printing of text files 

□ Single page printing 

D Printer configuration control: 
can lage return on/of! 
line feed on. off 

□ All options may be changed at any time 
D Loads any ASCII file 

D Compatible with all files created by previous releases 

D Easy backup ■ no fancy protection features 

O Cassette control for dictation - DICTAMATIC 

D Loads multiple files 

D Fast disk I/O - loads 36K in under 8 seconds 

D 36K text buffer (48K disk system) 

D All machine language program 

O Manual available separately 

D Source code available - THE ELECTRIC PENCIL HANDBOOK' 



The ELECTRIC PENCIL 2.0 for TRS-80 Models I and III (disk) $ 89.95 

(cassette) $ 79.95 

(stringy floppy) $ 79.95 
Also Available: 

The ELECTRIC PENCIL II for TRS-80 Model II (TRSDOS version) $325.00 

(TRSDOS version for Diablo, Qume and NEC serial printers) $350.00 

(CP/M version) $275.00 

(CP/M version for DIABLO, QUME and NEC serial printers) $300.00 



DEALER INQUIRIES ONLY: 



1260 West Foothill Blvd. 
Upland, CA 91786 



END USER ORDERS: 



ICQKIHJTROWICSt 



50 N. PASCACK ROAD 
SPRING VALLEY, NEW YORK 10977 



ALL PRICES & SPECIFICATIONS SUBJECT TO CHANGE 
DELIVERY SUBJECT TO AVAILABILITY 

NEW r O L L - F R E f ^^ --,, 

ORDER LINE ^£m **3m 



(800) 431-2818 



HOUR /<«"^^- 
24 ORDER £$*©/ 
LINE 

(914) 425 1535 



TRS-80™ is a trademark of Tandy Corp. 

FROM 

T COMPUTES ltd 




• All orders processed within 24 Hours 
• 30-Day money back guarantee 
• Add $3.00 for shipping in UPS Areas 
• Add $4.00 for C.O.D. or NON-UPS Areas 
• Add $5.00 to Canada or Mexico 
• Add exact postage to all other countries 



*** ESSENTIAL UTILITY PROGRAMS FOR EVERY TRS-80 OWNER *** 



Tadk Afoul Ravd Cmputw UtiCUy Vwquam 



'" ALL PROGRAMS ARE WRITTEN IN MACHINE LANGUAGE 

*** ABSOLUTELY NO KNOWLEDGE OF MACHINE LANGUAGE IS NECESSARY TO USE ANY OF THE UTILITY PROGRAMS 

"* EACH UTILITY PROGRAM IS CALLED UP FROM BASIC USING THE SIMPLE BASIC COMMANDS PROVIDED 

*** EACH UTILITY PROGRAM COMES WITH A RACET COMPUTES INSTRUCTION MANUAL 

*** EACH INSTRUCTION MANUAL INCLUDES SEVERAL EXAMPLES OF UTILITY USAGE 

*** EACH UTILITY ALLOWS THE USER TO PERFORM CERTAIN BASIC OPERATIONS TEN, TWENTY OR MORE TIMES FASTER THAN THE 

EQUIVALENT BASIC ROUTINE (FOR EXAMPLE, GSF CAN SORT AN ARRAY OF 1000 RANDOM NAMES INTO ALPHABETICAL ORDER IN 

UNDER9SECONDS!!) 



GSF (GENERALIZED SUBROUTINE FACILITY) 

• SORTS 1000-ELEMENT ARRAYS IN 9 SECONDS 

• SORTS UPTO 15 ARRAYSSIMUITANEOUSLY (MIXED STRING FLOATING POINT AND 
INTEGER) 

• SORTS SINGLE OR MULTIPLE SUBSTRINGS AS ASCENDING OR DESCENDING SORT 
KEYS 

• READ AND WRI rE ARRAYS TO CASSET ; E 

• COMPRESS AND UNCOMPRESS DATA IN MEMORY 

• MOVE ARRAYS IN MEMORY 

• DUPLICATE MEMORY 

• FAST HORIZONTAL AND VERTICAL LINES 

• SCREEN CONTROLS FOR SCROLLING THE SCREEN UP. DOWN, LEFT. RIGHT AND FOR 
GENERATING INVERSE GRAPHIC DISPLAYS 

• ADDS PEEKS AND POKES (MOD-II VERSION ONLY) 



MODEL-I VERSION $25 00 

MODEL-II VERSION $50 00 

MODEL-III VERSION $30.00 



KFS-80 (KEYED FILE SYSTEM) 

• CREATE ISAM FILES (INDEX SEQUENTIAL ACCESS METHOD) 

• ALLOWS INSTANT ACCESS TO ANY RECORD ON YOUR DISKETTE 

• INSTANTLY RETRIEVE RECORDS FROM MAILING LISTS. INVENTORY. ACCOUNTS 
RECEIVABLE OR VIRTUALLY ANY APPLICATION WHERE RAPID ACCESS IS RE- 
QUIRED TO NAMED RECORDS 

• PROVIDES THE BASIC PROGRAMMER THE ABILITY TO RAPIDLY INSERT OR ACCESS 
KEYED RECORDS IN ONE OR MORE DATA FILES 

• RECORDS ARE MAINTAINED IN SORTED ORDER BY A SPECIFIED KEY 

• RECORDS MAY BE INSERTED OR RETRIEVED BY SUPPLYING THE KEY 

• RECORDS MAY BE RETRIEVED SEQUENTIALLY IN SORTED ORDER 

• RAPID ACCESS TO ANY FILE REGARDLESS OF mE NUMBER OF RECORDS 

• MULTIPLE INDEX FILES CAN BE EASILY CREATED WHICH ALLOWS ACCESS OF A 
SINGLE DATABASE BY MULTIPLE KEYS (FOR EXAMPLE. BY BOTH NAME AND ZIP- 
CODE i 

MODEL-I VERSION $100.00 

MODEL-II VERSION $175.00 

MODEL-III VERSION $100.00 



DSM (DISK SORT MERGE) 

• SORT AN 85K DISKETTE IN LESS THAN THREE MINUTES! 

• SORTS LARGE MULTIPLE DISKETTE FILES ON A MINIMUM ONE DRIVE SYSTEM 

• ALL RECORDS ARE PHYSICALLY REARRANGED-NO KEY FILES ARE REQUIRED 

• SORTS RANDOM FILES CREATED BY BASIC, INCLUDING FILES CONTAINING SUB- 
RECORDS SPANNING SECTORS 

• SORTS ON ONE OR MORE FIELDS IN ASCENDING OR DESCENDING ORDER 

• FIELDS MAY BE STIRNGS, INTEGER. BINARY INTEGER OR FLOATING POINT 

• THESORTEDOUTPUT FILEMAYOPTIONALI YHAVEFIELDSDELETED. REARRANGED 
OR PADDED 

• SORT COMMANDS CAN BE SAVED FOR REUSE 

• SINGL E SOR r, MERGE OR MIXED S CRT MERGE OPERA PONS MA ■ BE PERFORMED 

• SORTED OUTPUT MAY BE WRITTEN TO A NEW FILE. OR REPLACE THE ORIGINAL IN- 
PUT FILE 



MODEL I VERSION $75 00 

MODEL-II VERSION $150.00 

MODE1 III VERSION $90 CO 



MAIL-LIST (A MAILING LIST DATABASE SYSTEM) 

• IDEALLY SUITED FOR ORGANIZATION MAILING LISTS. PERSONAL ADDRESSBOOK. 
OR MAILING LISTS BASED ON DATES SUCH AS REMINDERS FOR BIRTHDATES OR 
DUES PAYABLE 

• USED ISAM (INDEX SEQUENTIAL ACCESS METHOD) FOR RAPID ACCESS TIMES 

• YOUR MAILLIST CAN ALWAYS BE SORTED AND MAINTAINED BY UP TO FOUR INDEX 
FILES (FOR EXAMPLE. NAME. ZIPCODE. DATE AND NUMBER) 

• MAILLIST ALLOWS UP TO 30 ATTRIBUTES TO BE SPECIFIED (TO BE USED IN SEL- 
ECTION OF SPECIFIED RECORDS WHEN GENERATING REPORTS OR MAILING 
LABELS 

• MAILLIST SUPPORTS BOTH 5 OR 9-DIGIT ZIPCODES 

• PRINTING MAY BE STARTED OR ENDED AT ANY POINT IN THE LIST. THEUSERCAN 
SPECIFY FIELDS OR CODES TO BE PRINTED 

• CAPACITY IS 600 NAMES FOR MODEL-I .3500NAMES FOR MODEL 1 1. 38. 0G0NAMES FOR 
MODEL II WITH HARD DISK DRIVF 1200 NAMES FOR MODEL III 

MODEL-I VERSION $75 00 

MODEL-II VERSION $150.00 

MODEL-III VERSION $75.00 



CQMPUTRQNICS? 



HSDS HARD DISK DRIVE SOFTWARE 

• MAKES TRSDOS COMPATIBLE WITH MOST HARD DISK DRIVES. 

• ADDS MANY EXTRA FEATURES TO TRSDOS 



MODEL II FASTBACK — FULL DISK BACKUP 
IN 55 SECONDS 

IN BUSINESS TIME IS MONEY. AND ONE BACKUP IS WORTH A THOUSAND TEARS. 

• WORKS ON SYSTEMS WITH 2 OR MORE DRIVES 

• CAN REPLACE YOUR EXISTING TRSOOS 1.2 or 2 BACKUP UTILITY 

MODEL M ONI Y 17' 00 



COMPROC (COMMAND PROCESSOR) 

• AUTO YOUR DISK TO PERFORM ANY SEQUENCE OF INSTRUCTIONS THAT YOU 
NORMALLY GIVE FROM THE KEYBOARD (FOR EXAMPLE. INSERT THE DISKETTE. 
PRESS THE RESET BUTTON. YOUR COMMAND FILE COULD AUTOMATICALLY SHOW 
YOU THE DIRECTORY. SHOW THE FREE SPACE ON THE DIKSETTE. LOAD A MA- 
CHINE LANGUAGE SUBROUTINE. LOAD BASIC. LOAD AND RUN A BASIC PROGRAM, 
AND SELECT A GIVEN ITEM ON YOUR MENU. .ALL WITHOUT TOUCHING THE KEY- 
BOARD 1 ) 

MODEL-I VERSION $20.00 

MODEL-MI VERSION $30.00 

NOT AVAILABLE FOR MODEL-II 



MODEL-II UTILITY PACKAGE 



DISCAT (DISKETTE CATALOG SYSTEM) 

• THIS COMPREHENSIVE DISKETTE CATALOGUING/INDEXING UTILITY ALLOWS THE 
USER TO KEEP TRACK OF THOUSANDS OF PROGRAMS IN A CATEGORIZED LI- 
BRARY FILE INCLUDES PROGRAM NAMES AND EXTENSIONS. PROGRAM LENGTH. 
DISKETTE NUMBERS AND FREE SPACE ON EACH DISKETTE KEEP A COMPLETE 
CATALOG OF THE DIRECTORIES ON ALL YOUR DISKETTES IN ALPHABETICAL 
ORDER (SORTED ON EACH DISKETTE. OR COMPLETE ALPHABETICAL LIST OF 
PROGRAMS ON ALL YOUR OISKETTES) 

MODEL-I VERSION $50.00 

MODEL-MI VERSION $50.00 

MODEL-II VERSION (SEE MODEL-II UTILITY PACKAGE) 



ESSENTIAL FOR EVERY MOD-II OWNER 

RECOVER AMI; REPAIR Fll ES AND DIRECTOR ES (Rv JUST ENTERING A SINGLE 
COMMAND) 

XCOPY SIMILAR TO COPY BUT CAN COPY ANY NUMBER OF FILES AT ONE TIME 
FASTER AND MORE ACCURATE THAN COPY SINCE RECORDS ARE COPIED IN 
GROUPS RATHER THAN ONE RECORDS AT A TIME USING XCOPY YOU CAN COPY 
FILES THAT CAN NOT BE COPIED USING THE COPY COMMAND 
SZAP... PROVIDES THE CAPABILITY TO READ AND MODIFY ANY SECTOR ON A 
DISKETTE 

XHIT ...CAN BE USED TO REPAIR A DISKETTE DIRECTORY 

DCS DIRECTOR CATALOG SYSTEM IS A UTILITY FOR THE MANAGEMENT OF USER 
DISKETTES-SETS OF A MULTIPLE DISKETTE DIRECTORY FILE (WITH UP TO 1200 
INDIVIDUAL FILE NAMES). ALLOWS SELECTIVELY LISTED OR PRINTED LISTS OF 
DIRECTORY FILES IN COMBINED SORTED ORDFR (FOR EXAMPl I ISTED ALPHA- 
BETICALLY BY DISKETTE. OR A COMPOSITE ALPHABETICAL LIST OF ALL YOUR 
DISKETTES') 

DEBUG-II. .ADDS SEVERAL FEATURES TO THE PRESENT TRSDOS DEBUG UTILITY 
INCLUDING SINGLE INSTRUCTION CYCLE. AUTO (LOOP) BREAKPOINTS. SUB- 
ROUTINE CAI LING \'P{:^< KEY DETECTION AND MANY OTHERS 



MODEL-II ONLY 



BLINK (BASIC LINK FACILITY) 

• LINK TROM BASIC PROGRAM TO ANOTHER SAVING ALL. VARIABLES 

• THE CHAINED PROGRAM MAY EITHER REPLACE THE ORIGINAL PROGRAM OR CAN 
BE MERGED BY STATEMENT NUMBER 

MODEI - /EHSU >N $25.00 

MODEL-MI VERSION $50.00 

MODEL-II VERSION (SEE MODEL-II UTILITY PACKAGE) $30 00 



MODEL-II DEVELOPMENT SYSTEM 

• THIS PACKAGE IS A MUST FOR ASSEMBLY LANGUAGE PROGRAMMERS 

• INCLUDES THE MICROSOFT EDITOR ASSEMBLER PLUS WITH ENHANCEMENTS FOR 
THE MODEL-II 

. A COMPLETE DISASSEMBLER 

• SUPERZA" FOR READING AND MODIFY ANY SELECTOR ON A DISKETTE 



MODEL-II ONLY 



$125 00 



INFINITE BASIC 



• ADDS OVER 80 COMMANDS TO BASIC 

• SORTING. ..STRING CENTERING/ROTATION/TRUNCATION.. JUSTIFICATION-DATA 
COMPRESSION-STRING TRANSLATION/COPYING. ..SCREEN DISPLAY SCROLL- 
ING MATRIX OPERATIONS SIMULTANEOUS EQUATIONS (THROUGH MATRIX 
INVERSION) DYNAMIC ARRAY RESHAPING 

MODEL-I VERSION $50.00 

MODEL-III VERSION $60 00 

NOT AVAILABLE ON MODEL-II 



MOD-II BASIC CROSS REFERENCE UTILITY 

• LIST OR PRINT A SORTED CROSS REFERENCE TO ALL NUMBERS OR VARIABLES 
WITHIN A PROGRAM 

• LIST OF PRINT ALL LINE NUMBERS CONTAINING A SPECIFIED STRING OF CHAR- 
AC! ERS 



MODFL-II ONLY 



.S50 00 



*** ALL PRICES AND SPECIFICATIONS SUBJECT TO CHANGE "* 



INFINITE BUSINESS 



• ADD ON PACKAGE TO INFINITE BASIC (REQUIRES INFINITE BASIC) 

• ADDS PACKED DECIMAL ARITHMETIC WITH 127 DIGIT ACCURACY (♦.0,'./) 

• COMPLETE PRINTER PAGINATION CONTROLS ..AUTO HEADERS. FOOTERS AND 
PAGE NUMBERS 

• BINARY SEARCH OF SORTED AND UNSORTED ARRAYS (INSTANT SEARCH OF AN 
El EMENT WITHIN AN ARRAY) 

- hash CODES 

MODEL i VERSION 53C 00 

MODEL-III VERSION $30 00 

NOT AVAILABLE ON MODEL-II 



END USERS 
CALL: 



REMODEL-PROLOAD 



THE ULTIMATE RENUMBERING PROGRAM ..RENUMBERS ALL OR PART OF A PRO- 
GRAM (ALLOWS PARTIAL RENUMBERING IN MIDDLE OF PROGRAMS) 
PARTIAL OR COMPLETE MERGE OF TWO CASSETTE PROGRAMS 



MODEL-I VERSION 

MODEL-MI VERSION 

NOT AVAILABLE ON MODEL-II 



.$35.00 
.$35.00 



HOUR , 
24 ORDER L 
LINE 

(914) 425-1535 



iCQMPLJTRQNICS? 



50 N. PASCACK ROAD 
SPRING VALLEY, NEW YORK 10977 

NEW TOLL-FREE 
ORDER LINE 

(OUTSIDE OF NY. STATE) 

(800) 431-2818 

ADD $3.00 FOR SHIPPING IN UPS AREAS 
ADD $4.00 FOR C.O.D. OR NON-UPS AREAS 
ADD $5.00 TO CANADA AND MEXICO 
ADD PROPER POSTAGE OUTSIDE OF U.S., 
CANADA AND MEXICO 



COPSYS 



• COPY AND VERIFY ALL MACHINE LANGUAGE (SYSTEM) TAPES WRITTEN IN STAND- 
ARD FORMAT. ..IF YOU BUY A MACHINE LANGUAGE PROGRAM, COPSYS ALLOWS 
YOU TO EASILY COPY THE PROGRAM ONTO ANOTHER CASSETTE AS A BACKUP 

MODEL-I VERSION $-5 00 

MODEL-III VERSION $20.00 

NOT AVAILABLE ON MODEL-II 



FOR DEALER 
INFORMATION CALL: 



RACET COMPUTES - ^ 



1330 N. GLASSEL, SUITE M, ORANGE CA 92667 
(714) 997-4950 




cs 



80™ • APPLE™ • • 

I Tandy Corp. - • APPLE is a trademark oi Apple Corp. 



from 





Level III 



Add new dimensions to your Level 
Feature inrii ide: 

1. Advanced graphics! New commands to do plotting 
etc.! 

2. Renumber a basic program! 

3. Single stroke instructions. Type 1 key to get full 
command print outs like PRINT, EDIT ETCJ 

4. New save and load commands. Replaces level II 
CSAVE and CLOAD! Improves loading reliability! 

5. INPUT#LEN and LINEINPUTSLEN. Allows you to 
write programs that set a time limit on INPUTS! 

6 Keyboard Debounce. Prevents . evel II key bounce 
problems. 

7. Spelled out error messages. 

8. 10 user defined routines. 

9. LINEPUT command. 
10 Flexible MID routines. 
11. I NSTR function. 

1? Use: defined (unctions 

13. Hex and Octal Conversions! 

TRS-80 (MODEL I) (tape) $29.95 

TRS-80 (MODEL I) (disk) $49.95 




Typing Tutor 



* FOR THE PROGRAMMER: Learn how to type your 
programs in faster with less mistakes! 

* FOR THE STUDENT: There is no easier or faster 

way to learn typing 1 

* FOR THE YOUNGSTER: Learning to type at an 
early age can lead to better language skills! 

* FOR THE "SOMETIMES" TYPIST: Clean up BAD 

HABITS 

TRS-80 MOD I & MOD III $19.95 (tape only) 

APPLE $24.95 (disk) 




Editor Assembler Plus: 

Includes MACRO tai ihties assemble directly into mem- 
ory, expression, evaluator, auto ORG, quash command, 
move and copy, edit, substitute, extend, ZBUG, Super D- 
Bugger 80 page reference manual and handy reference 
card! 16K Level II PMC/TRS-80. 

TRS-80 MOD I (tape) $29.95 

TRS-80 MOD I & III (disk) $49.95 




rosoft's muMATH and 
Extended muMATH 

Now a!i vol mathematicians out there can use your com ou- 
ter to answei complicated math equations with extended 
Algebraic equations for answers and much much more. The 
finest Math System previously available only on large com- 
puter systems is now available for the TRS or pmc-80. 

32K $74.95 

32K 249.95 



Now The Softcard Can Take 
You Beyond The BASICS. A PP'e Softcard 

$399.00 

The following Software requires the 
"Softcard" from Microsoft 

FORTRAN, Disk 195.00 

Z80 Disk Assembler, Disk 1 25.00 

BASIC, Compiler, Disk 395.00 

COBOL, Disk 750.00 

MUmath Extended, Disk 250.00 

RAMCARD 16K 195.00 

APPLESOFT COMPILER-TASC 175.00 



BASIC COMPILER 



$195.00 




With TRS-80'" BASIC Compiler, your Level II programs will run 
at record speeds! Compiled programs execute an average of 3-10 
times faster than programs run under Level II. Make extensive use 
of integer operations, and get speeds 20-30 times faster than the 
interpreter. 

Best of all, BASIC Compiler does it with BASIC, the language 
you already know. By compiling the same source code that your 
current BASIC interprets, BASIC Compiler adds speed with a 
minimum of effort. 

And you get more BASIC features to program with, since 
features ot Microsoft's Version 5.0 BASIC interpreter are included 
in the package. Features like the WHILE. .WEND statement, long 
variable names, variable length records, and the CALL statement 
make programming easier. An exclusive BASIC Compiler features lets you call FOR- 
TRAN and machine language subroutines much more easily than in Level II. 

Simply type in and debug your program as usual, using the BASIC interpreter. Then 
enter a command line telling the computer what to compile and what options to use. 

Voila! Highly optimized, 2-80 machine code that your computer executes in a flash! 
Run it now or save it for later. Your compiled program can be saved on disk for direct 
execution every time 

Want to market your programs? Compiled versions are ideal for distribution. You 
distribute only the object code, not the source, so your genius stays fully protected. 

BASIC Compiler runs on your TRS-80" Model I with 48K and disk drive. The package 
includes BASIC Compiler, linking loader & BASIC library with complete documentation. 




Adventure 



The original adventure for your TRS-80 and APPLE 1 Don't 

take substitutes 1 Requires 3?K i Disk 

MODEL I / APPLE $29.95 




* 4 1. a ►" 



Olympic Decathlon 

The most beautiful graphic display ol loo human body in 
actioo All the Decathlon events are depicted in excellent 
graphics with you at the keyboard control Snot put Long 
jump, High jump, Hurdles Pole vaio;! For- tor the whole 
family. 

TRS-80 $29.95 (tape) 

TRS-80 $29.95 (disk) 

APPLE $29.95 (disk) 




Microsoft's FORTRAN 

Now you too can program in FORTRAN. This package was 
previously priced at S350.00! New low price! 

$99.95 

Microsoft's Disk Macro Assembler 

The best assembler-editor around! Original price was 
$350.00! NEW PRICE! 

$99.95 



rVXATV^fvWT Oil !_ 



50 N. PASCACK ROAD 
SPRING VALLEY, NEW YORK 10977 



HOUR 
24 ORDER 
LINE 

(914) 425-1535 




NEW TOLL-FREE 
ORDER LINE 

(OUTSIDE OF NY STATE) 

(800) 431-2818 

ADD $3.00 FOR SHIPPING IN UPS AREAS 
ADD $4.00 FOR COD. OR NON-UPS AREAS 
ADD $5.00 TO CANADA AND MEXICO 
ADD PROPER POSTAGE OUTSIDE OF U.S.. 
CANADA AND MEXICO 



ALL PRICES AND SPECIFICATIONS SUBJECT TO CHANGE*** 



EVE! 



FOR YOUR TRS-80™ MODEL I or MODEL HI • 

• TRS-80 is 4 ir jdf nurk ol Ihe Radio Shack Division of Tandy Corp. 



introduces 



UKJO 

For the 80s— 

an enhanced NEWDOS 

for your TRS-80™ 










Apparat, Inc., announces the most powerful Disk Operating System tor the 
TRS-80". It has been designed for the sophisticated user and professional 
programmer who demands the ultimate in disk operating systems. 



DOUBLE DENSITY ON MODEL I 

Use of the LNW DOUBLE or the PERCOM DOUBLER will expand storage 80% under 

NEWDOS/80 Version 2.0. mixing single and double density specifications without 

any patches. 

SINGLE DENSITY ON MODEL III 

Will allow the MODEL III to read disk from MODEL I and to write disks the MODEL t 

can read, making it easy to move programs between the two machines 

EXPANDED DIRECTORIES 

Directories can be expanded three times the normal numberof available entries, even 

on DOS disks. This is extremely useful when using double density. 

DYNAMICALLY MERGE IN BASIC 

To allow sections of BASIC programs to be deleted and replaced with lines from a 

disk file during program execution Also allows merging of non-ASCII format files. 

SELECTIVE VARIABLE CLEARING 

Allows the programmer to keep some variables and release the space used by the rest. 

also specific variables may be erased releasing the space they use 

PAGE SCROLLING IN BASIC 

Scrolling ha:, been modified to allow the iser to display programs page by page in 

addition to the regular line scrolling. 

REPEAT FUNCTIONS 

Keys in MODEL I repeat when held down Entering "R" as a DOS command causes the 

previous DOS command to be repeated. 

ROUTING FOR DEVICE HANDLING 

To send input and output from one device (display, printer, keyboard, etc.) toothers 

or to a routine in main memory. 

DISASSEMBLER OUTPUT TO DISK 

The Disassembler will now write a source code file to disk, which the editor assembler 

can read and edit 

CHAINING ENHANCEMENTS 

Features to allow chain files to be written from SCRIPSIT: also chaining may be 

switched on and off without changing chain file positioning, and may be executed via 

CMD "xxx" and DOS-CALL 

SUPERZAP 

Has the ability to scan diskettes or disk files to find the occurences of specific values. 

Also will generate disk file passwords and hashcode. 

FAST SORT ROUTINE 

Basic function CMD "O" provides direct or indirect in-memory sort of multiple arrays. 

MERGING OF NON-ASCII BASIC PROGRAMS 

BASIC SINGLE STEPPING 



New 8ASIC commands that supports files with variable record lengths up to 4095 
Bytes long. 

Mix or match disk drives. Supports any track count from 18 to 80. Use 35. 40 or 77 
track 5" mini disks drives or 8" disk drives, or any combination. 

A security boot-up for BASIC or machine code application programs. User never sees 
"DOS READY" or " > READY" and is unable to "BREAK", clear screen, or issue any 
direct BASIC statement including "LIST " 
New editing commands that allow program lines to be deleted from one location and 

moved to another or to allow the duplication of a program line with the deletion of the 
original 

Enhance and improved RENUMBER that allows relocation of subroutines 
CDE function, simultaneous striking of theC. Dand E keys will allow the user to enter 
a mini-DOS to perform some DOS commands without disturbing the resident pro- 
gram. 

Upward compatible with NEWDOS 2.1 and TRSDOS 2 3. 
Includes Superzap 3.0 and all Apparat 2.1 utilities. 



•CQMPJTRQNICS; 



V\A-v«Mfl' 



50 N. PASCACK ROAD 
SPRING VALLEY, NEW YORK 10977 



NEW TOLL-FREE 

ORDER LINE 

(OUTSIDE OF NY. STATE) 

(800) 431-2818 




HOUR 
24 ORDER 
LINE 

(914) 425-1535 



NEW DOS/80 

(TRS-80 MODEL I or MODEL III) $149.00 



* ADD $3.00 FOR SHIPPING IN UPS AREAS 

* ADD $4.00 FOR COD. OR NON-UPS AREAS 

* ADD $5.00 TO CANADA AND MEXICO 

* ADD PROPER POSTAGE OUTSIDE U.S., CANADA & MEXICO 



** ALL PRICES AND SPECIFICATIONS SUBJECT TO CHANGE" 



• •• EVERYTHING For 

' TRS-80'" is a trademark of Tandy Corp. 



: >™:iVisOFT, 



• All orders processed within 24 Hours 
• 30-Day money back guarantee 
•Add S3.00forshipping in UPS Areas 
• Add $4.00 for COD. or NON-UPS Areas 
• Add $5.00 to Canada or Mexico 
• Add exact postage to all other countries 



!HM»«SD.»S< 



Let Your TRS-80 1 
Teach You 



TT 



■MBmHaBBHanaasHna 



REMASSEM-1 

Tired of buying book after book on assembly language programming and 
still not knowing your POP from your PUSH? 

R t MSOFT proudly announces a more efficient way, using your own 
TRS-80'" to learn the fundamentals of assembly language programming 
at YOUR pace :ma at YOUR convenience 

Our unique package, "INTRODUCTION TO TRS-80'" ASSEMBLY 

PROGRAMMING", will provide you with tne following: 

* Ten 45-minute lessons on audio cassettes 

* A driver program to make your TRS-80'" video monitor serve as a 

blackboard for the instructor. 

* A display program for each lesson to provide illustration and rein- 
forcement for what you are hearing. 

* Step-by-step dissection of complete and useful routines to test 

memory and to gain direct control over the keyboard, video moni- 
tor and printet 

* How to access and use powerful routines in your Level II ROM. 
This course was developed and recorded by Joseph E Willis and is based 
on the successful series of courses he has taught at Meta Technologies 
Corporation, the Radio Shack Computer Center, and other locations in 
Northern Ohio. The minimum system required is a Level II, 16K RAM. 






LEARN TRS-80™ 
ASSEMBLY LANGUAGE 

DISK I/O 

REMDISK-1 

Your disk system and you can reallystep out with REMsof-t s Educational 
Module, REMDISK-1, a "short course" revealing the details of DISK I/O 
PROGRAMMING using assembly language 



Using the same format as our extremely popular introduction to assem- 
bly language programming, this "ASSEMBLY LANGUAGE DISK I/O 
PROGRAMMING" course includes: 

* Two 45-minute lessons on audio cassette 

* A driver program to make your TRS-80'" video monitorserve as a 
blackboard for the instructor 

* A display program for each lesson to provide illustration and rein- 
forcement for what you are hearing 

* A booklet of comprehensive, fully-commented program listings 
illustrating sequential file I/O. random-access file I/O, and track 
and sector I/O. 

* A diskette with machine-readable source codes for ail programs 
discussed, in both Radio shack EDTASM and Macro formats. 

* Routines to convert from one assembler format to the other. 
This course was developed and recorded by Joseph E. Willis, for the 
student with experience in assembly language programming; it is an 
intermediate-to advanced-level course Minimum hardware required is a 
Model I Level II, 16K RAM one disk drive system 



■CQMPLTTRQNICS! 



50 N. PASCACK ROAD 
SPRING VALLEY, NEW YORK 10977 



PLEASE SEND ME: 

□ REMASSEM-1 (TRS-80 MODEL I CASSETTE) . 

□ REMASSEM-1 (TRS-80 MODEL I DISKETTE) . . 
D REMASSEM-1 (TRS-80 MODEL III CASSETTE) 

□ REMASSEM-1 (TRS-80 MODEL III DISKETTE) 
D REMDISK (TRS-80 MODEL I DISKETTE) 





$74 95 
S79 95 
$74.95 
$79.95 
$29.95 



HOUR 
24 ORDER 
LINE 



(914) 425-1535 




Dealer inquiries 

REMsoft, INC. 

571 East 185th Street 

Euclid, Ohio 44119 

(216) 531-1338 



NEW TOLL-FREE 

ORDER LINE 

(OUTSIDE OF NY. STATE) 

(800) 431-2818 



CREDIT CARD NUMBER EXP. DATE 

SIGNATURE NAME 



ADDRESS CITY STATE 

*** ALL PRICES AND SPECIFICATIONS SUBJECT TO CHANGE 



ZIP. 




YOUR TRS-80 



* TRS-80' 



is a trademark of the Radio Shack Division of Tandy Corporation 

• All orders processed within 24-Hours 
•k 30-Day money back guarantee on all TRSDOS Software 
*Add $3.00 for shipping in UPS Areas 
-kAdd $4.00 for COD. or NON-UPS Areas 
+Add $5.00 outside U.S.A., Canada & Mexico 
* We will match any bonafide advertised price 
in any of the Major Computer Magazines 
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(1) ELECTRIC PENCIL (Michael Shrayer Software).... 
Complete word processor with extensive editing and 

printer formatting features $325 

(S r ANDARD TRSDOS VERSION) $350 

(DIABLO, NEC OR OUMt TRSDOS VERSION) 

(2) GENERAL LEDGER, ACCOUNTS RECEIVABLE. 
ACCOUNTS PAYABLE. INVENTORY CONTROL. 
INVOICING AND PAYROLL (Small Business Systems 
Group) an extensive business system for the serious 
user, can be used one module at a time or as a co- 
ordinated system... $295... per module... $1299 for the 
complete system. 

(3)FASTBACK (Race! Computes) A full disk backup 
in 55 seconds on systems with 2 or more disk drives - 
including verification. Can replace your existing TRS- 
DOS 1 2 or 2 Backup Utility $75.00 

(4) MOD-II UTILITY PACKAGE (Racet Computes)., 
adds important utilities to TRSDOS copy files 
selectively ..faster and more accurate file copying... 
repair bad directories displays sorted directory of 
all files on 1 to 4 disk drives SUPERZAP ..change 
disk ID and more $150 

(5) ADVENTURE »1-»12 (Scott Adams - Adventure 
International) a series of games formally only 
available on the large computers your goal is to work 
your way through a maze of obstacles in order to 
recover a secret treasure or complete a mission the 
package includes all 12 Adventures written by Scott 
Adams $129.95 

(6) GSF (Racet Computers) Generalized Subroutine 
Facility, a series of super fast machine language 
utilities that can be called from a BASIC program (no 
machine language knowledge required) sorts 1QQQ 
items in under 5 seconds allows PEEK and POKE 
statements move data blocks compress and un- 
compress data works under TRSDOS $50 

(7) DSM (Racet Computes) Disk Sort Merge, sorts 
and merges large multiple diskettes files on a 1 to 4 
drive system NOT AN IN MEMORY SORT can 
actually alphabetize (or any other type of sort) 4 disk 
drives worth of data sorts one complete disk of 
information in 10 minutes information is provided to 
use DSM with the RS MAILING PROGRAM works 
under TRSDOS $160 

(8) RSM (Small Systems Software) a machine 
language monitor and disassembler can be used to 
see and modify memory of disk sectors contains all 
the commands found on the Model-I version plus 
some additional commands for the MOD-II works 
under TRSDOS $39.95 

(9) BLINK BASIC LINK FACILITY (Racet Computes) 
Link from one BASIC program to another saving all 
variables chain program without losing variables 
$50 

(10) BASIC CROSS REFERENCE UTILITY (Racet 
Computes), lists all variables and strings used in a 
program (with the line numbers in which they appearl 

lists all GOTO's (with the line num- 
bers in which they appear) searches for any specific 
variables or strings (with the line number in which 
they appear) $50 

(11) DEVELOPMENT PACKAGE (Racet Computes) 
SUPERZAP (to see. print or change any byte on a 
diskette). Disassembler and MOD-II interface to the 
MICROSOFT EDITOR ASSEMBLER PLUS including 
uploading services and patches for Disk I/O. assemble 
directly into memory save all or portions of source 
to disk dynamic debug facility (ZBUG). entended 
editor commands $125 



(12) HARD/SOFT DISK SYSTEM (Racet Computes) 
The software essential to interface any of the copula: 
large hard disk drives... completely compatible with 
your existing software and files. ..allows up to 20 
megabytes of storage (and large') directory expand- 
able to handle thousands of files $400 

(13) CAMEO HARD DISK DRIVE CONTROLLER... 

CALL FOR PRICF 

(14) HARD DISK DRIVES CALL FOR PRICE 

(15) H a E COMPUTRONICS, INC. SHARE-A-PRO- 
GRAM DISKETTE #1... works under TRSDOS a 
collection of programs written by MOD-II owners, 
programs include data base management a word 
processor, mail system mortgage calculations- 
Checkbook register and many others $12 FREE if 
you send us a diskette containing a program that can 
be added to the SHARE-A-PROGRAM DISKETTE. 

(16) WABASH CERTIFIED DISKETTES $39 95 

(per box of 10) 

(17) FLIP SORT DISKETTE STORAGE TRAY Stores 
50 diskettes comes complete with index-dividers, tilt 
plates and adjustable spacing $44 95 

(18) MASTER PAC 100 100 essential programs 
BUSINESS PERSONAL FINANCE STATISTICS 

MATH GAMBLING GAMES- includes 125 page 
manual and 2 diskettes $99 95 

(19) BUSINESS PAC 100 100 essential business 
programs INVENTORY CONTROL PAYROLL 
BOOKKEEPING SYSTEM STOCK CALCULA- 
TIONS CHECKBOOK MAINTENANCE AC- 
COUNTS RECEIVABLE ACCOUNTS PAYABLE... 

includes 125 page manual and two diskettes $149.95 

(20) EDITOR ASSEMBLER (Galactic Software Ltd .)... 
The first user oriented Editor Asssembler for the 
MODEL II and was designed to utilize all the features 
of the MODEL II It includes innovative features for 
ease of coding and debugging and complete docu- 
mentation (over 120 pages! works under TRSDOS 
S179 

(21) BASIC COMPILER (Microsoft! changes your 
source program into machine language increases 
program execution by 3 10 times $395 

(22) MAIL/FILE SYSTEM from Galactic Software Ltd 
Stores 2.500 names per disk No sorting time is 
required since the file is automatically sorted by first 
and last name plus Zip Code on input Retrieve by any 
combination of 19 user codes Supports an 11 digit 
alphanumenca Zip Supports a message line Comes 
complete with user-oriented documentation (100- 
page manual) Allows for company name and individ- 
ual of a company and complete phone number (and 
extension) works under TRSDOS $1 99.00 

(23) INCOME TAX PAC Professional income tax 
package . most forms and schedules output to video 
or line printer automatic memory storage of all 
information data can be loaded from diskette 
changed and edited built in error checking $199.95 

(24) COMPUTER GAMES (SBSG) Mean Checker 
Machine. Star-Trek III. Concentration. Treasure Hunt. 
Banco. Dog Star Adventure $74.95 

(25) INTERACTIVE FICTION. ..is a story-teller using a 
computer, so that you. the reader, can actually take 
part in the story instead of merely reading . $69 95 
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50 N. PASCACK ROAD 
SPRING VALLEY, NEW YORK 10977 




NEW TOLL-FREE 
ORDER LINE 

(OUTSIDE OF NY STATE) 

(800) 431-2818 



HOUR 
24 ORDER 
LINE 



(1) CP/M (Lifeboat Associates), an alternative 
operating system for the MOD-II that allows MOD-II 
owners to use any of the hundreds of programs 
available under CP/M $170 

(2) CP/M HANDBOOK. (Sybex) a step-by-step 

guide to CP/M takes the reader through each of the 
CP/M commands numberous sample programs., 
practical hints reference tables $14 95 

(3) GENERAL LEDGER, ACCOUNTS RECEIVABLE. 
ACCOUNTS PAYABLE, INVENTORY CONTROL, 

AND PAYROLL (Peachtree Software) requires CP/M 
and MICROSOFT BASIC ..professional business 
systems, turn key operation can be used as single 
modules or as a coordinated system $500 per 
module $2500 for the complete system 

(4) WORD-STAR The ultimate word processor a 
menu driven word processing system that can be used 
with any printer All standard word processing 
commands are included plus many unique com- 
mands only found on WORD STAR, requires CP/M 
$49500 

(5) mail LIST MERGE An add on package that 
allows the user to send form letters (created on 
WORD-STAR) to any compiled mailing list (using any 
CP/M based MAIL program such as the PEACHTREE 
MAIL PROGRAM) requires CP'M WORD STAR and 
CP/M based mail program $150 

(6) CBASIC-2 a non-interactive BASIC used for 
many programs that run under CP/M allows user to 
make more efficient use of disk files eliminates the 
use ol most line number references require on such 
programs as the SELECTOR $120 

(7) MICROSOFT BASIC an enhanced version of the 
MICROSOFT BASIC found on TRSDOS adds 
commands such as chaining (allows the user to LOAD 
and RUN a new program without losing the variables 
currently in memory), long variable length file 
records. WHILE/WEND and others can be used with 
the BASIC COMPILER to speed up programs (3-I0 
times faster execution) $325 

(8) ELECTRIC PENCIL (Michael Shrayer Software) 
Complete word processor with extensive editing 

and printer formatting features $274 

(Standard printer version) $300 

(DIABLO NEC or OUME version). 

(9) BASIC COMPILER (Microsoft) changes your 
source programs into machine language increases 
program execution by 3-10 times . . $395 

(10) SELECTOR V (Micro-Ap) ..The ultimate data 
management system user defined fields and codes 
manages any list defined by the user includes addi- 
tional modules for simplified inventory control, 
accounts receivable and payable data file format 
conversions full page report formatter computa- 
tions global search and replace data text merging 
hard disk compatible requires CBASIC-2 $495 

(11) T/MAKER II (Lifeboat Associates) The most ad- 
vanced utility for the analysis and presentation of 
numerical data and text material just set up your 
data in columns and rows, and T /Maker II does the rest 

change any number in the model and all the others 
are adjusted and recalculated 300-character wide 
screen editor justify lines, formattables move 
blocks of copy global editing $275 

(12) SMART TERMINAL Enables your TRS-80 to be 
used a remote terminal to a time sharing computer 
system Supports upper lower case and full range of 
control keys, including control key mapping into any 
ASCII character Automatic transmission of files 
between TRS-80 and host computer Files can be read 
from or written to cassette tape or disk Incoming data 
can be printed on line printer or stored in memory for 
subsequent save to cassette or disk Disk and tape 
files are fully compatible with the ELECTRIC PENCIL 
program Baud rate and RS-232C sense switches can 
be reset without opening Expansion Interface. Re- 
quires RS-232C interface and modem $79 95 

• (CP/M IS A REGISTERED TRADEMARK OF 

DIGITAL RESEARCH) 



ALL PRICES & SPECIFICATIONS SUBJECT TO CHANGE 



(914) 425-1535 
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NEW!!! 

MOD-II NEWSLETTER 

$18/year (or 12 issues) 



Experience Shows - S.B.S.G. 



tailed Systems! 



i re noi running 
Small Business Systems Group 




SMALL BUSINESS 
SYSTEMS GROUP 



GENERAL ACCOUNTING SYSTEM For TRS-80™ 

S.B.S.G. has created the first completely user-configurable accounting system 
available for the TRS80 T ". 

User configurable? Each S.B.S.G. General Accounting System Module (except 
Order Entry) can be operated independently, or any of the modules can be 
combined in any configuration, providing a complete, coordinated system to 
fit the needs of your business. 

The S.B.S.G. System allows you the maximum efficient use of available disk 
space. Each module will run on a standard 1 disk drive system (except for Model 
I systems, which require 2 drives). As you add more disk drives to your system, 

the amount of on-line data storage increases. Now here's an important fact 

the S.B.S.G. General Accounting System "spans" your disk drives --that means 
that you can instantly access your data on any of up to 8 disk drives at any 
time! Since your S.B.S.G. Accounting System is user-configurable, it will work 
with 1 , 2, 3, 4 or more disk drive systems - and it is fully compatible with most 
hard disk drive systems (at additional cost). 



General Ledger 

The General Ledger accounting system consolidates financial data from other 
accounting subsystems in an accurate and timely manner. Major reports in- 
clude Trial Balance, Income Statement, Balance Sheet, a user-defined report, 
and more. All data is maintained and reported by month, quarter, year and 
previous three quarters. Transactions may be entered via direct posting and 
external posting generated by A/R, A/P, Payroll - or any other user source. 

Accounts Receivable 

The objective of a computerized A/R system is to prepare accurate and timely 
monthly statements to credit customers. Management can generate informa- 
tion required to control the amount of credit extended and the collection of 
money owed in order to maximize profitable credit sales while minimizing 
losses from bad debts. This system is invoice-oriented. Invoices can be entered 
before they're ready for billing, after billing, or even aftertheyare paid. Accounts 
Receivable allows entry of new invoices, credit memos, debit memos, or modi- 
fication or deletion invoice and allows for progress payment. The transaction 
information includes: type of A/R transaction, P.O. **, description of P.O., 
billing date, general ledger sales account **, invoice amount, shipping and 
transportation charges, tax charges, payment, and progress payment informa- 
tion. Reports include: summary or detail listing of invoices not yet billed, open 
items (unpaid invoices), closed items (paid invoices), and aging. Statements 
may be printed at any time and follow the format of nationally available forms. 

Order Entry 

The Order Entry Module was designed as a supplement to the Accounts 
Receivable Module, and will not operate independently. This system allows you 
to add, change, delete, list and print invoices; apply an invoice to correct custom- 
er account: generate computer assigned invoice numbers; note type (invoice 
credit memo, debit memo); record customer order number, invoice date, 
shipping date, FOB location, method of shipping, salesman, and payment 
terms; print selected number of shipping labels; enter, display and correct 10 
lines of data per invoice, noting the part number, description, price, quantity 



ordered, extension, taxable or not It also allows the user to enter, display and 
correct invoice totals, noting the invoice subtotal, taxes, shipping and handling, 
with disbursement up to 5 General Ledger accounts; print a transaction report; 
maintain a terms code file in the system; update Account Receivable and 
generate summary report totals. It automatically coordinates to the Inventory 
Module (if used) to determine description, price and out of stock status, and to 
immediately deplete inventory stock Price fields are easily modified to include 
percent or dollar discount 



Payroll 

Payroll involves many complex calculations and the production of reports and 
documents, many of which are required by government agencies. The Payroll 
system performs all necessary payroll tasks including file maintenance, pay data 
entry and verification, computation of pay and deduction amounts, and the 
printing of reports and checks. State and Federal Tax changes are easily im- 
plemented by the user via menu prompting. In its link to General Ledger, each 
employee's payroll information is distributed to as many as 1 2 different GL 
accounts; system automatically posts to cash account. 

Accounts Payable 

The Accounts Payable system receives data concerning purchases from 
suppliers and produces checks in payment of outstanding invoices. Several 
reports are available to supply information needed for the analysis of payments, 
expenses, purchases and cash requirements. The Accounts Payable system is 
invoice-oriented. It handles new invoices, credit memos and even debit memos 
and allows modification and deletion of invoices. The flexible check calculation 
procedures allows checks to be calculated for a set of vendors, specific vendors 
or even specific invoices. The reports include open item listings and closed 
item listings (both detail and summary), debit and credit memo listings, aging, 
check register report (to give an audit trail of checks printed), and vendor listing 
and vendor activity. (Jpdate reports are useful for audit trails and checking for 
accuracy. Checks may be printed at any time and follow the format of nationally 
available forms. 



Inventory 

Status reports and minimum reorder reports help to reduce the potential hazard 
of overstocking which results in cash flow problems. Program selection allows 
the user to store data for inventory located at up to five separate sites (divisions), 
coding up to 9 sales people. Available reports include inventory master list, 
price listings, period and year-to-date sales, stock status, minimum reorder 
point and commission information. 



Model I, 48K and 2 Disk Drives . . . $195.00 Per Module 

Model HI, 48K $195.00 Per Module 

Model II, 64K $295.00 Per Module 

Sample Report Printouts $ 10.00 



H & E COMPOTRONICS Gives You A 30-Day Money Back Guarantee On All Modules 



Experience Shows - S.B.S.G. has over 11,000 Installed Systems! 



COMMUNICATIONS SYSTEMS 

Small Business Systems Group markets a complete line of software which inter- 
faces the TRS-80™ with ANY computer that communicates in ASCII. This family 
of products offers both terminal and host capabilities to users with even the 
most minimal hardware configurations. There has been wide interest in these 
products from "comm buffs," the educational community, and businesses 
and individuals who need to communicate on a regular basis. Our 
systems are among the most versatile and comprehensive on the market today 
for TRS-80" microcomputers. 




SMALL BUSINESS 
SYSTEMS GROUP 



ST80-IH™ -- The Ultimate Communications System 

The "state of the art" in communications processors, designed for complex 
commercial applications. Included in this package is a set of programs that 
allow your TRS-80'" to talk to a timesharing computer, transfer files to and from 
your central business computer, and customize your ST80-III to your specific 
application. 

Features include: Selectable RS232 Setting • Help Display* Echo Feedback 
• Job Log (LDOS Mod I, Mod 111) • 2-CIser Translation Tables • Auto Logon • 
10 Function Keys (Definable) • RCIBOUT Key (Definable) • Warm Restart • 
Automatic I.D. • True Break • Direct Cursor Addressing • DOS Command 
Support • Transmit Line Feed • Printer Support • Video Display Modes: 
SCROLL, FORMAT, PAGE, REVERSE VIDEO (Mod II), CURSOR ON/OFF* 
Auto-answer • Autodial (certain modems) • Append to memory buffer • Big 
buffer for printer • Off hook / on hook • 1 predefined ASCII strings in transla- 
tion tables, • Registered users include NASA, (JSM, UPS, Westinghouse, and 
many colleges, universities and major banks. 

Minimum Requirements: One disk drive, RS232-C, 32K Model I or III, 64K 
Model II. 

Model I or HI $150.00 

Model II $250.00 

FORUM-80™ - Communications Network 

With Bill Abney's hot new communications product, you and your TRS-80™ 

can become part of one of the fastest growing communications networks in the 

country; your computer becomes an on-line bulletin board system: users can 

leave messages, get messages, swap information; exchange VisiCalc™ reports, 

charts, graphs or other correspondence with other computers. 

Features Include: Security System • Constantly displayed time-in-use figure* 

User Friendly • User Configurable or can be modified for custom application • 

Future updates and upgrades available to register owners • Multiple command 

strings • Non-technical user and operator manuals. 

Minimum Requirements: TRS-80'" (3-drive Mod I, 2-drive Mod 111), 48K, 

RS232C, Auto-answer modem. 

Model I or III $350.00 



ST-80-PBB™ -- Personal Bulletin Board 

A small yet powerful bulletin board for the individual to gather and leave electro- 
nic mail. Messages reside in data base in memory, eliminating the problem of 
scanning magnetic media. 

Features Include: Password Security System • Four levels of Access-Guest, 
Member, Owner, Operator • User Log • Four message types • Smart reverse 
scan to view messages from most recent to oldest. 

Minimum Requirements: TRS-80'" (Mod I or III), 16K, Level II, Auto-answer 
modem, ST80-X10 Host Program (550), RS232-C. 

Model I or III $50.00 



ST-80-CC™ - Communications Center 

More than a personal bulletin board, this is a complete communications system 
for low to moderate traffic. Like ST80-PBB'" it supports four levels of users and 
four levels of messages with text editing and reverse scan of messages. 
Additional Features Include: Transmit same message to many individuals 
• Auto logon and multiple command scanning • Print messages on line printer, 
save messages in memory buffer, maintain database without user intervention. 
Minimum Requirements: TRS-80'" (Mod 1 or III), Level II, 48K, one disk. Auto- 
answer modem. ST80-X10 Host Program ($50), RS232-C. 

Model I or III '. . $100.00 



MouseNet™ - Advanced Bulletin Board System 

Designed to accommodate high volume traffic, to operate simply enough for 
novice users, yet is fast and powerful enough for experienced callers. 
Features Include: Messages stored on disk in keyed file • Uses machine 
language subroutines for speed • Supports text editing commands • Help 
commands guide user • System bulletins display each time a user logs on • All 
messages are dated. 

Minimum Requirements: TRS-80'" (Mod 1 or III), 48K, RS232-C. 3 Disks. Auto- 
answer modem, text editor (such as Scripsit). 

Model I or HI $295.00 



DELUXE PERSONAL FINANCE For TRS-80" Model II 

This is a sophisticated and unique financial analysis package which can be 
readily customized to suit your personal financial situation. It will: 

• Accept and apply transactions to user-formatted budget categories. 

• Separate cash and check disbursements. 

• Allows up to ten category disbursements per check. 

• Credit income/deposits according to source. 

• Search, correct or void checks. 



• Maintain an accurate checking account balance. 

• Cancel returned checks. 

• Provide monthly summaries of income vs. expenses. 

• Calculate profit/loss. 

• Summarize data by categories. 

• Provides up to ten savings account summaries. 

Model II 

Model I Version 



$75.00 
$35.00 



ACCESSIBILITY 

We are here to serve your after-purchase needs. You can read our Monthly 
Newsletter containing current information about SBSG's products. Our News- 
letter is free to our customers and is available at a minimal cost to anyone 
interested in Microcomputers or call SBSG directly for Programming and 



Accounting Support. We have 8 incoming lines or call our COMM: Micronet 
Bulletin Board: ID * 70319236; FORUM-80'": (617) 692-3973; MouseNet'": 
(617) 692-8121; The Source: TCC 413. 



H & E COMPUTRONICS Gives A 30-Day Money Back Guarantee On All SBSG Products 



DEALER INQUIRIES ONLY: 



6 CARLISLE ROAD 

WESTFORD, MASS. 01886-5762 

(617) 692-3800 



SMALL 
BUSINESS 
SYSTEMS 

GROUP 



END USER ORDERS: 

iCQIYIPLfTHQMICS 



NAATV^MATC 



APt^CflTCNS SC»^C£ 



50 N. PASCACK ROAD 
SPRING VALLEY, NEW YORK 10977 



ALL PRICES 4 SPECIFICATIONS SUBJECT TO CHANGE 
DELIVERY SUBJECT TO AVAILABILITY 



NEW TOLL-FREE 

ORDER LINE 



(800) 431-2818 



HOUR 
24 ORDER 
LINE 

(914) 425-1535 



• • • EVERYTHING FOR 



TRS-80 is a trademark ol Tandy Corp. 



I, •«, 



presents 




> All orders processed within 24 hours 
• 30-Day money back guarantee 

(Diskette seal must not be broken) 
• Add $3.00 for shipping in UPS Areas 

• Add ?>! 00 loi C O D oi NON-UPS Areas 
■ Add 55 00 to Canada or Mexico 
• Add exact postage to all other countries 




• Each Module Can Be Operated Individually Or As A Completely Coordinated System. 

• Turn-Key Error Catching Operation For Beginners. 

• Each Module Is Accompanied By More Than 100 Pages Of Step-By-Step Documentation. 

• Manuals Available Separately. ($50 each) • Complete Sample Report Listings ($10) 

$195 Per Module (Model I or Model III TRSDOS Version) 

$295 Per Module (Model II TRSDOS Version) 

$495 Per Module (Model II Peachtree CP/M Version) 



BUSINESS/80 * BUSINESS/80 * BUSINESS/80 * BUSINESS/80 * BUSINESS/80 * BUSINESS/80 * BUSINESS/80 * BUSINESS/80 * BUSINESS/80 * BUSINESS/80 



GENERAL LEDGER 

Processes 

* Flexible design allows system to be easily adapted to both small business- 
es and also to firms performing client writeup services. 

* Add, change or delete records within the Chart of Accounts (Master) File. 

* List the Chart of Accounts File. 

* Key in transactions into the Transactions (Journal Entries) File. 

* List the Transactions File. 

* If other Peachtree Software packages are present, pass summary trans- 
actions from these packages to the General Ledger at the end of the 
accounting period. 

* At the end of an accounting period, print out the major reports. 

(1) Trial Balance (Detail Report) 

(2) Transaction Registers 

(3) Balance Sheet 

(4) Prior Year Comparative Balance Sheet 

(5) Income Statement 

(6) prior Yeai Comparative Income Statement 

(7) Department Income Statements 



File Information 

There are two main computer files maintained within the General Ledger 
System 

(1) The of Accounts !: iie 

Account Number 

Description 

Account rype 

Balance Sheet Column Code 

Current Amount 

Year-To-Date Amount 

Budget Amount 

Prior Year Monthly Amounts 

(2) The Transactions File 

Account Number 

Description 
Source Code 

Reference 

Date 

Amount 



ACCOUNTS RECEIVABLE 

Processes 

• Add, change or delete records within the Customer File. 

* List the entire Customer File, or any Customer within the File 

* Enter invoices, payments, credits and ad|ustments. 

• Prepare invoices and statements. 

• Produce the following reports: 

(1) Aged Accounts Receivable 

(2) Invoice Register 

(3) Payment. Credit and Adjustment Register 

(4) Customer Account Status Report 

* At the end of a month, post the following items to the General Ledger: 

(1) Invoiced Sales 

(2) Freight Charges 

(3) Sales ""ax 

(4) Service Charge Income 

(5) Cash Payments 

(6) Discounts Allowed 

(7) Returns/Credits 

(8) Income Adjustments 

(9) Accounts Receivable 
File Information 

There are three main computer files maintained within the Accounts Receiva- 
ble System, the Customer File, the Invoice File, and the Transaction File. 
CUSTOMER FILE 

Customer Account Number 

Customer Name 

Address 

Phone 

Type of Account 

Credit Terms 

Credit Limit 

Tax Rate 

Discount Rate 

Date of Last Credit 

Date of Last Debit 

Amount of Last Credit 

Amount of Las; Debit 

Current Balance 

High Balance 

Year-To-Date Sales 

Year-To-Date Payments 

Automatic Billing Amount 



INVOICE FILE 

Invoice Number 
Invoice Date 
Invoice Amount 
Credit Terms 

TRANSACTION FILE 
Transaction Type 
Transaction Date 
Transaction Amount 



ACCOUNTS PAYABLE 

Processes 

* Add, change or delete records within the Vendor File. 

* List the Vendor File. 

* Enter vouchers. 

* Automatically determine which vouchers to pay. 

* Print checks and a Check Register. 

* Produce the following reports: 

(1) Open Voucher Report. 

(2) Accounts Payable Ageing Report. 

(3) Cash Requirements. 

* At the end of a month, prepare the General Ledger Transfer File, passing 
the following information for each debit or credit transaction: 

(1) Account Number 

(2) Description 

(3) Source Code 

(4) Date 

(5) Amount 

File Information 

There are two main computer files maintained within the Accounts Payable 
System, the Vendor File and the Voucher File. 
VENDOR FILE 

Vendor Code 

Vendor Name 

Address 

Phone 

Year-To-Date Purchases 

Year-To-Date Payments 

Current Balance 

Last Payment 

Date of Last Payment 

Monthly Entry Flag 

Due Date of Month 

Debit Account Number 

Amount (Debit) 

Month Last Paid 
This file may also contain information to enable generation of automatic 
vouchers for those items such as rent or bank payments that are paid every month. 

VOUCHER FILE 

Voucher Code 
Voucher Date 
Amount Due 
Date Due 
Discount Percent 
Discount Amount 
Discount Date 
Invoice Number 
Invoice Date 
Status 
Plus up to six account number-amount fields for General Ledger account 
numbers to which the amount due is to be distributed. 



PAYROLL 

Processes 

• Add, change or delete records within the Employee File. 

• List the Employee File. 

• Modify the Tax Information Files. 

• At the end of a pay period - 

(1) Calculate Pay 

(2) Print Checks 

(3) Print Payroll Register 

• At the end of a month - 

(1) Print the monthly summary 

(2) Print the Unemployment Tax Report 

(3) Prepare the General Ledger Transfer File, passing the following 
information: 

Net Pay (Cash) 

Employee FICA Withheld 

Federal Tax Withheld 

Insurance Deductions 

Miscellaneous Dedutions 

State Tax Withheld 

Local Tax Withheld 
The gross pay for up to twenty payroll departments may also be 
passed to the General Ledger. 

• At the end of a quarter, print the 941A report information. 

• At the end of a year, print the W-2 forms. 

File Information 

There are two main computer files maintained within the Payroll System, the 
Employee Master File and the Tax File 
EMPLOYEE MASTER FILE 
Name 
Address 
Local Code 
State Code 
Marital Status 
Exemptions, Federal 
Exemptions, State 
Social Security Number 
Pay Period 
Pay Type 
Pay Rate _ 

Insurance Deduction 
Miscellaneous Deduction 
Date Employed 
Date Terminated 
Last Check Information 



Payroll (con't) 

And current, month-to-date, quarter-to-date and year-to-date totals for: 
Regular Earnings 
Overtime Hours/Earnings 
Other Hours Rate/Earnings 
Commission Earnings 
Miscellaneous Income 
FICA Deductions 
Federal Deductions 
State Deductions 
Local Deductions 
Insurance Deductions 
Miscellaneous Deductions 

TAX FILE 

(for single and married persons) 

Federal Tax Information Tables 

State Tax Information Tables 

Local Withholding Tax Information Tables 



INVENTORY SYSTEM 

Inventory is probably the most speculative of all of a company's assets. A true 
measure of the effectiveness of management is the ability with which it supervises 
the inventory control function. 

The Peachtree Software™ Inventory Management System is designed to (1) 
give you better merchandise control, (2) allow you to lower your dollar investment 
in inventory, and (3) improve customer service and response. 

The System maintains detailed information on each inventory item including 
the part number, description, unit of measure, vendor and reorder data, item 
activity, and complete information on current item costs, pricing, and sales. 
Transactions effecting inventory (sales, receipts, adjustments) may be applied at 
any time to insure the inventory data is always up to date and accurate. 

As with all Peachtree products, the system is interactive, simple to operate, 
and provides reports that are up to date and comprehensive. 

Particular features of the Peachtree Software'" Inventory Management 
System include: 

• Interactive, menu-driven programs 

• Self-instructing user documentation 

• Long item number - up to 15 characters 

• Departmentalizing of items 

• Multiple pricing levels 

• Processes items on reserve (committed but still in stock) 

• Online item query at any time 

• Comprehensive management reporting 

• Automatic month end file backup 

• Recovery routines for hardware failures 

• Sample data for demonstration and training 

How the System is Designed 

The Inventory Management System operates with an Inventory Master File 
which allows for the creation of each inventory item and for the recording of 
transactions (sales, receipts, returns, reserves, and adjustments; to each inven- 
tory item. 

The Inventory Master File contains the item number, description and various 
other data on item costs, prices, reorder levels, vendor refereence, and activity. The 
items within the Master File are entered, changed, deleted, and queried through 
the Inventory Master File Maintenance program. All data on all items may be listed 
by using the Detail Inventory Report program. 

Transactions may be applied at any time to the Master File through the Enter 
Inventory Transactions program. An Update Report automatically prints during 
this entry process to provide an audit trail of all inventory acitivity. 

Several reports are available for the maintaining of stock, analysis, and fore- 
casting. These reports include the Physical Inventory Worksheet, Inventory Price 
List, Departmental Summary Report, Inventory Status Report, the Reorder Report 
and the Period-to-Date and Year-to-Date reports. 

At the end of an accounting period (usually a month), and then again at the 
end of a year, the End of Period Processing program is run to update current 
balances and clear previous balances. 
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Written For TRS-80 and All Computers Using MICROSOFT basic 

FINALLY IT IS HE: RE* At last someone wrote a book on disk random 
aooess and file handling. X book written for the non-profirammer. 
Written for the businesman and professional who need to solve and 
write special programs for in house business problems. 

Written for the hobbyist who wants to go beyond the cassette recorder and into disk storage and file 

manipulation. 

This book handles a subject of reasonable complexity, so simple and down to earth, that anyone 

with some Level II experience can cope with the material. 

This book is written using a simple program as a starting point. The programs grow in ability and 
complexity as the book progresses into the various aspects of file handling and record manipula- 
tion. Extensive effort has been made to keep the material coherent and every program line is 
explained in detail. 

The programming material presented in this 150 page self-instruction tutorial will provide any non- 
programmer with the ability to write special programs for inventories, mailing list, work scheduling, 
record keeping, research project data manipulation, etc. The subjects covered in this edition are as 

follows 



(A) The writing of a Menu to summarize program functions. 

(B) The writing of a screen format to accept record data. 

(C) The creation of the basic record. 

(D) The Fielding and LSET routines for buffer preparation. 

(E) The writing of the record to disk in a Random Access mode. 

(F) The retrieval of a record from disk in a Random Access mode. 

(G) The ability to change or edit a record. 

(H) The LPRINT capability from disk using three different formats. 

(I) Deleting a record from a Random file. 

(J) Sorting the Random file. 

(K) Searching the Random file by name or other keyfield 

(L) The ability to search in a "NEXT or PRIOR" fashion. 

(M) The ability to purge a disk file from deleted records. 

(N) The ability to calculate with data from a disk file. 

(O) The provision for future expansion of the data fields. 

(P) The use of flags to prevent program crashes. 

(Q) Date setting, printer on-line, arid many other routines that 
make a program run like a commercial written program. 

D.S.C., Publishing, Div. of, 
D.S.C., INCORPORATED. 
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(480 pages - Soft Cover) 



The BASIC Handbook has never been this complete. The Expanded 
Second Edition gives you over twice as much information as the First 
Edition, explaining nearly 500 BASIC words. The Handbook features 
special sections on Disk BASIC, TRS-80 Extended Color BASIC, Atari 
BASIC, Acorn Atom BASIC, Tektronix BASIC and "Converting Pro- 
grams From One Computer For Another." 

The computer industry has experienced tremendous change in the last 
three years. Hundreds of new computers have been introduced since 
The BASIC Handbook was released in 1978. The Second Edition meets 
the challenge head-on, documenting every significant BASIC word 
used by every BASIC-speaking computer. 

This new Edition makes program conversion easy. Its widely acclaimed 
feature, "If Your Computer Doesn't Have It" has been expanded. Each 
BASIC word is alphabetically listed, with Test Programs and Sample 
Runs, Variations in Usage combine with Alternate Spellings to totally 
cross-reference each BASIC word. 

Who needs the BASIC Handbook? 

Every user of the BASIC language needs the Handbook! Hobbyists 
converting between BASIC "dialects" need it. Students learning and 
using BASIC on any size computer need the Handbook as a supplement 
to their BASIC language text. Programmers at every level will use it con- 
stantly to find better ways to achieve the needed results. 



An Encyclopedia of the BASIC computer language. 
by Dr. David A. Lien 

What versions of BASIC does it cover? 

There are nearly a hundred versions of BASIC in use today. No wonder 
we keep seeing strange new BASIC words. Dr. Lien has selected over 50 
of the most used dialects and explained every commonly used state- 
ment, function, operator and command. 

Interlocking subroutines: Every subroutine has been constructed so the 
numbers won't overlap with others in the book. Assembleany combina- 
tion of the subroutines needed to do the job — with no line conflicts! 

Alternate programming techniques: The popular If Your Computer 
Doesn't Have It" feature has been expanded throughout the book. 

Complete Index: The increased complexity of the language mandated 
that an index be added. 

"Converting Programs From One Computer For Another" This special 
section provides valuable tips on how to translate a program with a 
"foreign" BASIC to run on your machine. 

Foreign computers: Virtually every BASIC-speaking computer in the 
world is covered. You need the new Handbook to translate BASIC 
words used by Britain's Sinclair, Sweden's ABC-80, Australia's System 
80, Japan's NEC and many others. 

Plus these Special Sections 

• Disk BASIC: A helpful supplement to your Owner's Manual and a 
good introduction to the theory of Disk BASIC 

• TRS-80 Extended Color BASIC: A comprehensive explanation of 
Radio Shack's newest BASIC. 

• Atari BASIC: You see programs written in this popular BASIC in 
nearly all the magazines. A special section explains its unique 
words and features. 

k Acorn Atom BASIC: The Atom is one of Europe's favorites, but 
its BASIC is very different. It's fully documented in this Second 
Edition. 

*• Tektronix BASIC: A graphics-oriented BASIC used extensively 
by engineers and scientists. 

Covers These Computers: 

• TRS-80 (all models) • APPLE • IBM • Atari • Wang • Commodore PET 

• Sorcerer* Northstar* Acorn Atom • UNIVAC* System 80 • Hewlett 
Packard • Heathkit • Ohio Scientific • Texas Instruments • Sinclair 

• DEC • Sharp • Vector • NEC • Plus hundreds more! 
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The finest 

Data Base Manager 

Available 




JUST CHECK SOME OF THESE FEATURES 

• Supports six different relational search 
techniques. 

• Comes with programmer's interface. 

• Over 93 pages of documentation. 

• Supports up to 20 user defined fields of 40 
characters each. 

• Record length up to 800 characters. 

• Files can be up to four disks in length. 

• Compatable 35, 40, 77 & 80 track drives. 

• Has calculated equation fields. 

• Complete report generator. 

• Data can be merged into letters. 




INTERNATIONAL 

A DIVISION OF SCOTT ADAMS, INC. 



'MAX I MANAGER for TRS-80 Models 1 & 3 
Requires 48K of RAM and 1 Disk Drive Minimum. 



NOTE I 
NOTE 2 
NOTE 3- 
NOTE 4- 
NOTE 5 
NOTE 6: 
NOTE 7: 
NOTE 8: 
NOTE 9' 
NOTE 10 
NOTE ll 



■Ids 



File size is dependant on memory size. 
Seq;;ei!f>ci dies on ly. 
User must apply own driver routine. 
Hard copy print out only 

Four (unctions ( + - ' ' ) only 

Same as note "Swith a maximum o( two calculatec 

Available as a separate program for $99.95. 

I 20 character maximum. 

Data structures defined in manual. 

132 characters maximum. 

User option (files can be read from ascending or descendin 
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DATA MANAGEMENT 
PROGRAM 
COMPARISON CHART 

FILE CAPACITY & FORMAT 



Maxim um f) of disks per file 



Maximum « of r ecord s per file 



Maximum record length 



Maximum ft of characters per field 



Maximum ft of fields 



Maximum B of characters per field label 



Variable length records (pack sectors) 




I 49 



2-': 



No 



25-1 



20 



Note 2 



32.767 



20 



Yes 



10.199 



255 
254 



i 27 



65.535 
255 

"255 



153 



765 



FIELD TYPES 



Alphanumeric 


Yes 


Yes 


Yes 


Yes 


Yes 


Numeric 


Yes 


Yes 


Yes 


Yes 


No 


Fixed decimal numeric 


Note 4 


Yes 


Yes 


No 


No 


Date (MM/DD/YY) 


Yfi 


No 


Yes 


No 


No 


Extended date (MM DO YYYY) 


Mr 


No 


Yes 


No 


No 


Calculated equation 


Mote 5 


Note 6 


Yes 


No 


No 


Permanent fields 


Yes 


No 


No 


No 


No 



SORTING 



Machine language assisted 


No 


Yes 


Yes 


Note 7 


Yes 


Sort by any field 


Yes 


Yes 


Yes 




Yes 


Number of Sort Key li les 


1 


1 


5 




1 


Numeric sort 


Yes 


Yes 


Yes 




No 


Ascending sort 


Yes 


Yes 


Yes 




Yes 


Descending sort 


Yes 


Yes 


Note 1 1 




Yes 


Sort within a selected range 


No 


Mo 


Yes 




No 


Sort multiple fields simultaneously 


Yes 


Yes 


No 




No 



FILE MAINTENANCE 



Fixed length input fields 


Yes 


Yes 


Yes 


Yes 


Yes 


Smgle key entry of common data 


No 


No 


Yes 


No 


No 


Single field EDIT selection 


Yes 


Yes 


Yes 


Yes 


V 'c- 


Skip record (next or previous) 


Yes 


Yes 


Yes 


No 


Yes 


Search & EDIT record 


No 


Yes 


Yes 


No 


Yes 


Search* DELETE record 


No 


Yes 


Yes 


No 


No 


Auto reiection of alphanumeric data 

in numeric field 


Yes 


No 


Yes 


No 


No 



RECORD SELECTION TECHNIQUES 



Record number 


Yes 


Yes^ 


Yes 


Yes 


No 


Binary search (high speed) 


No 


No 


Yes 


No 


No 


Maximum » of simultaneous keys 


1 


4 


10 


31 


1 



RELATIONAL COMPARISONS 



Equal 


No 


Yes 


Yes 


Yes 


Yes 


Not equal 


No 


Yes 


Yes 


No 


Yes 


Greater than 


No 


Yes 


Yes 


Yes 


Yes 


Less than 


No 


Yes 


Yes 


Yes 


Yes 


nstring 


Yes 


No 


Yes 


Yes 


No 


AND /OR 


No 


No 


Yes 


Yes 


No 


Wild card masking 


No 


No 


Yes 


No 


No 



PRINTING 



User specified page title 


Note 8 


Yes 


Yes 


No 


Note 10 


User specified column headings 


No 


No 


Yes 


No 


Yes 


Automatic page numbering 


Yes 


Yes 


h Yes 


Yes 


Yes 


Right justification 


No 


Yes 


Yes 


No 


No 


User defined column widths 


Yes 
No 
No 


No 


Yes 


Yes 


Yes 


User defined column separators 


No 
No 


Yes 


No 


No 


Keyboard entered columnar values 


Yes 


No 


No 


Merge data into form letters 


No 


No 


Yes 


No 


No 


Form filling applications 


No 


No 


Yes 


No 


No 


Columnar totals 


Yes 
Yes 
No 


Yes 
Yes 


Yes 


No 


No 


Columnar subtotals generated upon 
change in a specific field 


Yes 


No 


No 


Built in screen print 


No 


Yes 


No 


No 



MISCELLANEOUS 



Cost 


$75.00 


$94.90 


S99.95 


$99.00 


$79.95 


Punctuation allowed within data fields 


Yes 


i 


Yes 


1 Yes 


Yes 


Upper / Lowe' rase 


Note 3 


Note 3 


Yes 


Note 3 


Note 3 


Built m RS-232< driver 


Note 3 


Note 3 


Yes 


Note 3 


Note 3 


Built-in TRS-232 driver 


Note 3 


Note 3 


Yes 


Note 3 


Note 3 


Programmer's interface 


Note 9 

No 


Note 9 


Yes 


No 


Note 9 


Sample DATA disk 


No 


Yes 


No 


No 


Documentation (B of pages) 


» 


> 


93 


38 


29 
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TRS-80* • APPLE* • IBM* • HEATH* • ZENITH* • XEROX* 




^E CLINCH** 



THE BOX WORKS 

Were So Convinced That THE BOX is 
Exactly What You Need That We'll Let 
You Try It For 10-Days. If You Don't Like 
It — Return It For A Full Refund. 



THE FACTS 

• Cost $2995* Per Drive 

• Add $200.00 For Host Adapter Card 

On First Drive 

• Winchester Technology 

• Add Up To 3 Additional Drives 

• Full One Year Warranty On All Parts 

And Workmanship Provided by Manufacturer 

• Boots Up In Seconds 

• Direct Installations In Minutes 

• Availability - NOW! 



* Model III TRSDOS Compatible Operating System 

$149.00 

* Model II TRSDOS Compatible Operating System 

$400.00 

* Model II CP/M Compatible Operating System 

$250.00 
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COMPUTER PROGRAMMING 

STEP BY STEP Ages Junior High to Adult 
32 programs and a 64-page workbook teach programming in 
BASIC for the beginner. Introduces all important BASIC 
commands and programming logic, including simple string 
logic and one-dimensional arrays. Lessons are interactive, 
presented in a question-and-answer format on the computer 
screen. The workbook adds extra information. Through 
instruction, structured practice, and frequent skills testing 
the user learns how to write BASIC programs, 3 tapes, work- 
book, vinyl binder. 

TRS-80, PET $49.95 

APPLE (Disk) $79.95 



EDUCATIONAL GAMES 

MEMORY BUILDER: CONCENTRATION Ages 6 Up 
A series of educational games to improve memory, attention span and con 
centration. Letter and 3 lettei words are used. Player has three options play 
against the < omputer, play against him or herself, play against another player. 
Especially good for parent and child to play together. 

$16.95 
STORY BUILDER/WORD MASTER Ages 9 Up 
Series of partially completed verses that the child completes. Teaches gram- 
mar skills in an enjoyable way. Word Master is a logic game where the child 
tries to guess a 3 letter word generated by the computer Teac hes reasoning 
and vocabulary 

$16.95 
GRAPH BUILDER Ages 10 Up 

1 1 teaching programs and games teach students to read graphs. Covers x and 
y coordinates, and representation of numerical data on graphs. Starts with 

simplest concepts and works up to complicated grid game 

TRS-80 $ 169 5 

CODE BREAKER Ages 10 to adult 

3 scrambled message games of increasing difficulty that build basic word 
handling skills needed for good writing. First game scrambles letters within 
the words in the message: next 2 games scramble letters and also word order. 
The last game gives the hardest messages. Messages are made up by the 
computer from an extensive word list 

APPLE, ATARI, PET $16.95 

MINICROSSWORD All ages 

4 programs that consist of 2 minicrosswords and 2 codeword games. Cross- 
word programs invent their own crossword puzzles - hundreds of completely 
different puzzles are possible and score how well you do each puzzle. When 
used in conjunction with the codeword programs, which are word -guessing 
games, the course provides a vocabulary and spellinq development system. 
TRS-80, APPLE, ATARI $16 95 

ASTRO WORD SEARCH: GEOGRAPHY Junior high to adult 
Search for hidden geographical place names in a pattern of letters generated 
by the computei Words can be hidden across, down or diagonally as in the 
popular word-search puzzles. Hundreds of different puzzles can be formed by 
the puzzle in 3 programs. Computer scores you on how well you do. 
TRS-80, APPLE, ATARI $16.95 

ASTRO WORD SEARCH: SPANISH High school to adult 
As in Astro Word Search: Geography, the computer generates hundreds of 
different puzzles, but this time the hidden words are common Spanish words. 
Helps improve Spanish vocabulary. Computer scores you. 3 programs. 
TRS-80. APPLE, ATARI $16.95 

ASTRO WORD SEARCH: FRENCH High School to Adult 

Like Astro Search: Spanish, except this time, it's French vocabulary words. 

TRS-80, APPLE, ATARI $16.95 

ASTRO QUOTES: High School to Adult 

Fascinating same in which yea guess vocabulary words from clues .rod the 
computer takes each letter from the words and puts it where if belongs in a 
famous quotation. As soon as you can, you guess the quotation. If it takes you 

too many tries to guess the quote, you lose the game 3 versions: easy, 

medium hard. 

APPLE, ATARI 3,6.95 



STUDY SKILLS 

IQ BUILDER Junior High Up 

A group of 4 courses that prepare a high school student for the College 

Boards or adult for aptitude tests. 

VOCABULARY BUILDER 1: BEGINNING 11 programs include a set of 
graded vocabulary questions on synonyms and antonyms (the most common 
type of vocabulary question on an IQ test). The last lesson is a test on vocab- 
ulary. Total of 400 questions, 2000 words in course. 

$16.95 

VOCABULARY BUILDER 2: ADVANCED 11 programs like those in 
Vocabulary 1, but using a more advanced word list. 

$16.95 

NUMBER SERIES Contains 8 programs that provide practice in a common 
math problem type. The first lesson teaches how to approach number series 
and how to analyze their patterns. Later lessons provide practice with in- 
^ualngly difficult problems, giving clues if you have difficulty with the 
problem. Final lesson is a test of abilities. 

$16.95 

ANALOGIES Contains 6 programs that teach what an analogy is and what 

the common type-, are, provide a method f< n analyzing analogies and provide 
practice in handling all types of analogies. Final lesson is an analogies test. 

$16.95 

LANGUAGE ARTS 

READING COMPREHENSION: WHAT'S DIFFERENT? Ages 8 Up 
5 reading comprehension programs which present logical problems where the 

student picks the one word in four which doesn't belong with the rest. Builds 
analytical skills essential for understanding what you read. 

$16.95 

PRESCHOOL IQ BUILDER Ages 3 6 

Teaches vital cognitive skills that children must learn in order to do well in 
school. In Part 1, Same and Different, the child discriminates between two 
forms, in Part 2, Letter Builder, the child matches a letter on the TV monitor to 

one on the keyboard. Accompanying Parent's Guide gives instruction. 

$16.95 

SPELLING BUILDER Junior High Up 

8 programs plus an audio cassette teach important spelling rules and skills. 
Helps students and adults overcome spelling difficulties. Not just spelling drill, 
this course teaches a method for approaching difficult words. Ideal for the 
student or adult who has mastered basic spelling but has trouble deciding if 
it's "supersede" or "supercede", "combustable" or "combustible". Final test 
of 25, ten-word lists. 

$19.95 
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TRS-80 MODEL I AND MODEL III 




System 
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For Cassette or Disk 



IS YOUR COMPUTER WORKING? 

ARE YOU SURE? 



CASSETTE 



^*W^9 ^"^ ROM: checksum test 

J J • RAM: four separate tests including every address and data value. 

character generator, video RAM, and video signal, 
every key contact tested, 
character test, 
read/write/verify data. 

connector fault, data transmission, framing, data loop, baud rate generator. 

disk controller, drive select and restore, track seek and verify data, read/write/verify all tracks and 
sectors with or without erasing, sector formatting, disk drive timer, disk head cleaner. 

Individual tests of each device with operator monitoring and intervention. 

Continuous sysem tests run continually for hours testing each component, with diagnostic reports optionally written on line printer. 

One program adapts to any system configuration and hardware. 

Complete instructions and documentation. 



ROM: 

RAM: 

VIDEO DISPLAY: 

KEYBOARD: 

LINE PRINTER: 

CASSETTE RECORDER: 

RS-232-C INTERFACE: 

DISK DRIVES: 



SMART TERMINAL 

Enables your TRS-80 to be used as a data communications terminal 
to a time-sharing system, computer bulletin board, or another computer, 
via the RS-232-C interface. 

• MEMORY BUFFER holds data for transmission or data received from 
other computer. 

• CASSETTE or DISK mav be used to load or save data from memory. 

• AUTOMATIC TRANSMISSION of data from memory. 

• AUTOMATIC STORAGE of incoming data at user's option. 

• TRANSMIT or RECEIVE WITH VERIFICATION options included for 
communication between two TRS-80s using Smart Terminal. 

• Full CONTROL KEYS, including control key mapping into any ASCII 
character. True BREAK key. Lower case supported on Model I. 

• Buffered LINE PRINTER ECHO for incoming data. 

• Disk and cassette files fully compatible with ELECTRIC PENCIL" and 
SCRIPSIT" programs. 

• BAUD RATE and RS-232-C CHARACTERISTICS can be reset from 
within the program. 

• SAVE PROGRAM option creates "personalized" back-up copy of 
program with all options set as specified by user. 

• ONE PROGRAM supports both cassette and disk systems. Program is 
compatible with PMC-80 and other TRS-80 "work alike" computers. 
Model I or III Version supplied on cassette $69.7$ 

supplied on diskette $74-95 
Model II CCP/MT Version $79-95 



MON-3 and MON-4 

The TRS-80 Monitor Programs #3 and S4 are powerful utility programs 
enabling you to interact directly with the TRS-80 in Machine Language. 
They are as useful for beginners as for advanced programmers. 

• BEGINNERS can learn to interact directly with the computer in 
Machine Language. 

• 40-PAGE MANUAL provided with each program. 

• SIMPLE commands, easy to use. 

The Features Of The Monitor Pro g rams Enable You To The F oll owin g 

• DISPLAY memory in different ways. 

• DISASSEMBLE memory to see Machine Language commands. 

• MOVE and COMPARE memory areas. 

• SEARCH through memory to find specific values. 

• MODIFY memory in various ways. 

• RELOCATE object programs. 

• PRINT output on video display or line printer. 

• READ and WRITE object tapes in SYSTEM Format. 

• UNLOAD programs using low RAM on disk. 

• SAVE and READ disk files (MON-4 Only). 

• INPUT and OUTPUT of disk sectors (MON-4 Only). 

• SEND and RECEIVE data over RS-232-C Interface (MON-4 Only). 

• Create SYMBOLIC Tapes (MON-3) or Files (MON-4) of Disassem- 
bled output for Editor/Assembler program. 

MON-3 (For Cassette Systems) $39-95 
MON-4 (Tor Disk Systems) $49-95 



MAILING LIST 

Maintains mailing lists of over 1000 names. Commands allow adding, 
changing, deleting, and finding names. Sorting is done by machine lan- 
guage according to the information in any field (i.e., name, address, zip 
code). Labels printed in 1, 2, or 3 columns, in master list on one line, or on 
video display. 

Disk Version Only $69-95 



HOME BUDGET 

Combines the maintenance of your checkbook with analysis of your 
income, expenses, and monthly bills. Handles data including bills, in- 
cluding bills, income, deposits, checks and debits to your checking ac- 
count, and cash expenses. Computes checkbook balance, list of unpaid 
bills, monthly and year-to-date summaries of income and expenses show- 
ing income tax deductions. All output printed on video display or line 
printer at user's option. Complete instructions for customizing to suit 
vour own budget. Cassette $29-95 

Disk $49-95 



SMALL BUSINESS ACCOUNTING 

Based on Dome Bookkeeping Record #612, this program keeps track of 
income, expenditures, and payroll for a small business of up to 16 employ- 
ees. Income and expenditures can be entered on a daily, weekly, or 
monthly basis, and the program computes monthly, through last month, 
and year-to-date summaries. Payroll section keeps record of individual 
employees and their paychecks with up to six categories of payroll de- 
duction Employee payroll record and year-to-date payroll totals can be 
computed. Manual contains complete instructions for customizing to suit 
your business. 

Disk Version $49-95 
Cassette Version $29.95 
(Cassette Version does not contain payroll) 
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50 N. PASCACK ROAD 
SPRING VALLEY, NEW YORK 10977 



NEW TOLL-FREE 

ORDER LINE 

(OUTSIDE OF NY. STATE) 

(800) 431-2818 




HOUR 
24 ORDER 
LINE 

(914) 425-1535 



All orders processed within 24 Hours 
• 30-Day money back guarantee 
• Add $3.00 for shipping in UPS Areas 

• Add $4.00 for COD or NON-UPS Areas 
• Add $5.00 to Canada or Mexico 
• Add exact postage to all other countries 
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W DISKETTES MODEL I with Hub Rings 

*29. 95 (Box of 10) 
(Model II w/o Hub Rings $39.95) 

100% CERTIFIED DISKETTES are 3M's highest quality diskettes. 



SCOTCH - 
HEAD GLEANING 

$29.85 



KETTES 



Model I, Model II or Model III 



HEAD CLEANING DISKETTES eliminate downtime and service calls 
with clean and efficient heads. Use Scotch Head Cleaning Diskettes on 
a regular basis. Simply saturate the white cleaning fabric, insert into the 
drive and turn it on. It takes less than 30 seconds to eliminate particles 
of dirt, dust and oxide that accumulate with normal use of your system. 
Available for most 8" and 5'/„" drives. 



Sn four TRS-I 

Model I, Model II or Model III 

DOT 

Disco-Tech's Disc Drive Timer Program 
Zaps Disc Drive Problems! 
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Analyze disc drive motor speed on a routine basis with an adjustable 

real-time speedometer. Accurate to one-tenth of one r.p.m. out of 300 

r.p.m. 

Fine-tune disc drive motor speed yourself. All you need is DDT, two 

screwdrivers, and five minutes' time. 




$29.95 

Diskette and Complete Manual 



W DISKETTES MODEL I OR MODEL III 

*34. 95 (Box of 10) 

(Model II 8" with Hub Rings $49.95} 

ALL CERTIFIED DOUBLE DENSITY 




The "NEW" VERBATIM DATALIFE DISKETTES are a completely new 
line for Verbatim. The new diskettes are certified 100% error free. Each 
diskette contains the new reinforced hub ring. Verbatim has added a 
thicker, more durable coating to its diskettes along with a longer-lasting 
lubricant. 



(Model 



W DISKETTES MODEL I OR MODEL III 

*34. 95 (Box of 10) 
3" with Write Protection Notch, with Hub Rings ($39.95) 

ALL CERTIFIED DOUBLE DENSITY 



The "NEW" WABASH MINI'MYTE" DISKETTES are certified 100% 
Error Free. Each diskette contains a reinforced hub ring. These hub 
rings aid in registration, eliminate disk slippage, reduce disk wear in the 
hub area and reduce errors. 
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50 N. PASCACK ROAD 
SPRING VALLEY, NEW YORK 10977 



NEW TOLL-FREE 

ORDER LINE 

(OUTSIDE OF NY. STATE) 



HOUR 

ORDER 

LINE 



(800) 431-2818 (914) 425-1535 

*AII orders processed within 24-Hours 
•k 30-Day money back guarantee on all Software 
it Add $3.00 for shipping in UPS Areas 
•kAdd $4.00 for COD. or NON-UPS Areas within U.S.A. 
•k Add $5.00 to Canada and Mexico 
-kAdd proper postage outside of U.S., Canada and Mexico 

ALL PRICES & SPECIFICATIONS SUBJECT TO CHANCE 




MODEL III DOSPLUS READY NOW! That's right! DOSPLUS 3.3 for the MODEL III is available now. We have our MODEL III, 
and now you can have our DOS. All the great features of our popular MODEL I DOS, plus Single or Double Density Operation. The best gets better! 
Order now, and soon your MODEL III will be all the computer it can be. Experience excellence. Experience DOSPLUS. SldQ QC 

DOSPLUS. The flagship of the Micro-Systems line. This is the BEST disk operating system currently available. It offers you all the features you 
could ever use, speed, reliability, and much more! Full support of variable length records. No more internal errors during file handling due to poorly 
written operating systems. Allows use of ISAM technique. Supports 35-80 track drives. The two operating systems are basically the same. However, 
Dosplus 3.4D willoperate double density. The double density DOS has some differences peculiar to double density operation. Both systems offer DOS 
commands from BASIC, BASIC renum, and BASIC program compressor. DOS utilities include a sector display/modify program, a utility to purge files, 
AND a utility to restore purged or killed files. Free space map and the most comprehensive directory on the market. Try it and you'll never use anything 



plAJS 



else. All this and much more for only $149.95 either system. 

THE ORIGINAL DOSPLUS contains all of the 

FOLLOWING FEATURES 

1) Radio Shack compatibility 

2) Error free variable length records 

3) Full lower case detection and support 

4) Repeating keyboard with NO keybounce EVER 

5) Shift [0] typewriter keyboard option 

6) Execute only protection feature for BASIC programs 

7) Automatic track support for 35 through 80 track drives (mixed) 

8) Device I/O handling with FORCE command 

9) Supports high speed clock modification (up to 4.0mhz) 

10) Supports mixed mode (single & double density) automatically 

11) Allows disable-enable to break key 

12) Allows user to define step rate per drive and re-configure system disk 

13) Allows for efficient use of double-headed drives 

14) Built in screen printer (shift [CLEAR] with [BREAK] key abort 

15) Multiple command chaining with "DO" 

16) Built in memory test with CLEAR command 

17) New printer driver which allows complete forms control and paging 

18) Automatic serial printer driver with optional auto linefeed 

19) Execute any DOS command from BASIC and return to BASIC 

20) Free space map of diskette with optional output to printer 

21) Copy with variable length files 

22) Complete RS232 control from keyboard with status check 

23) Create and pre-allocate files from DOS 

24) Display current date and time from DOS 

25) More information from Directory with optional printer output 

26) Enter DEBUG with shift [BREAK] to allow use of [BREAK] from BASIC 

27) New DISKDUMP/CMD sector display/modify program (works with filespecs) 

28) New DISKZAP/CMD single/double density disk editor 

29) New BACKUP (more reliable, no more pack ID check) 

30) New FORMAT (more reliable, no need to bulk erase disk first) 

31) New MAP utility (maps out disk, showing where files are located) 



7 MORE UTILITIES ** 



1) Single drive copy 

2) Restore (dead files) 

3) Purge (unwanted files) 

4) Clearfile (destroys data by writing zeros to file) 

5) Transfer (moves all user files from one disk to another) 

6) Spooler (allows printing of text while freeing up the CPU) 

7) Crunch (Basic program compressor) 



New DOSPLUS Z80 

Extended Disk BASIC 

1) Faster loads and saves 

2) BASIC Reference utility (lines, variables, keywords, printer option) 

3) BASIC Renumber utility (renumber section of text, block text move) 

4) Shorthand features for almost ANY direct command (LOAD, SAVE, etc.) 

5) Shorthand features for editing (listing and editing with single key) 

6) CMD"M" instantly displays currently set variables 

7) Global search and replace in BASIC text 

8) Line printer TAB to 255 

9) OPEN"E" to end of sequential file (for output) 

10) Dl (delete and insert text line) 

11) DU (duplicate text line) 

12) ",R" & ",V" options after LOAD and RUN (files open & save variable) 

13) OPEN"D" allowed (Model II compatible) equal to OPEN"R" 

14) DOS commands from BASIC 

15) Automatic, error-free variable length records 

16) Single step execution with TRON (fabulous for debugging) 

17) CRUNCH (BASIC program compressor) 

18) New TBASIC (tiny BASIC) offers full BASIC commands 

19) TBASIC and DOSPLUS together only use BK of RAM (40K left in 48K TRS-80) 



DOSPLUS 3.4 ADDS THESE NEW 
ADDITIONAL FEATURES .... 

1. BASIC array sort - multi key, multi array 

2. Tape/Disk - Disk/Tape utility (with relocator) 

3. Input@ (controlled screen input) 

4. Random access and ASCII modification on 
Diskdump 

5. BASIC checks for active 'DC 

6. Backup and Format from a 'DO' file 

7. Much improved Backup (More reliable) 

8. I/O package much faster (disk access time 
reduced) 

9. Repeat last DOS command with V ENTER 

10. Short directory (file name and extension) 
available 

11. Short directory of Model III TRSDOS disks 

12. Single file convert from Model lil TRSDOS 

13. COMPLETE device routing supported 
(DOS and BASIC) 

14. Ability to save BASIC programs directly to 
another machines' memory (if equipped with 
Dosplus 3.4) 

• Plus many more improvements 

• Includes the new expanded easy to read 
200 + page users guide 

• Also includes the new DOSPLUS Z80 
disk basic VER 1.6 
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* All orders processed within 24-Hours 
* 30-Dayi money back guarantee on all Software 
*Add $3.00 for shipping in UPS Areas 
*Add $4.00 for COD. or NON-UPS Areas within U.S.A 
*Add $5.00 to Canada and Mexico 
■k Add proper postage outside of U.S., Canada and Mexico 




DOSPLUS— $149.95 

(MODEL ! or MODEL 
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ALL PRICES & SPECIFICATIONS SUBJECT TO CHANGE 



OUTSIDE OF NY. STATE) 

(800) 431-2818 (914) 425-1535 






USING CP/M® 

Judi N. Fernandez & Ruth Ashley, 

Co-Presidents, DuoTech 
The first complete, detailed, self-paced introduction to CP/M— Control 
Program/Microcomputers, the most widely used microcomputer 
operating system. Packed with examples and exercises, and assuming 
only rudimentary programming experience, this daily working tool lets 
you use CP/M to perform routine work functions and sophisticated 
tasks with maximum capability and efficiency with a wide variety ot 
hardware, tot any application 

"A marvelous addition to the CP/M literature...! only wish that I had 
had the book when I was starting out!"— Alan R. Miller, New Mexico 
Tech and Software Editor, Interface Age 

$8.95 

TRS-80 ™ BASIC 

Bob Albrecht, Don Inman & Ramon Zamora, 

all of Dymax Corporation 

Packed with games, graphics, and practical applications, this exciting 

new book helps you get maximum enjoyment and use from your TRS-80 

'OUTSTANDING ...the best thing to happen to Level II owners." 
Computronics Monthly News 

"If you're a rank beginner...your novice status won't last long. TRS- 
80 BASIC leads you by the hand through the maze of programming the 
computer to perform both entertaining and useful tasks."— Interface 
A 9e $9.95 

MORE TRS-80™ BASIC 

By Don Inman, Ramon Zamora, and Bob Albrecht 

Here is an exciting new interactive programming guide to advanced 

(unctions A sequel to theauthoi s h ghly popular book TRS-80 BASIC, 
MORE TRS-80 BASIC helps you build on your fundamental knowledge 
of Level II Basic with scores of practical applications that are both 
recreational and educational. It explains all TRS-80 Level II BASIC 
statements, commands, and features not covered in their previous best 
seller 

Along with an exploration of the PEEK and POKE functions, you'll 
get a clear demonstration of several different methods to display 
graphics, including little known "super graphics" techniques. Graphics 
become both fascinating and fun when you learn how to use TRS-80 

string operations and functions ike SET, POKE, and CHR$ to animate 
characters, games, and drawings. 

You'll explore vital concepts in information processing and master 

file handling techniques that apply to both cassette and disk files. You'll 
also discover many "universal" applications easily adaptable to specific 
problems. 

MORE TRS-80 BASIC is one of the Wiley Self-Teaching Guides. It's 
been carefully written so that we're sure you can broaden your under- 
standing of Level II BASIC and expand your programming ability in 
order to make full use of your computing equipment. And it's self- 
instructional— so you work at your own place. Only a beginning back- 
ground in Level II BASIC is needed. $9.95 



UIDES 




John Wiley & Sons 

DATA FILE PROGRAMMING IN BASIC 

LeRoy Finkel, San Carlos High School & Jerald R. Brown, 

Educational Consultant 

Data files are the key to the successful use of microcomputers for 
virtually all business, educational, professional, and sophisticated 
home applications This easy-to-follow guide serves the rapidly grow- 
ing army of microcomputer users by explaining in comprehensive 
detail how to program and maintain data files on microcomputers. It 
uses the most popular variants of BASIC. TRS-80 BASIC and Microsoft 
BASIC-80, with an extensive appendix that covers BASIC for the North- 
star computer. $9.95 
APPLE" BASIC Version $12.95 

FORTRAN IV, 2nd Ed. 

Jehosua Friedmann, Ph.D., 

Jerusalem College of Technology, Jerusalem, 
Philip Greenberg, Ph.D., Kingsborough Community 
College, & Alan M. Hoffberg, CPA, MBA, President, 
Information Resource Management 

A revolutionary new edition of the standard FORTRAN guide— now 
heavily oriented to personal computers. Users of mainframe computers 
will also find the book totally applicable. You'll start writing basic 
FORTRAN immediately, then progress smoothly to standard exten- 
sions and advanced options. Whether you use FORTRAN 77 or FOR- 
TRAN IV, the authors point out all the differences— with comparative 
tables— so you can follow whichever version is right for your machine 
___^_ $10.95 






THE TRS-80 ™ MEANS BUSINESS 
Ted G. Lewis 

Written specifically for business computer users, this hands-on manual 
is the firs, guide to the best-selling Radio Shack Model II Computer. 
You'll discover a wide variety of applications that will turn your system 
into a powerful "filing cabinet"— while making your business a lot more 
manageable. Many ready-to-run programs are included and the most 
difficult aspects of file structure programming are simplified. $12.95 

FAST BASIC 

Beyond TRS-80™ BASIC 

George Gratzer, Ph.D. assisted by Thomas G. Gratzer 

Using fewer than 20 assembly language instructions, and the names of 
60 memory functions, FAST BASIC demonstrates how programmers 
can write faster, more efficient programs. In fact, it actually shows them 
how to improve their programming speed up to 100 times! $14.95 

TRS-80™ COLOR BASIC 

Bob Albrecht 

TRS-80 COLOR BASIC shows users how to appreciate the unique 
color, sound, and graphic capabilities of the TRS-80 Color Computer. 
With games, experiments, programming problems and solutions- 
geared to educational, recreational and home applications— it leads 

novices step by step into good programming practices $9.95 

PROBLEM-SOLVING ON THE TRS-80™ 
POCKET COMPUTER 

Don Inman & Jim Conlan 

The first guide to the new TRS-80 Pocket Computer, this step-by-step 

guide covers a range of educational and practical applications from 
data storage, sorting, and searching to complex chain programming. 

$8.95 
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HOUR 
24 ORDER 
LINE 

(914) 425-1535 




NEW TOLL-FREE 

ORDER LINE 

(OUTSIDE Of N Y STATE) 

(800) 431-2818 

ADD $3.00 FOR SHIPPING IN UPS AREAS 
ADD $4.00 FOR CO.D. OR NON-UPS AREAS 
ADD $5.00 TO CANADA AND MEXICO 
ADD PROPER POSTAGE OUTSIDE OF U.S., 
CANADA AND MEXICO 



ALL PRICES AND SPECIFICATIONS SUBJECT TO CHANGE*"* 
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• TRS-80 is a trademark ol the Radio Shack Division of Tandy Corp. - • PET is a trademark of Commodore 




SOUND EFFECTS AND MUSIC 
FOR YOUR HOME COMPUTER 

SOUNDWARE adds a whole new dimension to your computer. Games 
and programs come to life with lasersounds. bird calls, bounces, clicks, 
sirens, music notes, tunes, and whatever else your imagination dreams 
up 

SOUNDWARE is a complete system It includes a speaker/amplifier unit 
with volume control, earphone jack, and connectors. It boasts excellent 
tone quality yet is small and convenient to use. Add batteries, plug it in, 
and play. One year warranty. 

The INTRO to SOUNDWARE programs include "Demo" and "Sound 

Composer" and provide all the tools for programming you need to make 
sound. You get .... 

A variety of sample sound effects and musical notes. 

Directions to easily create your own sounds and tunes. 

Complete instructions, including sample BASICsubroutines for 

adding sound to any program. 
It's fun! 

INTRO to SOUNDWARE programs only TRS-80 MOD I 
and MODEL III and PET $14.95 

SOUNDWARE PACKAGE (includes INTRO to SOUNDWARE 
programs) 

TRS-80 Level II (16K), MOD III and PET $29.95 




INVADERS 

PROM 

SPACE 



By Carl Miller 



A new and faster machine language approach to this classic (and add- 
ictive) space game. As you play, the aliens drop bombs, move from side 
to side, and try to overrun your bases. All you have to do is shoot them 
oown. It's easy — until they speed up their action! 
You choose the speed, enemy bomb frequency and accuracy, and how 
many shots and bases you have. Unlike other games of this type, you 
can move your base and simultaneously fire at the invaders. Fun for all 
ages and skill levels, it has full sound effects for even more excitement. 

TRS-80 MOD I & III (tape) $14.95 

TRS-80 MOD I & III (disk) $20.95 



THE LATEST ARCADE CRAZE now runs on your TRS-80. 

It's eat or be eaten. You control Scarfman around the maze, gobbing up 

everything in your path. You attempt to eat it all before the monsters 

devour you. Difficulty increases as game progresses. Excellent high 

speed machine language action game. From The Cornsoft Group. 

With Sound. 

CAUTION: Played with the Alpha Joystick, Scarfman may become 

addictive. 

LEVEL II, 16K, CASSETTE MOD I, MOD III $15.95 
LEVEL II. 32 K. DISKETTE MOD I. MOD III S19.95 




JCTSTfiCKS! 



For $39.95 it's now possible to have the famous ATARI joystick inter- 
faced with your Model I. All of our tapes are now completely compatible 
with the joystick. Packaged with complete instructions, you can even 
use it with your own programs! If your old tapes do not say "Joystick 
Version" on them and you wish to exchange them for new Joystick 
versions, enclose $2 and your old tape. 

Model I Joystick $39.95 

Model III Joystick $49.95 




50 N. PASCACK ROAD 
SPRING VALLEY, NEW YORK 10977 



* ADD $3.00 FOR SHIPPING IN UPS AREAS 

* ADD $4.00 FOR COD. OR NON-UPS AREAS 

* ADD $5.00 TO CANADA AND MEXICO 

* ADD PROPER POSTAGE OUTSIDE U.S., CANADA & MEXICO 

ALL PRICES & SPECIFICATIONS SUBJECT TO CHANGE 



HOUR 
24 ORDER 

LINE 

(914) 425-1535 



NEW TOLL-FREE 

ORDER LINE 
(800) 431-2818 



Games from BIG FIVE will turn your computer into a 

TRS-80 HOME ARC- 

MODEL i or MODEL III 



The newest & finest game is now available! "Robot Attack" begins by 
displaying an urgent message from Space Central on your electronic news 
viewer. It seems that robots from the Planet "Jidya" have captured one of 
Earth's valuable space stations. Alarms all over the space station are 
screaming out "Robot Attack! Robot Attack!" Boldly, you make the deci- 
sion to transport yourself to this space station and destroy every last robot! 
As you finally reach your destination, you find yourself in a dark corridor 
that appears very quiet and deserted. Almost from nowhere, robots materi- 
alize ia almost every corner of the compartment that you're in. Quickly & 
skillfully you fire your laser pistol to destroy them. In a blinding flash, their 
bodies explode and disintegrate. After every last one is gone you carefully 
enter the next compartment. Once again your battle is successful It seems 
that you are just too quick for the slow computer minds and the archaic 
photon lasers that these robots possess. Somewhere you here a low hum- 
ming sound that is steadily getting louder "I've heard that sound before", 
you say to yourself. Finally you remember that it is the sound of the new 
long range matter transporter that the Jidyans have recently developed 
Could they be transporting the — , no. they wouldn't send one of those 
just to destroy a human Oh no 1 They did! It's the evil Flagshipi 



ROBOT 
ATTACK© 





SUPER 
NOVA® 



If you and your TRS-80 have longed for a fast-paced arcade-type game that is 
truly a challenge, then SUPER NOVA is what you've been waiting for In this 
two player machine-language game, large asteroids float ominously around the 
screen Suddenly your ship appears and you must destroy the asteroids before 
they destroy you! (But watch out because big asteroids break apart into little 
ones.) The controls that your ship will respond to are thrust, rotate, hyperspace, 
and fire All right! You've done it! You've cleared away all the asteroids! But what 
is that saucer with the laser doing? Quick! You must destroy him fast because that 
guvs accurate 




GALAXY 
INVASION® 



The sound of the klaxon is calling you 1 Cruel and crafty invaders have been 
spotted in battle formation warping toward Earth at an incredible speed. Suddenly, 
your ship materializes just below the huge flock of invaders Quickly and skillfully 
you shift right and left as you carefully fire your lasers at them. But watch out! A 
few are breaking out of the convoy and flying straight at you! As the whine of their 
engines gets louder, you place your finger on the fire button knowing all too well 
that this shot must connect — or your mission will be permanently over! With 
sound effects 1 




ATTACK 
FORCE® 



Your TRS-80 screen has been transformed into a maze-like playfield for this 
game. As your ship appears on the bottom of the screen, eight alien ramships 
appear on the lop All of them are traveling at flank speed directly at you! Quickly 
and boldly you move toward them and fire missiles to destroy them But the more 
aliens you destroy, the faster the remaining ones become. If you get too good you 
must endure the wiath of the keeper of the mazefield: the menacing "Flagship". 
You must destroy him fast because, as you will find out, that guys accurate 1 With 
sound affects 1 




DEFENSE 
COMMAND 



The Galaxy Invaders have returned in this exciting 
new twist on the ever-popular invasion theme. You are in 
command. You must protect the vitally important nuclear 
fuel cannisters from fleets of attacking aliens. Plays on 
Mod I & Mod III. with or without Joystick. With Sound! 
TRS-80 MOD I & III (16K-Tape) $15.95 

(32K-Disk) $19-95 



COSMIC 
FIGHTER® 




With thousands of stars whizzing by you, your SPACE DESTROYER ship 
comes out of hyperspace directly under a convoy of aliens. Almost effortlessly, 
you skillfully destroy every last one. But before you can congratulate yourself, 
another set appears. These seem to be slightly more intelligent than the first set. 
Quickly you eliminate all of them. too. But your fuel supply ic rapidly diminishing. 
You must still destroy two more sets before you can dock with your space station. 
All right 1 The space station is now on your scanners! Oh no 1 Intruders have 
overtaken the station 1 You must skillfully fire your neutron lasers to eliminate the 
intruders from the station before your engines run out of fuel and explode! With 
sound 1 




METEOR 
MISSION II® 



As you look down on your space viewer you can see the stranded astronauts 
that are crying out for you to rescue them. But first you must maneuver your 
shuttle down through the asteroids & meteors before you can reach them. Great! 
You've got one! But now can you get back to the space station to save your fellow 
shipmate or will you crash and kill both of you ? You can fire your lasers to destroy 
the asteroids, but watch out, because there could be an alien FLAGSHIP lurking 
behind 1 Includes sound effects! 



BIG FIVE SOFTWARE 

PRICES PER GAME: 

LEVEL II, 16K, CASSETTE MOD I, MOD III $15.95 
LEVEL II, 32 K, DISKETTE MOD I, MOD III $19.95 
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50 N. PASCACK ROAD 
SPRING VALLEY, NEW YORK 10977 



NEW TOLL-FREE 

ORDER LINE 

(OUTSIDE OF NY. STATE) 



ADD S3. 00 FOR SHIPPING IN UPS AREAS 

ADD S4.00 FOR COD OR NON-UPS AREAS WITHIN THE US A 

ADD S5 00 TO CANADA 8, MEXICO 

ADD PROPER POSTAGE OUTSIDE OF U.S.. CANADA 8, MEXICO 






(800) 431-2818 



••• ALL PRICES & SPECIFICATIONS SUBJECT TO CHANGE 
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(914) 425 1S35 
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compcjvoice TRS-80 

Give your computer a voice of its own - build 
speech into your BASIC programs. This machine 
language program is a must for your library 



hardware modification needed 



$44 93 



RAMCHARGER 
32K UPGRADE 

Color Invaders 
Space War 



FXTFND MFMORY 
FROM I6K to32K 

100% Compatible With 
Fxtended Basic 
No Soldering Or Modific 
Fits Inside Computer 

5 79 4=. 



MADNESS & THE 
MINOTAUR 

I he best adventure game available foi the . 
computer. Over 200 rooms. 6 creatures. 8 ma 
spells, loads of treasures. Written in mach 

language extended Basi< not required S19 



• The Best Games Available 

• High Resolution Graphics 

• Fast. Machine Language 

• Ext Basic Mot Required 

• $2 1 .95 each, cassette 

• $25.95 each, disk 

EXTENDED BASIC GAMES 

• LOTHAR'S LABYRINTH) 
Word Search Puzzle 

• BATTLEFLEET 
Battleship Search Game (one or 
two players) 

• SPACE TRADERS 
Galactic trading game 

$14.95/ea 



NEW MACHINE 
LANGUAGE GAMES 

• COSMIC SUPER BOWL $ 1 4.95 

Similar to hand held football games 

• PACKET MAN $21 9b 

Gobble your way through the maze while 
avoiding the munchkins. 

• CROID $12.95 

Eliza type artificial intelligence game. 

SOUNDSOURCE 

Store music or voice from a cassette tape in the 
At last, a complete description of computer and display it on the TV screen, 
the guts" of the Color Computer. Shorten it. lengthen it. modify it and replay it 
Specs on all the ICs. complete through the TV's sound system. Build and test 
schematics, theory of operation vour own sounds for games No hardware mods 
and programming examples. needed 

UTILITIES 




THE FACTS 



$?4.<J5 





EDITOR/ ASSEMBLER $34.95 

SUPER MONITOR 19.95 

EPROM PROGRAMMER 89.95 

(Program your own ROMs for the ROM-PAC port) 

MAGIC BOX 24.95 

Load MOD l/lll Tapes into the color computer 
DISASSEMBLER b y Korenthai . 1 4.95 

Written in BASIC generate source and object code 
tor the FACTS 



SOFTWARE 
from 

SPECTRAL 
ASSOCIATES 




COMPUTER SOFTWARE 



Software Utilities For The TRS-80 
Color Computer 



SIGMON 

SIGMON is a complete machine Language development tool for your 
TRS-80 Color Computer and it's super powered 6809E microprocessor 

Features: 

MONITOR: Display memory in HEX and ASCII. Direct HEX and 
Decimal entry into memory/Registers, Move. Find, Tape Read and 
Write. Output to printer and more. 

DISASSEMBLER: Display Addresses. Opcode operand. Mnemon- 
ics, and Address expressions for specific range of instructions. 

MINI ASSEMBLER: Allows you to enter instructions in Symbolic 
form and have them coverted to Machine Language. 

DEBUGGER: Allows Stepping and Break point execution of 
Machine Language programs. 

With SIGMON you car- awaken the awesome powers that lark within the 
dark recesses of your color computer. 
Cassette and Source Code for the TRS-80 Color Computer $29.95 



S.E.C.S. 

(Screen Edit Control System) 

SECS adds new power to your TRS-80 Color Computer. If you have 
been waiting for Enhanced BASIC and it's capabilites, then you are 
ready to take the next logical step. 

Features: 

FULL SCREEN EDITOR: Full Cursor control with auto repeat, 
insert, Delete, Join lines, Relocate lines and Audible error warning. 

HI RES GRAPHICS: Two modes of Hi Res graphics, Set point, Set 
line, Set color, Set programmable character. Set screen, and Toggle 
between Low Res and Hi Res/Normal and Inverted Screens. 

HI RES CHARACTER GENERATOR: Sixty-four definable charac- 
ters, Save and Load Characters sets to and from tape, Define Charac- 
ters, and Place on screen in any color and in any position 
The entire system is linked into BASIC and is completely transparent 
to the user As a BASIC programming tool, SECS is unsurpassed. 
Cassette for the TRS-80 Color Computer $29.95 
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50 N. PASCACK ROAD 
SPRING VALLEY, NEW YORK 10977 



ADD $3.00 FOR SHIPPING IN UPS AREAS 
ADD 54.00 FOR COD. OR NON-UPS AREAS 
ADD $5.00 TO CANADA AND MEXICO 
ADD PROPER POSTAGE OUTSIDE OF U.S.. 
CANADA AND MEXICO 



NEW TOLL-FREE 

ORDER LINE 

(OUTSIDE OF NY STATE) 

(800) 431-2818 



HOUR /^^^ 
24 ORDER ^%5p/ 
LINE ^ 

(914) 425-1535 



*** ALL PRICES AND SPECIFICATIONS SUBJECT TO CHANGE** 




HA. ffiinlngton 

TMJShSQ. DISK 

& OTHER MYSTERIES 




by H. G Pennington 

TRS-80 Disk and Other Mysteries is the definitive fix-it book for disk users. 
More than 130 pages of easy to read entertaining and immensely useful 
information. Find out how to recover disk files, the layout of information 
on disks, memory maps, problem solutions ... the list goes on! 

Many readers have saved days of work by recreating disk files that were 
unreadable. TRS-80 Disk and Other Mysteries, which has received 
favorable reviews in several magazines, is yours for only $22.50. 

TRS-80 is a trademark of Tandy 



MICitOSOEF BASK 
DECODED 

<&• OTHER AWSTJ 

for the TRSS*> e 
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by James Farvour 



Microsoft Basic and Other Mysteries is the definitive guide to your Level 1 1 
ROMs. With more than 7,000 lines of detailed comments and 6 additional 
chapters packed with information, it is easily the biggest and best book 
about the Level II ROMs available. 

Exploit the full power of Microsoft Basic with the aid of more than 300 
pages of tested examples, explanations, and detailed comments. Microsoft 
Basic and Other Mysteries is yours for only $29.95. 

* T.NI. Microsoft 
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by Dennis Bathory Kitsz 

Ever wanted to do things to your TRS-80 that Radio Shack said couldn't 
be done? How about reverse video, high resolution graphics, and audible 
keystrokes? 

Not enough? How about turning an 8-track into a mass storage device, 
making music, controlling a synthesiser, individual reverse characters, 
and a real-time clock just to name a few? 

The Custom TRS-80 and Other Mysteries is packed with more than 290 
pages of practical information and can be yours for only $29.95. 

TRS-80 is a trademark of Tandy 
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• EVERYTHING FOR YOUR TRS-80* • • • 

IEI, II and MODEL III 




BASIC- 
IS not neariv 
as slow as most programmers think 

BASIC Faster and Better shows you 
how to supercharge your BASIC, with 
300 pages of fast, functions and subroutines. 
You won't find any trivial poorly designed 
'check-book-balancing' programs in this 
book - it's packed with useful programs. 

Tutorial for the beginner, instructive for 
the advanced, and invaluable tor the 
professional, this book doesn't just talk . . . 
it shows how! All routines are also 
available on disk, so that you can save hours 
of keyboarding and debugging. 

The #1 disk BFBDEM contains all the 
demonstration programs, and #2 BFBLIB 
has ai! (he library functions. 

BASIC Faster & Better is $29.95, 
and the two program disks are $19.95 each. 




TRS-80 is a trademark of Tandy 



(FOR MODEL I, MODEL II and MODEL III) 
— Contents — 

* Subroutines, "Handlers," and "Shells" 

* Super-Power Function Calls 

* USR Routines - For Speed and Flexibility 

* Magic Memory Techniques 

* BASIC Overlays 

* Number Crunchers and Munchers 
•Using Strings in New Ways 

* Date and Time Manipulation 

* Bit Manipulation 

* Arrays, Searches and Sorts 

* More — Arrays, Searches and Sorts 

* Keyboard and Video Trickery 

* Data Entry Made Easy 

* Useful Utilities 

* Model 2 Modifications 

* The Faster and Better Disks 



•CQMPLITRQNXCS" 

50 N. PASCACK ROAD 
SPRING VALLEY, NEW YORK 10977 

BASIC FASTER AND BETTER $29.95 

BFBDEM (Demo Disk) $19.95 

BFBLIB (Library Disk) $19.95 

TRS-80 DISK & OTHER MYSTERIES .$22.50 
MICROSOFT BASIC DECODED & 

OTHER MYSTERIES $29.95 

THE CUSTOM TRS-80 AND OTHER 

MYSTERIES $29.95 

fflggg^ NEW TOLL-FREE 

*^H ORDER LINE 

/•^ (OUTSIDE OF NY STATE) 

oTer /fe? (800)431-2818 

I IkJC ' "^J ADD $3.00 FOR SHIPPING IN UPS AREAS 

*" "^ C ADD $4.00 FOR COD. OR NON-UPS AREAS 

/r\-4A\ /IOC 1COC ADD $5.00 TO CANADA AND MEXICO 

(y 14) ^titD" IbJb ADD PROPER POSTAGE OUTSIDE OF U.S.. 

CANADA AND MEXICO 

ALL PRICES AND SPECIFICATIONS SUBJECT TO CHANGE*** 
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COMPUTER PICKS WINNER 70% OF THE TIME* 
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Now there's a space-age 
computer that helps you 
narrow the odds, for it has 
been specially designed to 
give you a class rating or 
every thoroughbred race horse 
horse on every track in North 
America. No, this isn't a toy or 
merely an ordinary calculator. It's a 
sophisticated state-of-the-art computer 
that contains a special Texas Instrument: 
microprocessor computer chip (Tf _ 
1100/MP3452NL) specifically programmed 
with our unique handicapping system of 
Established Class Ratings. These ratings, 
together with an easy-to-follow system for 
qualifying selections, provide you with the 
most probable winner. And. there's no 
prior handicapping experience necessary! 
They even show you when you should con- 
sider combination races— Daily Doubles 
and Exactas (Perfectas)— and how to play 
them 

THE COMPUTER GIVES YOU 
THE RATING 

We have pre-programmed the Kel-Co Class 
Computer with the four different formulas 
accounting for purse distribution used by 
every racetrack in North America. To 
operate simply 1) enter the track category 
number where the horse nas raced 2) enter 
the number of Wins. Places. Shows and 
Forths 3) depress the E7R button 4) enter 
the earnings and 5) push the E/'R button 
The computer instantly evaluates each 
horse's performance and displays the 
horse's Kel-Co Established Class Rating. 

PRINCIPLE OF ESTABLISHED 
CLASS 

The rating developed by the computer is 
based on the premise that thoroughbred 
class is best measured by the size of the 
purses that the horse has successfully 
competed for in the recent past This 
rating is determined mathematically by the 
computer as a function of the horse's ear- 
nings and finish positions from past per- 
formance charts in very basic terms, this 
would probably mean that a horse with on- 
ly one win and $5,000 in earnings would be 
likely to beat a horse with three wins and 
only $8,000 earned 

The rating also indicates the purse size of 
the race in which the horse is likely to win 
if tit and ready This means that a horse 
running in a race with a lower purse value 
than his rating represents a real "drop 
down" and a potentially strong bet. A 
horse with a lower rating than the purse 
value, however, is moving up in class and 
will seldom be a serious contender 



nner 



DEVELOPED BY 
PROBABILITY EXPERT 

The Kel-Co Class Computer is based upon 
the same principles as the Kel-Co Slide 
Rule, developed by Dr. A. Stuart Kelsey in 
1969. Dr Kelsey is a probability and 
statistical expert and was a member of the 
space research team which perfected the 
Lunar Excursion Module for the Apollo 
space program. Applying his expertise in 
probability studies. Dr. Kelsey created a 
system that made his Slide Rule the most 
widely used handicapping aid in North 
America. That same method is embodied 
in the Kel-Co Class Computer. 



The Kel-Co Class Computer comes com- 
plete with battery, AC adaptor, operating 
instruction book and handicapping guide. 
And don't forget, the computer will also 
operate as a powerful 4-function 
calculator, complete with percent key and 
bright LED display. 



* Cannella Corp. claims that strict adher- 
ents to the system will find themselves in 
the money about 70% of the time. Money 
magazine put it and a competitor through 
their paces and concluded, "There is no 
question that either kel-Co or Racetrack II 
can help a lout like me (or even an experi- 
enced bettor) to invest more scientifically 
at the expense of poor suckers " 

H & E Computronics offers its full 30-day 
Money-back Guarantee on the Thorough- 
Bred Computer. 



H & E COMPUTRONICS, INC. 

50 N PASCACK ROAD • SPRING VALLEY, NEW YORK 10977 (914) 425-1535 
OUTSIDE NY STATE - CALL TOLL FREE (800) 431-2818 

PLEASE SEND ME: THOROUGHBRED COMPUTER $99.95 

□ VISA □ MASTERCARD □ AMERICAN EXPRESS 

Card Number Card Expires. 



Please Print 
Name 



(Your Signature Here) 



Address 
City 



State. 



Zip 



Meet the 
ith hoi 




INTRODUCTION 

The Kel-Co Trot Computer is a 
scientifically engineered 
special purpose computer 
designed to provide an ac- 
curate and rapid means for 
obtaining the Kel-Co ratings 
for harness race horses. 
These ratings, together with a 
few basic rules, provide a 
statistically proven handicap- 
ping method. 

The unit has two modes of 

operation: the "computer 
mode" and a "calculator 
mode." The computer mode 
contains the programmed for- 
mulas for the Kel-Co Trot 
ratings using a special Texas 
Instrument microprocessor 
chip (TMS 1100/MP3490N-1). 
In the calculator mode the 
unit operates as a standard 
calculator. 

The novice will find his lack of 
experience no problem. He 
need only know how to read 

the track program, and this in- 
formation is found within 
each program. The instruc- 
tion manual is complete, it 
tells what races to avoid, 
what horses to eliminate, how 
to rate the horses, and how to 
play the various types of 
wagers. 

This computer is an out- 
growth of the original Kel-Co 
Trot Calculator (Slide Rule) 
first marketed in 1969. 
Although based on the same 
general principles, it has 
undergone extensive refine- 
ments in theory. In addition, 
by its very nature, the elec- 
tronic computer is much 
easier to use, more accurate, 
and much faster than the 
slide rule calculator. 




GUARANTEE 

Cannella Corporation pro- 
vides a full six month warran- 
ty, from date of purchase, and 
will repair defects in material 

and workmanship, free of 
charge. 



COMPUTER PICKS 

WINNER 

70% 

OF THE TIME 



Cannella Corp. claims that strict adher- 
ents to the system will find themselves in 
the money about 70% of the time. Money 
magazine put it and a competitor through 
their paces and concluded, "There is no 
question that either Kel-Co or Racetrack II 
can help a lout like me (or even an experi- 
enced bettor) to invest more scientifically 
at the expense of poor suckers " 

H & E Computronics offers its full 30-day 
Money-Back Guarantee on the Trot 
Computer. 



H & E COMPUTRONICS, INC. 



50 N PASCACK ROAD • SPRING VALLEY. NEW YORK 10977 (914) 425-1535 
OUTSIDE NY. STATE - CALL TOLL FREE (800) 431-2818 

PLEASE SEND ME: TROT COMPUTER $129.95 

□ VISA □ MASTERCARD □ AMERICAN EXPRESS 
Card Number Card Expires 



Please Pnni 

Name 



(Your Signature Here) 



Address 
City 



State 



Zip 



The Original Magazine for Owners of the TRS-80™ Microcomputer 



MODEL 



MODEL II 



MODEL III • POCKET COMPUTER 



COLOR COMPUTER 



Software 

for TRS-80 

Owners 



•CQIYIPLJTRQNICS 

MONTHLY NEWS MAGAZINE 




PRACTICAL APPLICATIONS 

NEW EXPANDED BUSINESS 
SECTIONS 

GAMBLING 

GAMES 

EDUCATION 

PERSONAL FINANCE 



•BEGINNER'S CORNER 

• NEW PRODUCTS 

• SOFTWARE EXCHANGE 

• MARKET PLACE 

• QUESTIONS & ANSWERS 

• PROGRAM PRINT OUTS 
...and MORE! 



YOUR CHOICE k. 



FREE 



A. 



with your Subscription or Renewal 



NANOS SYSTEMS CORP 

TRS-80 At Your 

Fingertips Complete quick 
reference guide to basic, assem- 
bly language and graphic codes 
— all at your fingertips for all 
TRS-80 computers (specify 
computer). 

Assembly Language Section N A lot Color Compuier 



B. 



OR 



A Word Processor, 
Data Management 

System and Cleanup 

(A maze game) All on cassette. 
(Add $3 for diskette, add $5 for 
modified MOD-II diskette version 
— N/A on color computer or 
pocket computer.) 



^READER SERVICE FOR H & E COMPUTRONICS ^9 



'CQMPLITRQNICS 



CALL TOLL FREE 

800-431-2818 



50 North Pascack Road 
Spring Valley. New York 10977 

(Outside of New York State) 

□ One Year Magazine Subscription S24 □ New □ Renewal 

□ Two Year Magazine Subscription $48.00 □ New □ Renewal 

□ Sample Issue $4. □ Mod II Newsletter Subscription $18 
Your Choice TRS-80 " at Your Fingertips or Word Processor/ Data Management 
Model I Model II Model III Color Computer Pocket Computer 



24 HOUR ORDER LINE 

914-425-1535 



i i 



NEW! 



NEW! 



MOD-II 

NEWSLETTER 

"$18/year (or 12 issues)" 



Name 



Address 



City 



State 



Zip 



Signature 



Credit Card Number 



Expiration Date 



Ada Si 2/ Year (Canada. Mexico)— Add S24' Year Air Mail outside ot USA Canada and Mexico 
Ail Prices and Specifications Subject to Change 

" TRS-80 is a trademark of the Radio Shack Division ot Tandy Corp 



The Key Box 

Model I 

32K RAM 

Radio Shack Fortran Compiler 



GAME 



Can you figure out the secret code? 



Fortran Puzzler 



Richard A. Yehle 

8952 Autumnwood Drive 

Sacramento, CA 95826 



One of the problems present- 
ed as part of a Fortran pro- 
gramming course I recently 
completed was quite challeng- 
ing, and took many hours of 
work to complete. The problem 



is presented below along with 
my solution. The reader might 
attempt a solution prior to input- 
ting the program. 

The program runs on a 32K, 
two disk TRS-80 Model I using 
the Radio Shack Fortran Lan- 
guage Compiler. The problem is 
from a textbook entitled Fortran 
for Humans, Second Edition, by 
Rich Didday and Rex Page, 
West Publishing Company. 



"The 57th Street Whiz Kids" (a 
tough gang) have found it neces- 
sary to contact one another in 
secret code. A member must 
write his message on a scrap of 
paper. Under each character (in- 
cluding spaces and punctuation 
marks), he places an integer be- 
tween and 42 according to the 
following scheme: 0-25 for A-Z 
respectively; 26-42 for the char- 
acters blank.,- ()'0 1 234 56 7 









Program Listing 




00100 


C 


WRITTEN BY: RICHARD A. YEHLE 




00200 


c: 


SACRAMENTO, CA 95826 11-80 




00300 


c 


PURPOSE - TO DECODE A SECRET MESSAGE 




00400 


c 




» 


00500 


c 


FOUR LEVELS ARE NEEDED TO ARRIVE AT A DECODED MESSAGE 




00600 


c 


1. CODED MESSAGE 




00700 


c 


2. ADDED INTEGERS 




00800 


c 


3. INTEGERS 




00900 


c 


4. WRITTEN (DECODED) MESSAGE 




01000 


c 






01100 


c 


LIST OF VARIABLES - 




01200 


c 


I( ) - ARRAY WHICH CONTAINS CODED MESSAGE AS READ 




01300 


c 


J - INDEX TO VARIOUS DO LOOPS 

Program Listing Continues 



8 9 respectively. Then he adds 
each pair of numbers and writes 
the result below the pair with the 
convention that if the sum is 43 
or more, he subtracts 43 from it 
first so that each number writ- 
ten will be between and 42. He 
then decodes the numbers into 
characters, again using the 
above scheme. For example: 

• Written message MEET JIM 10 P.M. 

• Integers 12 04 04 19 26 09 08 12 
26 34 33 26 15 27 12 27 

• Added Integers 16 08 23 02 35 17 20 38 
17 24 16 41 42 39 39 

• Coded message QIXC2RU5RYQ966 

The coded message has 15 
characters, whereas the original 
message has 16. With this code 
system the original message 
always has one more character 
than the coded message. To 
decode their message, the Whiz 
Kids agreed that the original 
message should always end 
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with a period. 
The program reads coded 

messages from cards in the For- 
mat 80A1 and Prints the decod- 
ed message. The coded mes- 
sage has fewer than 500 charac- 
ters and the end of the coded 
message will be marked with a 
slash (/). The slash should not be 
used in decoding the message. 
You may use the above mes- 
sage to test your program. 

The program is well docu- 
mented to make it easy to 
follow. The hardest part is typ- 
ing in the coded messages with- 
out errors. It took me several 
trios for each one. 

For those unfamiliar with the 
Fortran compiler, I suggest 
several easy steps: 

• Insert disk number one. 
Type Edit. 

• To the question File, input 
your file name (LAB01/FOR). If 
it's a new file hit Break, if used 
prior depress Enter. 

• When the asterisk appears 
depress the I key and input the 
program. Place C (for comment) 
in the first available column. 
Otherwise place the line number 
markers in columns two, three, 
four. In the case of lines 3200- 
3400 on the program supplied 
the one, two, or three is in col- 
umn six, I found that instead of 
finding column seven for the 
program itself, it was easier to 
hit the right arrow (tab). 

• When finished hit Break 
then the letter E. for exit, and the 
name of the file. It will be saved 
on disk. 

• Type F80 FILE,FILE = FILE 
which will create the object file 
(/REL) and Listing File (/LST) 
generated from the Fortran File 
(/FOR). 

• Using disk number two, 
type L80 FILE-N.FILE-E which 
will generate a command file 
(/CMD) which can be executed 
from TRSDOS by typing the File 
Name and entering. 

Most of the above can be 
found in the Fortran user's 
manual supplied with the 
TRS-80 Fortran package. It 
helps to know the Fortran lan- 
guage to work with Fortran pro- 
grams, naturally, but with the 
above information and a Fortran 
compiler, it should be easy to 
make this program function. ■ 
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Program Listing Continued 




01430 C 


Jl - INDEX TO DO LOOPS USING THE Q ARRAY 


01500 C 


K( ) - ARRAY USED TO STORE THE ADDED INTEGERS 


31600 C 


L - USED TO CALCULATE SUBSCRIPTS FROM END OF ARRAY 


01700 C 


LI - COUNT OF CHARACTERS IN CODED MESSAGE 


01800 C 


L2 - PREVIOUS SUBSCRIPT FOR CALCULATIONS OF INTEGERS 


01900 C 


MESS - MESSAGE COUNTER USED FOR OUTPUT 


02000 C 


N( ) - ARRAY WHICH CONTAINS INTEGER VALUES 


02100 C 


NUM - EQUALS ADDED INTEGER OR Q SUBSCRIPT LESS ONE 


02200 r 


Q( ) - ARRAY WHICH STORES MASTER CHARACTERS 


023 00 C 


R - INITIAL VALUE FOR J IN READ IMPLIED DO LOOP 


02 40 <: 


S - TERMINAL VALUE FOR J IN READ OR WRITE LOOPS 


02500 C 




2600 


INTEGER Q(44) ,R,S 


2700 
02800 c: 


DIMENSION 1(500) ,K(500) ,N(500) 


290 C 


INPUT MASTER CHARACTER SET INTO ARRAY AND ZERO VARIABLES 


03000 C 




333O0 


DATA Q/lHA,lHB r lHC,lHD,lHE,lHF,lHG,lHH,lHI,lHJ,lHR r lHI„lHM, 


03 200 


lHN,lHO,lHP,lHQ,lHR,lHS,lHT f lHU,lHV,lHW,lHX,lHY,lHZ, 


3 3 


2 1H ,1H.,1H,,1H-,1H(,1H) ,1H' ,1H0,1H1,1H2,1H3,1H4,1H5, 


3 4 


i 1H6,1H7,1H8,1H9,1H//, 


03450 
P 3 ~ Li C 


J N/500*0/,K/500*0/,MESS/0/,I/500*lH / 


03600 c 




0370 C 


PRINT HEADER AND READ CODED MESSAGE INTO I( ) 


03 800 C 




3 900 


WRITE(2,2) 


03 00 


FORMAT (1H0, 'THE FOLLOWING ARE CODED AND DECODED MESSAGES') 


041 OS C 




OOOOO 3 


L1 = 


04300 4 


R=L1+1 


3300 


S=R+79 


04500 


READ(5,10,END=999) (I(J) ,J=R,S) 


4600 10 


FORMAT (80A1) 


04700 C 




4 000 C 


COUNT OF CHARACTERS IN CODED MESSAGE UP TO SLASH MARK 


04 900 C 




5 000 


DO 200 J=R,S 


05100 


IF(I(1) .EQ.Q(44))GOT0995 


j 2 


IF(I(J) .EQ.Q(44))GOTO300 


05300 


IF ( J. EQ. 500. AND. I (J) ,NE.Q( 44) ) GOT0998 


5 4 


L1=L1+1 


3 5 500 500 


CONTINUE 


05600 


GOT04 


05700 998 


WRITE(2,34) 


05800 34 


FORMAT (1H0, 'NEXT MESSAGE DID NOT END WITH A /') 


5 500 C 




06 000 C 


PRINT HEADER AND/ OR ERROR MESSAGE THEN CODED MESSAGE 


05100 C 




06 200 300 


MESS=MESS+1 


06300 


WRITE (2, 30) MESS 


00. 50 3 


FORMAT (1H0, 'CODED MESSAGE NUMBER', 13,' WAS ') 


05:500 


GOTO 350 


06603 555 


MESS=MESS+1 


065 


WRITE(2,32)MESS 


06800 32 


FORMAT (1H0, 'NO. INPUTS FOUND FOR MESSAGE NUMBER ',13) 


06900 


GOT03 


07000 550 


WRITE(2 r 40) (I(J) ,J=1,L1) 


07100 40 


FORMATUH ,60A1) 


07550 C 




0/ 100 


COMPARE FINAL CHARACTER TO Q( ) TO OBTAIN FINAL ADDED INTEGER 


07 400 C 




37 50 


R=L1+1 


7 t 


DO 400 Jl=l,43 


07700 


IF(I(L1) .EQ.Q(J1))NUM=J1-1 


07 800 


IF(I(L1).EQ.Q(J1))GOTO450 


07 900 


IF(J1.EQ.43.AND.I(L1) .NE.Q( Jl) ) GOT0997 


3000 400 


CONTINUE 


36100 C 




5300 C 


CALCULATE VALUE OF INTEGER PRIOR TO FINAL PERIOD 


08300 C 




03400 450 


N(Ll)=NUM-27 


8500 


IF(N(L1) .LT.0)N(Ll)=N(Ll)+43 


5630 


L=L1 


5700 


N(L)=N(L1) 


08800 C 




08900 C 


CALCULATE INTEGER VALUES, PLACE IN ARRAY N( ) 


3 '10 C 




i^li-f 


DO 500 J=2,L1 


09200 


L=L1-J+1 


5 3 


12=Ll-J+2 


09400 


DO 600 Jl=l,43 


5 5 


IF(I(L) .EQ.0(J1))NUM=J1-1 


3 5 


IF(I(L) .EQ.Q(J1))GOTO.650 


5 7 


IF(J1.EQ.43.AND.I(L) ,NE.Q( Jl) ) GOT0997 


05500 600 


CONTINUE 


5 400 650 


N(L)=Nl)M-N(L2) 


10000 


IF(N(L) .LT.0)N(L)=N(L)+43 


10100 500 


CONTINUE 


10200 C 




10300 6 


TRANSLATE INTEGERS IN N( ) TO DECODED MESSAGE K( ) 


10400 C 




10500 


DO 700 J=1,L1 


10600 


J1=N(J)+1 


10700 


K(J)=Q(J1) 


10800 700 


CONTINUE 


10900 


K(R)=Q(28) 


11000 C 




11100 5 


PRINT HEADER AND UNCODED MESSAGE 


11200 C 




11300 


WRITE (2, 50) 


11400 50 


FORMAT (1H0, 'UNCODED MESSAGE IS: ') 


1 1 5 5 


WRITE(2,60) (K(J) ,J=1,R) 


11600 60 


FORMAT(lH ,60A1) 


115 5 5 


GOTO 3 


11800 C 




11900 C 


HEADER PRINTED IF UNRECOGNIZED CHARACTERS WERE ENCOUNTERED 


1 3 3 3 




12100 997 


WRITE(2,70)MESS 


12200 70 


FORMAT(lH ,'BAD CHARACTER IN MESSAGE -',13,' — NOT TRANSLATED') 


12300 


G0TO3 


12 4 C 




12500 C 




12600 999 


STOP 


12700 C 




1 5 3 


END 



The Key Box 

Basic Level II 

Direct Couple Modem 



HARDWARE 



Built with parts gathering dust in the basement 



Modem Auto- Answer 



Don Westbrook 
5532 Mutton Avenue 
Baltimore, MD 21207 

My greatest brainstorms always happen 
late Saturday; Sunday finds me 
searching electronic stores for parts not 
yet invented. I decided my next project 
would use the parts gathering dust in the 
basement. 

My new Radio Shack direct couple 
modem let me run up quite a large tele- 
phone bill calling bulletin boards. I decided 
to build an auto answering device for the 
Radio Shack direct couple modem. The 
parts are not critical: Use almost any relay, 
SCR, or bridge diode. The capacitor in the 
circuit detecting the ring must be rated high 
enough (100WVdc). 

Answering 

After playing with my meter on the phone 
line I discovered it had 50 V across the lines 
until it rang, when about 90 V came across. 
The computer answers the phone when a re- 
lay signals a voltage greater than 60 or 70 
across the line. Since I wanted the current 
traveling in the same direction I put in a 
diode bridge (see Fig. 1). Bingo! Every time 
the phone rang, the relay latched on. 

To connect the modem to the phone line I 



Resistors: 

R1 1000 Ohms 

R2 380 Ohms 
Capacitors: 

C130pf(100WVdc) 
Diode Bridge: 

1 00 PIV 
Relays: 

RY1 12-24V NO. 

RY2 12V N.O. OPST Reed relay RS#275-229 

RY3 9-12V NC. relay 
Switch: 

SW1 N.C. push to open switch 
Silicon Controlled Rectifier: 

SCR 100 PIV RS#(?76-!152) 
Subminiature jack 
9V power source 
Modular telephone jack 
Modular telephone plug it desired 

Table 1. Parts List 



latched another relay to the first circuit. I 
kept the modem on constantly. The circuit 
in Fig. 2 keeps the relay latched after the 
ringing stops by locking the SCR after a 
voltage is applied to its gate. 

I found the perfect power pack in an old 
calculator. I attached this circuit across the 
contacts of the answering circuit's relay. I 
added a relay along the circuit to reset the 
SCR and hang up the phone. I used the cas- 
sette port on/off switch to control the last 
relay, wired to be in the closed position until 
the cassette port switch closed the circuit 
to the coil. This opened the circuit across 
the relay contacts. By sending "Out 255,4" 



30/tF 

CAPACITOR 
(IOO WVDC) 



several times in a loop, the circuits reset 
themselves and hang up the phone. The 
computer is then ready for the next caller. 
By examining the value at the modem 
status register the computer could deter- 
mine if someone is on the line and if a car- 
rier signal is coming over. That port is 
0E8H(232). Use the interrupts to check this 
port frequently for carrier signals; if one is 
not found the computer will hang up the 
phone. I hope a talented reader will address 
this problem. In the meantime have your 
program check this address occasionally 
and take the proper action, or make sure 
that your friends log off by calling a pro- 




SILICON 
DIODE BRIDGE 



NORMALLY 
OPEN 

RELAY 
I2-24V 



Fig. 1. Diode bridge answering circuit 



SAMPLE INKEYS ROUTINE FOR CHECKING PORT 

(0E8H) FOR SIGNALS 
1 
2 

3 10 a$ = inkey$:gosub1000:ifa$ = ""then 10 
4 

5 1000if inp(232) = 191 then 1005 else return '191= NO 
CARRIER 

6 1005c=0 'set counter 

7 1010 for T= 1TO30 

8 1020 if inp(232) = 191 then c = c + 1 '191 is no carrier 

9 1030 next 

10 1040 it c>10 then 1050 else return 'buffer out a glitch 

11 1050 for t = 1 to 100 

12 1060 out 255.4 'RESET ANSWER CIRCUIT 

13 1070 next 

14 108C return 

Program Listing 
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"Sunday finds me searching electronics stores for 
[Darts not yet invented.'' 



gram or subroutine with the proper "Out 
255,4" loop. I found it best to repeat this 
about 100 times in the loop. 



Place the circuits on a small perfboard no 
bigger than a cassette. A modular phone 
jack plugs the modem right into the circuit. 



A modular plug makes the answering de- 
vice easy to place and remove from the 
phone jack.H 



WALL 
TELEPHONE 

JACK 



RED GRN 



CI 

30 M F 

(IOOWVDC) 



1\ 




Kl 
I Kfl, 

-Wv- 



--J 



DIODE 
BRIDGE 
IOO PIV 



RELAY I 
N.O. 

I2-24V 
REED RELAY 



SCR 
25PIV 



RELAY 2 
N.O, 
9- I2V 
REED RELAY 



RED 



>S 



"1 




I J 



EI9V 



ON/OFF PLUG 

(SMALLEST PLUG 
OF THE THREE) 

SUBMINIATURE JACK- 



RELAY 3 
N. C 
9-I2V 



GREEN 



^a 



I 



SWITCH I 

NORMALLY CLOSED 
PUSH TO OPEN 



MODULAR 

TELEPHONE 

JACK 



MODEM 



TO RS232C 



Fig. 2. Modem connect circuit 



0NINITERN1 

What is OMNITERM? 

OMNITERM is a professional communications package for the TRS-80 that allows 
you to easily communicate and transfer files or programs with almost any other 
computer. We've never found a computer that OMNITERM can't work with. It's a 
complete package because it includes not only the terminal program itself, but also 
conversion utilities, a text editor, special configuration files, serious 
documentation and serious support. 

Why do I need ii? 

You need OMNITERM if you need to communicate efficiently with many different 
computers, or if you want to customize your TRS-80 for use with one particular 
computer. You need OMNITERM to SOLVE your communications problems once 

and for all 

What do I get? 

The OMNITERM package includes the OMNITERM terminal program, four 
conversion utilities, a text editor, and setting files for use with popular computers 
such as CompuServe, the Source, and Dow lones — just as samples of what you can 

indbergh Systems 



The ULTIMATE TRS-80 Terminal Package 



do for the computer you want to work with. The package includes six programs, seven 
data files, and real documentation: a 76-page manual that has been called "the best in 
the industry." And OMNITERM comes with real user support. We can be reached 
via CompuServe, Source, phone, or mail to promptly answer your questions about using 



What do I need to use OMNITERM? 

A Model I or Model III TRS-80. at least 32K of memory, one disk, and the RS-232 
interface, or Microconnection modem. OMNITERM works with all ROMs and OOSes. 
and will work with your special keyboard drivers. 

What will it do? 

OMNITERM allows you to translate any character going to any device: printer, screen, 
disk, keyboard, or communications line, giving you complete control and allowing you to 
redefine the character sets of all devices It will let you transfer data, and run your 
printer while connected for a record of everything that happens. OMNITERM can 
reformat your screen so that 80 32 oi 40 column lines are easy to read and lank neat on 
your TRS-80 screen It even lets you get on remote computers with just one keystroke! 
The program lets you send special characters, echo characters, count UART errors, 
configure your UART send True Breaks and use lower case. It accepts VIDEOTEX codes, 
giving you full cursor control. It will even let you review text that has scrolled off 
the screen 1 Best of all. OM NITE RM will save a special file with all your changes so you 



can quickly use OMNITERM for any 

one of many different computers by 
loading the proper file It's easy to use 
since it's menu driven, and gives you a 
full status display so you can examine 
and change everything. 

"OMNITERM has my vote as the top 
TRS-80 terminal program available today" 
Kilobaud Microcomputing, June 1981. 
pages 16-19. 



41 Fai 



OMNITERM is S95 (plus shipping if 
COD) Call for 24 hour shipment. Manual 
alone S15, applied toward complete pack- 
age. Visa, M/C. and COD accepted. MA 
residents add 5% tax. Dealer inquiries 
invited. 

Contact Lindbergh Systems for your 
custom programming needs. We are 
expert at writing software to work with 
YOUR hardware, in assembler, high-level 
language, or Forth. 

S 135 
01520 (617)852-0233 Source TCA818 CompuServe 70310267 TRS-80 is a '"of Tandy Corp 
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from SIEMENS 

NEW PRICES 

EFFECTIVE 4-1-82 



DISK DRIVES 

HARD DISKS & FLOPPIES FOR YOUR HEATH, RADIO SHACK, OSI & S-100 SYSTEMS 

ATTENTION RADIO SHACK MOD I, MOD II AND MOD III USERS 

Floppy Disk Services has disk drives for all your needs. Our 5 1 /4 inch drives are tops for the Mod I. Our 8 inch 
drives are perfect for the Mod II! And our Dual sided 80 track units are perfect for the Mod III! All drives are 
brand new factory warranted. 

5 1 A DISK DRIVES (MODEL FDD-100-5b) for Heath, RS MOD I, S-100, N. Star & more 
SIEMENS 5V 4 " drives are single sided, single or double density drives that are designed foryears of trouble 
free service. These are the flippy models which other companies charge 1 5 to 30 dollars more for. The 5V4" is 
the exact same one used in the HEATH systems, but check our price! . NOW $240.00 

5 1 /4" WITH CASE AND POWER 

Our5 1 /4" drives are also available in system packages. One 5V<x" flippy in case with 
power supply tested $285.00 

2 drives in dual case $585.00 

80 TRACK - DOUBLE SIDED 5 1 /4" for Heath, CDR, RS MOD III, S-100 & more 

A new product from SI EM ENS. This beauty is a new entry to the Floppy market. Get up to 800 K Bytes storage 
on a 5V 4 " diskette. Model #FDD-221-5 NOW$350.00 ea. 




PACKAGE DEAL 80 TRACK S'A" 

1 dual sided 80 track drive (in case withpowersupply) $395. 



Two 80 track double sided (m one enclosure) $795. 



8" FLOPPY DISK DRIVES (MODEL FDD-1 00-8d) for Heath, OSI, S-100, RS MOD II & more 

SIEMENS 8" drives are single sided, single or double density with simple power requirements. +24and+5 
VDC. It has automatic diskette ejection and a fail safe interlock that prevents the door from closing on a 
partially inserted diskette. The track to track time is as fast as 4ms. These drives are completely compatible 
with your MOD II, OSI, and many other systems NOW $340.00 ea. 

8" SYSTEM PACKAGES 

One or two 8" SIEMENS drives with cabinet (choice of vertical or horizontal) power supply, all power 
connections, manuals and fan. A beautifully functional package built only of the best grade components. 
Available fuliy assembled and tested for $100.00 more. 

Single 8" drive in dual cabinet (data cables extra) $650.00 

Dual drive package (data cables extra) $980.00 

ATTENTION HEATH H-88, 89 OWNERS 

HEATH owners, we now have the CDR controller card that allows you to use our 8" 
drives on the H-88 or H-89 computers! You may mix any combination of 8" or5V4" 
drives and also change your system to soft sectored formatting! Mix any combo 
single sided, double sided, single density or double density. We even include the 
zero origin prom. As a special offer we are giving you ALL necessary components 
with this system, even the patch for C/PM! 

A complete dual 8" system for the H-88 or H-89 $1 450.00 

Dual 5V«" 40 track system with controllers'] 050. Dual 5V*" 80 track system with controller $1 250. 

WINCHESTER TECHNOLOGY HARD DISK SYSTEMS 

5 or 10 MEGABYTE Hard Disk systems for your HEATH H-88, 89, Radio Shack 
Mod I, II or III, Apple, IBM, or any S-100 system! You get a 5 or 10 megabyte 
formatted hard disk, power supply, cabinet, all interfacing cables, and CP/M boot 
loader. Most of all its all factory preassembled and tested, burned in and ready to 
run! You even get a real time clock (except HEATH). Built only of commercial 

grade components JUST $2400. 5mb and $2700. 1 0mb 

quantity discounts available some of the 8" packages require assembly. ..we carry parts for Siemens 

PAYMENT POLICY ^^^M 

We accept Mastercard, Visa, personal checks & MO. We reserve the right to wait 1 Oworkingdaysf or personal checks toclear ^^| 

your bank before we ship. All shipping standard UPS rates plus insurance. NJ residents must add 5% sales tax HUHHti 

FLOPPY DISKSERVICES, INC 




CONTROLLER ONLY 

450.00 




C.N.5212 

PRINCETON, NEW JERSEY 08540 



^267 



PHONE INQUIRIES WELCOME 9AM to 5PM (ET) 

609- 77 1-03/4 



PRICES & SPECIFICATIONS SUBJECT TO CHANGE 

.--See List ol Advertisers on page 386 



MOD II, CP/M are trademarks of Tandy and Digital Research respectively. 
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TUTORIAL 



(fS* 



LOAD 80 



An exercise using pseudo-code. 




finement 



B. Boasso 

700 North Wendy #700 

Newbury Park, CA 91320 



In recent years the software 
industry has preached the 
virtues of structured program- 
ming. Several compilers and lan- 
guage pre-processors supply 
the constructs for block struc- 
turing and enforce such con- 
cepts as "picture on a page" 
and the absence of GOTO's. 
These concepts have value not 



* 



Figure 1 




only in coding, but also in pro- 
gram design. This article 
presents the technique of step- 
wise refinement, as well as a 
utility I wrote via the procedure. 

First Things First 

Before starting the design, 
let's list some definitions and 
set several simple rules. Design 
language is a series of state- 
ments in the sequence the pro- 
gram will execute them. The 
statements of the design are 




called control structures. I 
restrict the design here to only 
five control structures listed 
below. 

• Statement— Statement. 
This construct, called a se- 
quence, consists of two state- 
ments executed in order. Any 
statement in a sequence may be 
replaced by any other control 
structure (including another 
sequence). See Fig. 1. 

*lf predicate— Then state- 
ment 1—Else statement 2. This 



( STATE ■ V 



STATEMENT I 



( STATE 2 ) STATEMENT 2 



( STA-tr V 



Figure 3 



STATEMENT,, 



allows selection of the path of 
execution, based on logical 
evaluation of the predicate of 
the If statement. See Fig. 2. 

• Case selector— statel: 
statement 1 state 2 : statement 2 
. . . staten : statementn—End. 
This control structure works like 
a compound If . . . Then . . . Else. 
Only the statement which satis- 
fies the selector and state is ex- 
ecuted; others are skipped. End 
is only used to mark the scope 
of the Case. See Fig. 3. 

• Until predicate— Do se- 
quence — End. The Until control 
structure executes the se- 
quence until the predicate is 
satisfied. Because the test of 
the predicate is performed at 
the End statement, the se- 
quence will be executed at least 
once. See Fig. 4. 

• While predicate — Do se- 
quence—End. The While control 
structure tests the predicate 
and executes the sequence 




Figure 2 Figure 4 
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^^PREDN- 


NO 




The Key Box 

Basic Level II 
Model I 
16K RAM 
1 Disk Drive 




|yES 








SEQUENCE 






I 






Fiqure 


5 



Initialize 

Until 'Quit' is selected on keyboard Do 
Display menu 
Read selection from menu 
Case keyboard selection = 

1 : Read a sector 

2 : Modify buffer contents 

3 : Write a sector 

4 : Quit 
Other: Continue 

End 
End 

Fig. 6. Initial design language 



while the predicate is true. If the 
predicate is not true from the 
start, the sequence will not be 
executed. See Fig. 5. 

Design a Program 

Let's consider an easy-to-use 
disk repair program. I wrote 
SIMPLZAP to read any sector on 
a disk, modify the data, and 
write the modified data to any 
sector. Program requirements 
are straightforward and involve 
no algorithm (transformation of 
input data to output data). I 
began by stating program re- 
quirements formally: 

• Read and display any sec- 
tor on a disk 

• Modify data read 

• Write the modified data to 
any sector on a disk. 

To write any program, state 
requirements in design 
language as completely as 
possible. Express functions us- 
ing logical abstractions and 
postpone the introduction of 
detail until you understand the 
entire program sufficiently. 
Then expand each statement to 
contain more detail and con- 
tinue refinement until the pro- 
gram is fully described for 
coding. Although the tempta- 
tion to fully define and start cod- 
ing one section of a program is 
great, I promise a better-de- 
signed, more easily coded and 
more error-free program if 
design is complete before im- 
plementation begins. 

For SIMPLZAP, the initial de- 
sign language is in Fig. 6. 
Actually, it doesn't look bad. 
The design contains all func- 
tional requirements plus state- 
ments included to add opera- 
tional convenience. 

Now let's expand the detail of 
each statement and repeat the 



• Read selection from keyboard 

Wait for any key 
Selection = Pressed key 

• Read a sector 

Query disk address parameters 
Read disk 
Display buffer 
Wait for any key 

• Modify buffer contents 

Display buffer 
Modify buffer 

• Write a sector 

Clear screen 

Query disk address parameters 

Write disk 

• Quit 

Return to DOS 

Fig. 7. First refinement 



process until there is sufficient 
design detail to code. 

First Refinement 

• Initialize 
Disable interrupts 
Plug up Basic exits 

I don't need interrupts and don't 
want time interrupts interfering 
with disk processing; I'll disable 
them. Because I will use Basic 
subroutines and don't want 
Basic to take DOS or Disk Basic 
exits I added line 2. If I think of 
other initialization functions I 
will come back and add them. 

The second line of the pro- 
gram is sufficient. There is no 
need to expand it at this time, so 
I'll go to the third line. 

• Display Menu 

Clear screen* 

Write title and instruc- 
tion lines* 

Write four function de- 
scription lines* 

Display the traditional 

I ended each statement of this 
section with an * to remind my- 
self that a Basic subroutine 
does this function. 

Now, I will expand the rest of 
the program one line at a time 
until the first refinement is com- 
plete (see Fig. 7). You are prob- 
ably wondering if this is worth- 
while, but I now have a better 
basis for further refinement. 
Let's see what the whole thing 
would look like if the first refine- 
ment were inserted into the pro- 
gram design (see Fig. 8). Origi- 
nal statements are enclosed in 
slash marks; expansion state- 
ments are beneath the originals. 

Notice that "Query disk ad- 
dress parameters" and "Modify 



/Initialize/ 

Disable interrupts 

Plug up Basic exits 

/Until 'Quit' is selected on keyboard Do/ 

/Display menu/ 

Clear screen' 

Write instruction line- 
Display the traditional '?'* 

/Read selection from menu/ 

Wait for any key (C) 

Selection = Pressed key 

Case keyboard selection = 

1 : /Read a sector/ 

Query disk address parameters (C) 

Read disk 

Modify buffer contents (C) 

2 : /Modify buffer contents/ 

Display buffer 
Modify buffer 

3 : /Write a sector/ 

Clear screen" 

Query disk address parameters (C) 

Write disk 

4 : /Quit/ 

Return to DOS 
End 
End 



Fig. 8. First refinement inserted 



buffer contents" each appear 
twice. Even at this early stage of 
the design that suggests a sub- 
routine; I annotated the state- 
ment with a (C) for Call. I had in- 
cluded a statement for display- 
ing the buffer immediately after 



the read. Now I realize that the 
most common action after 
reading istomodify the buffer or 
(if no editing is to be done) to 
simply exit. I altered the design 
to edit automatically after read- 
ing the disk. 
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Second Refinement 

The first few statements look 
detailed enough for now. Let's 
start with the sequence replac- 
ing "Wait for any key." See Fig. 9. 

Let's decide on the display 
format. The buffer will be 256 
bytes (one sector). That sug- 
gests 16 lines of 16 bytes. It is 
also handy to display ASCII 
when legitimate ASCII charac- 
ters are contained in the buffer. 
So I will make each display line 
look like this: 

00 0010203 30313233 04050607 41424344 
...0123....ABCD 

Now things are starting to 
shape up. It almost looks like a 
program. Let's expand on unde- 
fined statements and think 
about writing the code. 

Third Refinement 

At some point detail the data 
and storage required. For this 
program there are no complex 
data structures, so I will omit 
that part of the design. Some 
programs require design of the 
data base and of input and out- 
put data before logic design or 
early in the process. See Fig. 
10 for the program as it now 
stands. 



Final Design 

It is time to look at the entire 

program (see Fig. 11). Listing the 
entire program is not necessary 
for refinement, but it usually helps 
to have a copy of the expansion 
at all levels of refinement. 

Am I ready to code this pro- 
gram? That is a matter of opin- 
ion, but I think so. Another per- 
son may have gone to more or 
less detail. The important thing 
is that I have gone through a for- 
mal design exercise before get- 
ting bogged down in coding 
details. There is another benefit 
from this discipline— the design 
process produces detailed 
documentation for records, 
maintenance or extension of the 
program. 

The Final Product 

SIMPLZAP is menu-driven. 
The main menu allows selection 
of the three functions which the 
program performs: Read, Mod- 
ify, and Write. A Quit option 
returns to DOS. If Read or Write 

234 • 80 Microcomputing, June/July 1982 



are selected, a secondary menu 
asks for the track and sector on 
which the operation is to be per- 
formed. INKEYS input is used 
throughout SIMPLZAP. The 
Enter key has a special purpose. 
When Read or Write are 
selected, use the previous in- 
puts for track or sector address 
or both by hitting the Enter key. 
For most applications, Write 
uses the same track and sector 
that was used for Read. In 
Modify operation, Enter returns 
you to the main menu. The 
general rule in SIMPLZAP is that 
all inputs are made using two- 
digit hexadecimal numbers. 

When a Read operation is 
selected and the track and sec- 
tor has been input, the program 
automatically executes the 
Modify operation. When in Mod- 
ify, the entire sector is displayed 
in hexadecimal dump format 
with possible ASCII values in 
the right margin. A blinking 
block cursor marks the buffer 
position for any modifications. 
The cursor is moved with the 
keyboard arrows, or by making 
entries into the buffer. Buffer 
modifications are immediate— 
if you make a mistake and can- 
not remember how to correct it, 
leave the Modify function and 
read the sector again. The Mod- 
ify function is terminated by hit- 
ting Enter. 

The Write function writes and 
returns to the main menu. Usu- 
ally, the track and sector for 
Write are the same as for Read, 
but sector data may be initial- 
ized (not formatted) or copied 
using the Write command. 

The program listing for SIM- 
PLZAP is in three parts. The pro- 
gram overflows the text buffer in 
my modified version of ED- 
TASM. The way it is segmented, 
under 1000H bytes of text buffer 
are used for each section. I also 
put ORG statements at strate- 



• Wait for any key 

While no key pressed 

Read keyboard* 
End 

• Query disk address parameters 

Until converted input < 23H or Enter input 

Display two-line query* 

Read and convert keyboard response (C) 
End 
If input was not Enter 

Then store track number 

Else (previous track number will be used) 
Until converted input < 0AH or Enter input 

Display two-line query" 

Read and convert keyboard response (C) 
End 
If input was not Enter 

Then store sector number 

Else (previous sector number will be used) 

• Read disk 

Start disk motor 

Delay* 

Seek to track and set sector (C) 

Set read command in controller command register 

Until Status = DRQ Do 
Continue 

End 

Move a byte from data register to buffer 
End 

• Display buffer 

Clear screen" 
Set byte counter to zero 
Set hex conversion pointer to top of buffer 
Set ASCII conversion pointer to top of buffer 
Until 16 lines are displayed Do 
Convert and display (byte counter) (C) 
Leave a couple spaces 
Until four bytes have been displayed Do 
Leave a couple spaces 
Until four bytes have been displayed Do 
Convert and display (byte from hex conversion pointer) (C) 
Bump hex conversion pointer 
End 
End 

Display ASCII characters (C) 
End 

• Modify buffer 

Turn off regular cursor display* 

Set buffer pointer to top of buffer 

Set cursor value to video location of first byte 

Until Enter input Do 

Convert and display (byte from buffer pointer) (C) 

Read and execute keyboard commands 

Display block symbol over byte at cursor 
End 
Display ASCII characters (C) 

• Write disk 

Start disk motor 

Delay* 

Seek to track and set sector (C) 

Set Write command in controller command register 

Until 256 bytes read Do 

Until Status = DRQ Do 
Continue 

End 

Move a byte from buffer to data register 
End 

Fig. 9. Second refinement 



» Assemble Part 1 of SIMPLZAP and write the object code to disk with the filename PART1/CMD. Do the same 
with Parts 2 and 3, calling them PART2/CMD and PART3/CMD, respectively. 

> From the DOS Ready prompt, type LOAD PART1/CMD<Enter>. After PART1/CMD has loaded, do the same 
with PART2/CMD and PART3/CMD. 

i Type: DUMP SIMPLZAP/CMD:0 (START = X'8000', END = X'8873'.TRA = X'8000')<Enter>. The object code 
for SIMPLZAP/CMD will be written to disk. 



iSIMPLZAP/CMD is ready for use. 



Table 1 



Quality Computer Services presents 






•••••• 



,:■■■■: 



12,20,40 






Completely assembled and tested subsystem including: 

ting power supply • Formatting program 
Winchester drive Assigns alternate sectors 

Host adapter card lor any weak sectors detected 

Sealed case during formatting assuring 

Expansion the lowest possible error rate 




power supply have been 
designed to allow for future 



storage 

• Software 

• Auto attach 



• Real time clock , 



• Warranty: The system has a full one y 
warranty on all parts and workmanship 

• Also available: attach for TR: 
OASIS*, Apple DOS 
» Optional 5 1 / 4 " floppy #-•"—-- 



B3 






■■» 



Quantity discounts av 
and OEM inquries invited. 




t See local dealer 

I or call: 

Quality Computer 

Services 

178 Main Street ;'■-] 



'S-k-'TrP'i 



m^ 



r^ 



iber: 800 631 i 



&££J 



GET THE 



A MACRO UTILITY FOR YOUR MICRO 




/ " — ~ / 






>i 



c 

c 

c 






< 



7 
> 



Have your TRS-80* MOD I or Ml or an Apple II 
produce its own flowchart with the Documented 
Program logic is graphically displayed to your 
screen or printer. Uses include flowcharting basic 
level II, disk basic or Apple Soft programs, 
debugging programs aid a learning aid A branch 
map is also produced. TRS-80 version runs on 
l6-48k system (disk-48k only). Apple version requires 
48k and 1 disk drive. 

If documentation is a problem for you buy the 
Documentor. 

1 RS-80 versi in $34 95 Apple II vers ion -$49.95 

plus $1.05 postage & handling (Ga res. add 4% tax) 
Specify Type 



; TRS-80-48k disk 

□ Apple ll-48k disk 

16 Sector 
. 1 3 Sector 

Name: 

Address: 

City: 

□ Master Charge 
Account No 

Bank No 
Signature 



. TRS-80- 16k Tape 
TRS-80-32k Tape 
TRS-80-48k Tape 



ST. 
D Visa 



l.z 



Expiration 

Dale 



P-80 Nut Software, P.O. Box 490 
Lilburn, Georgia 30247 (404) 469-0056 

1^368 
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00100 - 
















03200 ; 


' ' ' ' ' ' 


1 " " " 


,i,i,i.,,,, 


' ' ' 


; 






00300 ; 




SIMPLZAP 




j 






00400 ; 










; 






00500 ; 




COPYRIGHT ;'.", 










00600 ; 
















00700 , 




B. BOAS SO 










00800 , 




700 N. WENDY 0700 










00900 , 




NEWBURY 


PARK. CA 91320 








01000 
















01100 


PERMISSION TO COPY GRANTED 








01200 




TO READERS OF 










01300 


80 MICROCOMPUTING MAGAZINE. 








01400 








; ; ; ; ; 












01500 




PART 1 












01600 
01700 
















r I , r , , I , 


' ' 








01800 


A PROGRAM FOR 


READING ANY 


SECTOR ON A DISKETTE, 






01900 


MODIFYING THE 


DATA FROM THAT 


SECTOR, AND 






02000 


WRITING THE (MODIFIED) DATA TO ANY SECTOR ON DISKETTE. 






02100 
















02200 












8200 




02300 MODIFY 


EQU 


8200H 






8500 




02400 WRITE 


EQU 


8500H 






87 B0 




02500 HENU0 


EQU 


87B0H 






8000 




02600 
02700 
02800 




ORG 


8000H 










02900 




INITIALIZATION 










03000 
















03100 












8000 


F3 


03200 SMPLZP 


DI 






; DISABLE INTERRUPTS 


8001 


3100B0 


03300 
03400 
03500 




LD 


SP.0B000H 










03600 




PLUG UP 


BASIC EXITS 


SO 


THAT BASIC SUBROUTINES 






03700 




CAN BE 


USED BY THIS 


PROGRAM. 






03800 
















03900 












8004 


3 EC 9 


04000 




LD 


A,0C9H 




;PLUG UP BASK: EXITS 


8006 


320C40 


04100 




LD 


(400CH) .A 






8009 


21A641 


04200 




LD 


HL,41A6H 






800C 


0615 


04300 




LD 


B r 15H 






800E 


77 


04400 PLOOP 


LD 


(HI,) -A 






800F 


23 


04500 




INC 


HL 






8010 


23 


04600 




I NC 


Hi. 






8011 


23 


04700 




INC 


HL 






8012 


10FA 


04800 
04900 
05000 
05100 
05200 
05300 




DJNZ 
DISPLAY 


PLOOP 
MENU 






8014 


CDC901 


05400 


ZAPP 


CALL 


01C9H 




;CLS 


80.17 


21B087 


05500 




LD 


HL.MENU0 




; INSTRUCTION LINE 


801 A 


CD4780 


05600 
05700 
05800 




CALL 


PRSTR 




; PRINT STRING 






05900 




READ KEYBOARD FOR MENU 


SELECTION 






06000 
















06100 












80 ID 


CD5080 


06200 


*KEY 


CALL 


WAITKY 




;WAIT FOR KEY 


8020 


FE31 


06300 




CP 


•1' 




;TEST 'READ' SELECTED 


8022 


2005 


06400 




JR 


NZ,TRYMOD 






8024 


CD0081 


06500 




CALL 


READ 






8 27 


I 8KB 


06600 




JR 


ZAPP 






80 2 9 


FE32 


06700 


rRYMOD 


CP 


■2' 




;TEST 'MODIFY' SELECTED 


802B 


2005 


06800 




JR 


NZ,TRYWRI 






802D 


CD0082 


06900 




CALL 


MODIFY 






8030 


18E2 


07000 




JR 


ZAPP 






80 3 2 


FE33 


07100 


rRYWRI 


CP 


'3' 




;TEST 'WRITE' SELECTED 


8034 


2005 


07200 




JR 


NZ, TRYQUI 






8036 


CD0085 


07300 




CALL 


WRITE 






8039 


18D9 


07400 




JR 


ZAPP 






803 B 


FE34 


07500 


TRYQUI 


CP 


'4' 




;TEST 'QUIT' SELECTED 


803D 


20DE 


07600 




JR 


NZ,RKEY 




;KEEP TRYING 


803F 


3 EC 3 


07700 




LD 


A,0C3H 




;JUMP INSTRUCTION 


80 4] 


320C40 


07800 




LD 


(400CH) .A 




; RESTORE 


8044 


C32D40 


07900 
08000 
08100 




JP 


402DH 










08200 




PRINT STRING 










08300 
















08400 












8047 


7E 


08500 


PRSTR 


LD 


A, (HL) 




; CHARACTER FROM STRING 


8048 


B7 


08600 




OR 


A 




;SET FLAGS 


80 4 9 


C8 


08700 




RET 


Z 




;END OF STRING 


804A 


CD3A03 


08800 




CALL 


033AH 




; PRINT CHAR/MOVE CURSOR 


S04D 


23 


08900 




INC 


HL 






804B 


18F7 


09000 
09100 
09200 




JR 


PRSTR 










09300 




WAIT FOR KEY TO BE 


PRESSED 






09400 
















09500 












8050 


CD5B03 


09600 


WAITKY 


CALL 


035BH 




;READ KEYBOARD ASCII 


8053 


FE00 


09700 




CP 







;TEST NO KEY PRESSED 


8055 


28F9 


09800 




JR 


Z, WAITKY 




;NO KEY - KEEP TRYING 


8057 


C9 


09900 
10000 
10100 
10200 




RET 






Program Listing I Continues 
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gic spots to allow minor modifi- 
cations without changing the 
equated values in the program. 

Notice that the program ig- 
nores all errors except a Seek er- 
ror. This allows the buffer to be 
filled even if CRC errors occur. 
In some cases, merely re-writing 
a bad sector will repair it. 

One modification is required 
by those who have other than 
35-track disk drives. The instruc- 
tion at 8120H checks the maxi- 
mum track number when the 
track query is answered. Change 
the immediate value in the in- 
struction to accommodate your 



drives. The immediate value 
must be the number of tracks on 
the drive, not the maximum ad- 
dress. Also, the constant DRIV- 
NO, at 871 7H, is coded for opera- 
tion on drive zero. To use the pro- 
gram on any other drive address, 
change the value of DRIVNO to 
2** DRIVE-ADDRESS. 

SIMPLZAP should prove help- 
ful, but I hope you will not have 
to use it often! ■ 



Mr. Boasso, a self-employed 
software consultant, enjoys din- 
ing in very expensive restaurants. 



• Read and convert keyboard response 

Until this is done twice or Enter is pressed Do 
While a key is not pressed Do 

Read keyboard* 
End 
Until key value = 0-9 or A-F Do 

Read keyboard* 
End 
End 
Convert two hex ASCII entries into one byte 

• Convert and display 

Extract high four bits of byte 
Shift into low four bits 
Index into hex ASCII number list 
Display ASCII at cursor 
Extract low four bits of byte 
Index into hex ASCII number list 
Display ASCII at cursor 

• Display ASCII characters 

Until 16 characters have been displayed 
If byte value is in ASCII range 
Then display byte 
Else display '.' 
Bump ASCII conversion pointer 
End 

• Seek to track and set sector 

Move sector number to controller sector register 
Move track number to controller data register 
Set Seek command in controller CMD register 
Until Status <> Busy Do 

Continue 
End 
If Status = Seek error 

Then recalibrate 

• Read and execute keyboard commands 

Read keyboard switches 
Case key On = 

Up arrow : Move cursor up 

Down arrow : Move cursor down 

Left arrow : Move cursor left 

Right arrow : Move cursor right 

Other : Continue 
End 

Read keyboard ASCII* 
Case key pressed = 

Enter : Flag Enter pressed 

No key : Continue 

Other key : Do 

Read and convert keyboard response* 
Store into buffer 

End 
End 

• Recalibrate 

Set Recalibrate command in controller CMD register 
Until Status <> Busy Do 

Continue 
End 
Seek to track and set sector (C) 

Fig. 10. Third refinement 



Fig. 1 1. The final product 



/Initialize/ 

Disable interrupts 

Plug up Basic exits 

/Until 'Quit' is selected Do/ 

/Display menu/ 

Clear screen" 

Write instruction line* 

Display the traditional '?'* 

/Read selection from menu/ 

/Wait for any key (C)/ 

While no key pressed 
Read keyboard* 

End 

Selection = Pressed key 

Case keyboard selection = 

1 : /Read a sector/ 

/Query disk address parameters (C)/ 
Until converted input < 23H or<Enter input 
Display two-line query* 
/Read and convert keyboard response (C)/ 
Until this is done twice or Enter is pressed Do 
While a key is not pressed Do 

Read keyboard* 
End 
Until key value = 0-9 or A-F Do 

Read keyboard* 
End 
End 

Convert two hex ASCII entries into one byte 
End 

If input was not Enter 
Then store track number 
Else (previous track number will be used) 
Until converted input < OAH or Enter input 
Display two-line query" 
Read and convert keyboard response (C) 
End 

If input was not Enter 
Then store sector number 
Else (previous sector number will be used) 
/Read disk/ 
Start disk motor 
Delay" 

/Seek to track and set sector (C)/ 
Move sector number to controller sector register 
Move track number to controller data register 
Set Seek command in controller CMD register 
Until Status <> Busy Do 

Continue 
End 

If Status = Seek Error 
Then /Recalibrate/ 

Set Recalibrate command in controller CMD register 
Until Status <> Busy Do 

Continue 
End 

Seek to track and set sector (C) 
Set Read command in controller command register 
Until 256 bytes read Do 
Until Status = DRQ Do 

Continue 
End 

Move a byte from data register to buffer 
End 
Modify buffer contents (C) 

2 : /Modify buffer contents/ 
/Display buffer/ 

Clear screen* 

Set byte counter to zero 

Set hex conversion pointer to top of buffer 

Set ASCII conversion pointer to top of buffer 

Until 16 lines are displayed Do 

/Convert and display (byte counter) (C) 

Extract high four bits of byte 

Shift into low four bits 

Index into hex ASCII number list 

Display ASCII at cursor 

Extract low four bits of byte 

Index into hex ASCII number list 

Display ASCII at cursor 

Leave a couple spaces 

Until four groups have been displayed Do 
Leave a couple spaces 
Until four bytes have been displayed Do 

Convert and display (byte from hex conversion pointer) (C) 

Fig. 11 continues 
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Fig. 1 ■ continued 


Program Listing 1 Continued 








Bump hex conversion pointer 






.10330 ; 








End 


8100 




10400 


ORG 


8100H 




End 


8&;;0 




10500 BUFFER 


EQU 


8600H 




/Display ASCII characters/ 


8700 
8702 




10600 BtJFADD 
10700 BADDR 


EQU 
EQU 


870011 
870 2H 




Until 16 characters have been displayed 


8715 




10 800 TRAKNO 


EQU 


8715H 




If byte value is in ASCII range 


8716 




10900 SECTNO 


EQU 


8716H 




Then display byte 


83A0 




11000 KBMOD 


equ 


83A0H 




Else display '.' 


8730 




11100 READ1 


EQU 


8730H 




8770 




11200 READ 2 


EQU 


8770H 




Bump ASCII conversion pointer 


8717 




11300 DRIVNO 


EQU 


8717H 




End 






11400 ; 








End 






11500 ; 








/Modify butter/ 






11600 ; 


READ A 


SECTOR INTO BUFFER 


Turn oft regular cursor display" 
Set butter pointer to top of buffer 


810 




11700 ; 
11800 ; 
11900 READ 


EQU 


s 




Set cursor value to video location of first byte 


810 


CDC901 


12000 


CALL 


01C9H 


CLS 


Until Enter input Do 


810 3 


CD1081 


12100 


CALL 


QUERRY 




Convert and display (byte from buffer pointer) (C) 


8106 


CD3F81 


12200 


CALL 


READ IT 




/Read and execute keyboard commands/ 


8 1 9 


CD0082 


12300 


CALL 


MODIFY 




Read keyboard switches 
Case key On = 


81 0C 


C9 


12400 
12500 
12600 




RET 






Up arrow : Move cursor up 






12700 




QUERRY 


DISK ADDRESS PARAMETERS 


Down arrow : Move cursor down 






12800 










Left arrow : Move cursor left 






12900 










Right arrow : Move cursor right 
Other : Continue 


8110 

8110 


23 3087 


13000 

1310 QUERRY 


ORG 
LD 


8110H 
HL,READ1 


TWO LINE TRACK QUERRY 


8113 


CD4780 


13200 


CALL 


PRSTR 


PRINT STRING 


End 


8116 


CD5B03 


13300 


CALL 


035BH 


READ TRACK FROM KYBD 


Read keyboard ASCII* 


8119 


CDA083 


13400 


CALL 


KBMOD 


READ & CONVERT RESPPONSE 


Case key pressed = 


811C 


FEFF 


13500 


CP 


PEEK 


TEST <ENTER> 


Enter : Flag Enter pressed 


811E 


2887 


13600 


JR 


Z, CONTRD 


<ENTER> - SAME TRACK 


8J 2a 


FE23 


13700 


CP 


23 H 


TEST ANSWER > 23)1 TRACKS 


No key : Continue 


8122 


30EC 


13800 


JR 


NC, QUERRY 


TRY AGAIN 


Other key : Do 


8124 


321587 


13900 


LD 


(TRAKNO) .P, 


STORE TRACK NUMBER 


Read and convert keyboard response" 


8J 27 




14000 CONTRD 


EQU 


s 




Store into buffer 


8127 


217087 


14100 


LD 


HE, RE AD 2 




End 


812A 


CD 4 7 80 


14200 


CALL 


PRSTR 


PRINT STRING 


End 


81 2D 


CD5B03 


1 4 3 


CALL 


03 5BH 


READ KEYBOARD 




8130 


CDA0 83 


14 400 


CALL 


KBMOD 


CONVERT SECTOR 


Display block symbol over byte at cursor 


8123 


FEFF 


1 4 5 


CP 


0FFH 


TEST <ENTER> 


End 


8135 


2807 


14600 


JR 


Z,C0NSR2 


<ENTER> - SAME SECTOR 


Display ASCII characters (C) 


8137 


FE0A 


14700 


CP 


0AH 


TEST LEGIT SECTOR 


3 : /Write a sector/ 


813 9 


30EC 


14800 


J P. 


NC , CONTRD 




. Clear screen* 


8133 


321687 


14 90 


LD 


(SECTNO) ,A 


SET SECTOR NUMBER 


813E 


C9 


15 00 CONSR2 


RET 






Query disk address parameters (C) 






15100 ; 








.Write disk/ 






15200 










Start disk motor 






15300 




READ DISK I/O ROUTINE 




Delay- 
Seek to track and set sector (C) 


813F 


210086 


.1.8400 
15500 
15600 


(EADIT 


LD 


HL, BUFFER 


BUFFER ADDRESS 


Set Write command in controller command register 


8142 


3A17 87 


15700 


LD 


A, (DRIVNO) 


DRIVE NUMBER 


Until 256 bytes read Do 


8145 


32E137 


15 800 


LD 


(37E1H) .A 


SELECT DRIVE/START MOTOR 


Until Status = DRQ Do 


hue 


010000 


.15 90 


LD 


BC0 


DELAY APPROX 3 SEC 


Continue 


814B 


CD6000 


16000 


CALL 


60H 




End 

Move a byte from buffer to data register 


814E 


CDA0 81 


16100 


CALL 


SEEK 




8151 

8153 


3E8C 
32EC37 


16200 
16300 


LD 
LD 


A , 8CH 
(37ECH) .A 


READ OPCODE 
. . TO CMD REG 


End 


8156 


0606 


1640 


LD 


B r 6 


DELAY 


4 : /Quit/ 


8158 


10FE 


16 5 


DJNZ 


$ 




Return to DOS 


815A 


06 


1 6 & 


LD 


B,0 


256 BYTES 


End 


815C 


3AEC37 


16700 RDWT1 


LD 


A, (37ECH) 


READ STATUS 


End 


815F 


CB4F 


16800 


BIT 


1,A 


DRQ? 


8161 

816 3 


28F9 
3AEF37 


16900 
17000 


JR 
LD 


Z,RDWT1 
A, (37EFH) 


DATA BYTE 






s:e& 


77 


17100 


LD 


(HL) .A 


.. INTO BUPPER 




8167 


23 


17200 


ISC 


HL 








816 8 
816A 


10F2 
C9 


17300 
17400 


DJNZ 

RET 


RDWT1 








TRS-80 MODEL 1 & II USERS! 








17500 
17600 
17700 
17800 
17900 




SEEK 




























wtiNT£»«i f>fmncft«2 




■r ' ' i — ' 






L— —i i 






81 A0 




18000 


ORG 


81A0H 






€/ • 


, ■ *■ ■ ■ • 






81A0 


3A1587 


18100 SEEK 


LD 


A, ( TRAKNO) 


TRACK NUMBER 






'-""" ■""J f.mmUm* 






81 A3 


57 


18200 


LD 


D,A 






■ 


, JL. , 

COMPUTER 






81A4 


3A1687 


18300 


LD 


A, (SECTNO) 


SECTOR NUMBER 




if?**!? 








81R7 
81A8 


5F 

ED53EE3' 


18400 

18500 


LD 
LD 


E,A 

(37EEH) ,DE 


SECTOR TO SECTOR REG 








Now you can have 2 printers on-line at all times. Our 
MODEL 80 LINE PRINTER SWITCH is designed 








18600 






TRACK TO DATA REG 




81AC 


3E1F 


18700 


LD 


A,1FH 


SEEK OP CODE (VERIFY) 


specifically for the TRS-80 computer to allow the user 




81AE 


32EC37 


18800 


LD 


(37ECH) ,A 


.. TO CMD REG 


to easily select between two printers by means of a 




81B1 


0606 


18900 


LD 


B,6 


DELAY 


conveniently located switch without changing cables. 




81B3 


10FE 


19000 


DJNZ 


S 
A,(37ECH) 




Our compact module connects to the printer port of 
your TRS-80 Model 1 or Model III through any reason- 




81B5 


3AEC37 


19100 SEEKWT 


LD 


READ STATES 


able length printer port extension cable and provides 




81B8 


CB47 


19200 


BIT 


0,A 


TEST BUSY 


an edge connector for each of your two printers. 

Gold plated contacts ensure excellent connection relia- 




81 BA 


20F9 


19300 


JR 


NZ, SEEKWT 






81BC 


CB67 


19400 


BIT 


4. A 


TEST SEEK ERROR 


bility and ends the problem of constantly plugging and 
unplugging printer cables. And, it works with any type 




eiBR 


C4C281 


19500 


CALL 


NZ, RECAL 






81C1 


C9 


i 9 6 2 


RET 






of printer that could normally be connected to a 








19700 : 








TRS-80 printer port. Our Model 80 switch comes 








19800 










assembled, tested, and ready to use. A printer port 
extension cable is available from your local dealer or 








19900 
20000 
20100 




RECALIBRATE 




may be purchased separately from us at $ 1 2. 50 for an 
















18" extension See your local dealer or call or write 
















now for more information. .„„ 




81C2 


3E03 


20200 RECAL 


LD 


A, 03 


; RECAL OP CODE 


r \m 






81C4 
81C7 


3 2EC3 7 
0806 


20300 
20400 


LD 
LD 


(37ECH) .A 

B,6 


;.. INTO CMD REG 


rii signalling inc. 


Administrative and Engineering Offices - P.O. Box 1 751 
















Kansas City, MO 64130 - phone: (816) 931-4448 
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PRINTERS & ACCESSORIES 

If you buy your EPSON somewhere else you'll probably pay too much! 
Common Features of the MX80, MX80FT & MX100 Printer* 



80 characters per second 
Replaceable print head by user 
User programable from BASIC 
Bi-directional logic seeking printhead 
96 ASCII characters 
Programable tabs (vert./horz.) 
Cartridge ribbons 
Self-test mode 



Tractor/pin feed paper flow 
Extreme reliability 
12 type fonts under software control 
9x9 S 9x18 matrix 
Programable form feeds 
Compressed/expanded letters 
Parallel interlace standard 
Double strike 4 emphasized modes 



MX80 The Printer that started it all. All of the above features plus extreme ease of use 
CompleteTRSBO block graphics set as well as user selectable international symbols. Gives 
correspondence quality printing in several user selectable modes Dip switch pins may be 
set for dedicated applications Complete forms programability from BASIC software 

MX80FT All the features of the MX80 but with FRICTION feed as well for the use of 
single sheets of paper or roll paper An exceptional buy for the user needing the single sheet 
capability. In the compresses mode 132 characters can be printed across the width of a page 
which means it can be used for any printouts that normally need a 15 inch wide printer 

MX"! 00 An exceptional printer with a extra quiet printhead and extra heavy duty 
construction for the intense use of a business environment Does not have the TRS80 graphic 
blocks but comes standard with Bit-Image graphics which allow the user control of 
individual dots for designing specialized graphs, symbols, etc. A best buy for business use 

MX70 For the budget minded a excellent entry level printer It has most all of the 
features mentioned above including Bit-Image graphics in place of the TRS80 graphic blocks 
set The Printer is unidirectional only Expandable text can be printed but not compressed 
Only single density printings is supported on the MX70. An inexpensive heavy duty printer 

BEST prices on Epson Printers 
All Printers & accessories in STOCK now!!! 

EPSON ACCESSORIES, INTERFACES & CABLES 



GRAPHTRAX 80 option (bit-image/italics).$79 

CABLE Model I interlace & Model III S35 

$25 if purchased with EPSON printer 
CABLE & INTERFACE to Model I keyboard. $85 

APPLE interface & cable $89 

GRAPPLER Apple hi resolution graphics. $Call 
IEEE interface & cable (CBM/Pet) $79 

ATARI cable (must have 850 interface) $35 

SERIAL RS232 2k buffered int card $149 

RS COLOR computer to Epson card/cable $59 

RIBBONS AND CARTRIDGES IN STOCK NOW 



800-433-5184 




EPSON PACK 2 - GRAFTRAX 

version for MX80. 80FT & MX10U This 
package includes updated versions of 
modules in original Epson Pack. A screen 
oriented BIT IMAGE GRAPHICS generator util- 
ty is provided Create your special 
characters, symbols, etc directly on your 
monitor and then send to printer Printout in- 
cludes code to generate graphics and will 
save needed code as BASIC program line to 
disk Then MERGE these into your BASIC pro 
gram Also demo programs showing use of 
Bit-Image graphics Full documentation 
INTRO SPECIAL: $24.95 with printer or 
GRAFTRAX. $34.95 separately. $7.50 for 
update of old Epaon Pack 



MATRIX PRINTERS 



EPSON MX70 


$CALL 


EPSON MX80 


$CALL 


EPSON MX80 FT 


$CALL 


EPSON MX 100 FT 


$CALL 


LINE PRINTER VII RS 


$325 


NEC 8023 A 


$495 


C. ITOH8510 


$495 


OKIDATA82A 


$499 


OKI DATA 82Aw/tracto 


r $559 


OKIDATA83A 


$769 


LINE PRINTER VIII RS 


$649 



CENTRONICS 739parallel $599 
CENTRONICS 739 serial $749 
OKIDATA84/200cps $1295 
LINE PRINTER VI RS $988 

CENTRONICS 704 $1559 

ANADEX 9500/01 2k buf. $1295 
TEXAS INST. 810 Basic $1595 
LINE PRINTER V RS $1549 

Centronics 352/ 200 cps $1795 
Centronics 353 / dual mode, 
200cps data proa, 50cps 
super letter quality $2495 



°ERS 

LETTER QUALITY 
Daisy Wheel / Splnwriters 

C, ITOH F-10/40cps $1595 

DAISY WHEEL II RS $1695 

NEC SPINWRITERS 

3510RS232 $1795 

3530 Centronics pa'lel $1795 

7710 Read Only $2375 

7710 R/0 w/tractor $2575 

7720 kybd w/tractor $2750 

7730 R/O parallel $2375 

7730 R/O par.w/tract. $2575 

DIABLO 630 R/O $2350 

DIABLO 630 keyboard $2850 

QUME 9/35 R/O $1850 

QUME 9/35 keyboard $1950 

QUME 9/45 limited $2295 

QUME 9/55 limited $2395 



Interfaces & cables available for 
most printers with any TRS80, 
Apple, Atari & most other com- 
puters. $$$$CALL FOR PRICES! 



LINE PRINTERS 

CENTRONICS 6080/81 

600 lines per minute high 
speed band printer. For ser- 
ious business applications, ^jw^^sssfsss 

608I standard $7676 

6080 quietized cabinet $6399 



HIGH RESOLUTION MONITOR 

$179 
$349 



NEC green monitor 
NEC color monitor 



ALTOS COMPUTERS $CALL 



TEXAS COMPUTER SYSTEMS 



Offers Lowest Prices 




CORVUS 
HARD DISKS 

CALL FOR PRICES $$$$$ 



MODEL II 64k $3248 

MODEL I1 1 Drive Expansion.. .$995 
MODEL II 2 Drive Expansion. .$1495 
MODEL II 3 Drive Expansion.$1995 

Radio Shack HARD DISK $3995 

TCS 1 Drive/single cabinet $849 

TCS 1 Drive/triple cabinet $949 

TCS 2 Drive/triple cabinet. $1424 
TCS 3 Drive/triple cabinet. ..$1899 
TCS uses original Shugart drives 

MODEL 16 1 Drive $4499 

MODEL 16 2 Drive $5199 

DT-1 DATA TERMINAL $629 



Add 5, 1 or 20 megabytes of storage to your TRS80, Apple, Atari, 
Heath, Zenith, Intertec, IBM, S-100 and many others. Oneorsev- 
eral computers can share a hard disk. Get simultaneous access to 
data for multiple users. Available NOW at SUPER SAVINGS! 
DEALERS... You can buy CORVUS from us for less. Call & $AVE. 



COLOR COMPUTERS 



Orgmal mfg warranty on these items 

4K Level 1 $308 

16K Level 1 $439 

16K Extended Basic $459 

32K Extended Basic $569 

Color Disk 0...$499 Disk 1. $349 



TCS 180 day Limited warranty on TCS items: 

16K Level 1 $369 

16K Extended Basic $439 

32K Extended Basic $499 

32K Upgrade Kit (TCS) $79 

EPSON/COLOR lnt.& cable $59 



MODEL III SYSTEMS 



The following come with quality TCS 
memory and our own 180 day limited war- 
The following with Radio Shack Warranty: ran, y No warranty when customer opens 
■ computer or adds internal components. 

Model III 16k $818 MODEL III 16k TCS $788 

Model III 32k $918 MODEL III 32k TCS $818 

Mode HI 48k $1018 MODEL III 48k TCS $848 

Model III 48k 2 Drives RS232 $2049 



MODEL III DISK EXPANSION KITS 



We use the highest quality fiberglass 
CONTROLLER BOARDS with double sided 
glass epoxy board and goldplated contacts in 
our TCS systems. The finest switching 
POWER SUPPLY available is also provided 
The aluminum MOUNTING HARDWARE 



i dri 



same company that makes the drives used by 
Radio Shack These drives are 40 track, 
double density, 5 millisecond stepping rate 
and are fully burned in for 48 hours These 
drives have the same specifications as the 



has slotted holes for easy installation of the drives used by Radio Shack No soldering or 

drives and includes all the power and data modifications to existing circuitry is 

cables necessary to install the controller, necessary The following kits are available: 
drives and power supply 

KIT 1 Controller, Power Supply A Mounting Hardware $379 

KIT 2 Controller, Power Supply, Hardware A 1 Disk Drive $595 

KIT 3 Controller, Power Supply, Hardware & 2 Disk Drives $819 

KIT 4 One Tandon Disk Drive (bare drive only) $219 

KIT 5 16K of High Quality TCS Memory chips $4995 

KIT 8 32k ol High Quality TCS Memory chips. $79.95 

MODEL III 48k 2 DISK DRIVES ... $1795 

Above KIT fully assembled, with 48 hour burn-in test & 180 day TCS Limited Warranty!! 



CUSTOM SOFTWARE FROM TCS 

Completely Integrated BINARY SEARCH TREE programs now available. This series of 
proarams fully implements the B-TREE structures including INSERTION, DELETION, EDITING 
& TRAVERSAL No more sorting or long data file searches and yet files can be larger than 
memory. Duplicate keys are fully supported. Files can be retrieved in sorted order via B- 
TREE Traversal. Each of the programs come with fully commented source code so that you 
can use the modules in your own programming, 

B-TREE Library (organize your home Hbrery keyed by author) $39.86 

B-TREE VMM (organize your video cmnM* library, print* (abate, etc) I39.9S 

B-TREE Mailing List (kayed by nama or zip.label printing, ate) $49.95 



For fast, efdeent service. Heart Of we can air freight from Dallas 

TEXAS COMPUTER SYSTEMS 

P.O. Box 1327 Arlington, Texas 76004-1327 

VV Toll Free Number 800 433-5184 ^ 59 
Texas Residents 817 274-5625 






Payment: Money order, cashiers or certified 
check. Prices above reflect 3% cash Discount 
Call for Visa/MC card prices. 



• Prices subject to change at any time 

• No Tax out-of-state. Texans add 5% 

• Many items shipped FREE. Call for quote. 



^See List ol Advertisers on page 38b 
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REMSOFT, INC. 

Let Your TRS-80® 
Teach You 

ASSEMBLY LANGUAGE 



Tired of buying book after book on assembly 
language programming and still not knowing your 
POP from your PUSH? 

REMSOFT proudly announces a more 
efficient way. using your own TRS-80' to learn 
the fundamentals of assembly language 
programming ... at YOUR pace and YOUR 
convenience. 

Our unique package. "INTRODUCTION TO 
TRS-80' ASSEMBLY PROGRAMMING", will 
provide you with the following: 

• Ten 45-minute lessons on audio cassettes 

• A driver program to make your TRS-80' video 
monitor serve as a blackboard for the instructor 

• A display program for each lesson to provide 
illustration and reinforcement for what you are 
hearing. 

• Step-by-step dissection of complete and useful 
routines to test memory and to gam direct 
control over the keyboard, video monitor, and 
printer. 

• How to access and use powerful routines in 
your Level II ROM 

for Model 1 

REMASSEM-1 ( tape) 

REMASSEM-1 



(disk) 



only $69.95 
only $74.95 

NOW AVAILABLE FOR MODEL 3 

REMASSEM-3(ta P e) $74.95 

REMASSEM-3,disk, $79.95 

LEARN TRS-80' 
ASSEMBLY LANGUAGE 
DISK I/O 



Your disk system and you can really step out 
with REMSOFT'S Educational Module. 
REMDISK-1. a short course revealing the details 
of DISK i O PROGRAMMING using assembly 
language. Intended for the student with 
experience in assembly language. 
COURSE INCLUDES. 

• Two 45-minute lessons on audio cassette 

• A driver program to make your TRS-80 video 
monitor serve as a blackboard for the instructor. 

• A display program for each lesson to provide 
illustration and reinforcement for what you are 
hearing 

• A booklet of comprehensive, fully commented 
program listings illustrating sequential file I O 
random-access file I O. and track and sector I O. 

• A diskette with machine-readable source codes 
for ail programs discussed, in both Radio Shack 
EDTASM and Macro formats. 

• Routines to convert from one assembler format 
to the other. 

Presently available for model 1 only 
REMDISK-1 only $29.95 

Dealer inquiries invited 

These courses were developed and recorded by 
Joseph E. Willis and are based on the successful 
series of courses he has taught at Meta 
Technologies Corporation, the Radio Shack 
Computer Center, and other locations in Northern 
Ohio. The minimum system required is a Level II 
16K RAM. 

^129 

REMSOFT, INC. 

571 E. 185 St. 

Euclid. Ohio 44119 

(216)531-1338 

SHIPPING CHARGES: 

S2.50 WITHIN UNITED STATES 

$5.00 CANADA AND MEXICO 

OTHER FOREIGN ORDERS ADD 20% 

OHIO RESIDENTS ADD6'i° SALES TAX 




-RSe 



IS A TRADEMARK OF TANDY CORP 



Program Listing 1 Continued 












81C9 10FE 


20500 




DJNZ 


S 




81CB 3AEC37 


20600 


RECLWT 


LD 


A, (37ECH) 


J READ STATUS 


81CE CB47 


20700 




BIT 


0,A 




81D0 20F9 


20800 




JR 


NZ, RECLWT 




81D2 CDA081 


20900 




CALL 


SEEK 




81D5 C9 


21000 




RET 






0000 


21100 




END 






00000 TOTAL 


ERRORS 



















Program Listing 2 








00100 ; 


;>>;;; 


tt Htt 


j ;;;;;;;;;; ; 








00200 




SIMPLZAP > 








00300 , 




PART 


2 t 








00400 , 






M ;;;;;;;;; ; 








8200 




00500 




ORG 


8200H 




8600 




00600 BUFFER 


EQU 


8600H 




8700 




00700 BUFADD 


EQU 


8700H 




8702 




00800 BADDR 


EQU 


8702H 




870 3 




00900 BUFASC 


ECU 


8703H 




8705 




01000 HEXNO 


EQU 


8705H 








01100 








> 






01200 














01300 




MODIFY BUFFER SUBROUTINE 






01400 














01500 










82 3 




0160 MODIFY 


EQU 


$ 




8200 


CDFD83 


01700 




CALL 


DISPL 




8203 


CD07 82 


01800 




CALL 


MOD 




8206 


C9 


01900 
02000 
02100 




RET 










02200 




MA T N 


EDIT LOOP SUBROUTINE 






02300 














02400 










8207 


210086 


025 00 MOD 


LD 


HL, BUFFER 


; POSITION AT TOP 


820A 


220087 


02600 




LD 


(BUFADD) ,HL 


; . . OPBUFFER 


820D 


220387 


02700 




LD 


(BUFASC) .HL 


; BUFFER ADDR FOR ASCII 


5210 


3E0F 


02800 




LD 


A r 0FH 


;TURN OFF CURSOR DISPLAY 


8212 


CD3A03 


02900 




CALL 


33AH 




8215 


21063C 


03000 




LD 


HL.3C06H 


; FIRST BYTE VIDEO POSN 


821B 


222040 


03100 




LD 


(4020H) ,HL 


;SET CURSOR VALUE 


821B 


2A0087 


03200 BLINK 


LD 


HL, (BUFADD) 


; BUFFER POSN VALUE 


821E 


7E 


03300 




LD 


A, (HL) 


; FETCH BYTE FROM BUFFER 


821F 


CD6/84 


03400 




CALL 


CONVA 


; CONVERT & DISPLAY 


8222 


CD3E82 


03500 




CALL 


BACKSP 


{BACKSPACE TWO 


82 2 5 


CD8C84 


03600 




CALL 


DELAY 




82 2 8 


CD4782 


03700 




CALL 


READKB 


;READ KEYBOARD 


822B 


3 8.10 


03800 




JR 


C, ENDMOD 


; CARRY = SIG TO QUIT 


822D 


3E8F 


03900 




LD 


A, 8FH 


; BLOCK CURSOR 


822F 


CD3A03 


04000 




CALL 


03 3 AH 




8232 


CD3A03 


04100 




CALL 


033AH 




8235 


CD3E62 


04200 




CALL 


BACKSP 




823 8 


CD8C84 


04300 




CALL 


DELAY 




823B 


18DE 


04400 




JR 


BLINK 




8 2 3:) 


C9 


045 00 ENDMOD 


RET 










04600 














04700 














4 800 




BACKSPACE SUBROUTINE 








04900 














05000 










623E 


3 El 8 


05100 


BACKSP 


LD 


A.18H 


; BACKSPACE CONTROL 


82 41! 


CD3A03 


05200 




CALL 


033AH 




824 3 


CD3A03 


05300 




CALL 


033AH 




8246 


C9 


05400 
05500 
05600 




RET 










05700 




READ 


KEYBOARD/EXECUTE 


COMMANDS SUBROUTINE 






05800 














05900 










8247 




06000 


READKB 


EQU 


$ 




8247 


3A4038 


06100 




LD 


A, (3840H) 


;KEY SWITCHES 


824A 


E67B 


06200 




AND 


78H 


;TEST CURSOR CONTROL 


824C 


2812 


06300 




JR 


Z , RDMOD 


;N0 - TEST OTHER KEYS 


824E 


E670 


06400 




AND 


7 


;TEST CP ARROW 


8250 


CA8F82 


06500 




JP 


Z,UP 




8253 


E660 


06600 




AND 


60H 


;TEST DOWN ARROW 


62 5 5 


CAD3 82 


06700 




J? 


Z,D0WN 




8258 


E640 


06800 




AND 


40H 


;TEST LEFT ARROW 


825A 


CA1983 


06 90 




JP 


Z , LEFT- 




825D 


C35383 


07000 




JP 


RIGHT 




8260 


CD5B0 3 


07100 


RDMOD 


CALL 


035BH 


I READ KEYBOARD 


826 3 


FE00 


07200 




CP 





;TEST NO KEY 


8265 


C8 


07300 




RET 


Z 




8266 


FE0D 


07400 




CP 


13 


;TEST <ENTER> 


8268 


CA8E83 


07 50 




JP 


Z, ENTER 




826B 


CDA0 83 


07600 




CALL 


KB MOD 


;LOOK FOR BUFFER EDIT 


826E 


2A0087 


07700 




LD 


HL, (BUFADD) 


; BUFFER ADDRESS 


8271 


77 


07800 




LB 


(HL) .A 


; MODIFY BUFFER VALUE 


8272 


DD2A0387 07900 




LD 


IX, (BUFASC) 




8276 


2A2040 


08000 




LD 


HL, (4020H) 


; CURSOR VALUE 


8279 


E5 


08100 




PUSH 


HL 




827A 


11 2E00 


08200 




LD 


DE,46 


; DISPL OF ASCII AREA 


827D 


7D 


08300 




LD 


A,L 




827E 


E6C0 


08400 




AND 


0C0H 




8280 


6F 


08500 




LD 


L.A 




8281 


19 


08600 




ADD 


HL,DE 


; CURSOR VALUE ASCII AREA 


8282 


222040 


870 




LD 


(402011) .HL 




8285 


CD4E84 


08800 




CALL 


ASCPRT 




8288 


El 


08900 




POP 


HL 


{RESTORE CURSOR VALUE 

Program Listing 2 Continues 
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TERFACE EXPANSION SYSTEMS FOR THE TRS-80* COMPUTE 



The MDX Series Interface Expansion Boards provide a wide range of features for the TRS-80* Computers. 

Fully assembled units offer immediate, inexpensive expansion; or choose the bare or partially assembled 
units for even more savings. Since assembly of the board in sections is possible, you can build in the 
features you need, as you need them! P.C. Boards are solder-masked and silkscreened for easy assembly; 
each comes with the illustrated User's Manual. 



TRS-80* Model I EXPANSION ^ 75 

Our MDX-1 and MDX-2 Interface Expansion Boards are field 
tested/field proven and offer more options for the Model I 
than any on the market. Also compatible with the PMC-80 and 
LNW-80 Computers. Custom Case Available for MDX-2. 




FEATURES: 

• MEMORY EXPANSION to 48K 

• ON-BOARD SUPPLY, fully protected 

• PHONE MODEM, 0-600 baud, direct connect, 
"answer" and "originate" modes 

• REAL TIME CLOCK, software programmable 

• PARALLEL PRINTER PORT 

• SERIAL PORT-RS232 and 20ma loop 
compatible 

• EPROM OPTION for user firmware 

• DUAL CASSETTE LINE 

• FLOPPY DISK CONTROLLER: The MDX-2 
has ail the features of the MDX-1 plus Floppy 
Disk Controller. The Controller is compatible 
with any single or double-sided floppy disk 
drive that is configured for use with the 
TRS-80 computer. 

ALL MDX SERIES BOARDS ARE WARRANTED AND SERVICE 
IS AVAILABLE. 



MDX-1 


MDX-2 


/ 


4 


J 


7 


/ 


y 


• 


y 


y 


/ 


«/ 


y 


•i 


y 


y 


/ 




y 



TRS-80* Model III EXPANSION 

The MDX-3 Interface Expansion Board is desinged to mount 
inside the Model III Computer. Connectors provide external 
access to the Floppy Disk Controller (for externaldrives) and 
RS232 port. 

FEATURES: 

• DOUBLE-DENSITY FLOPPY DISK CONTROLLER-IS times 

the normal single density storage; digital data separation .controls 
up to 4 drives. 

• SERIAL PORT- RS232 and 20ma loop compatible, 110-19,200 baud 

• PHONE MODEM— 0*600 baud-direct connect- "answer" and 
"originate" modes. 

• FULLY COMPATIBLE with all Model III software. 



MDX-5: Also for the TRS-80* Model III 

For the user who already has disk we offer the MDX-5. This 
board mounts next to the Floppy Disk Controller Board in 
the Model III. -.:..»■-■ 

FEATURES: 

• SERIAL PORT-RS232 and 20ma loop compatible, 1 10-19,200 baud 

• PHONE MODEM— 0-600 baud— direct connect— "answer" and 
"originate" modes. 

• Fully compatible with all Model III Software 



PHONE MODEM >* 

The MDX-4 Phone Modem utilizes the same Direct Connect, 0-600 
baud design as used in the other MDX series boards and: answer/ 
originate modes; solder-masked & silkscreened; on-board power supply. 
Compatible with any RS232 port. 



*TRS-80 is a trademark of Tandy Corporation. 



Accepted 



For a free brochure 
contact: 



Our Expensive Expansions Are Not Cheap, They Are Inexpensive. 



Bare P.C. Board & User's Manual 
Fully Assembled 

Partially Assembled 

Custom Case 

Any manual ordered separately, $5.95 plus $3.00 postage & handling. 

All board orders, add $5.00 for postage & handling. (Texas residents add 5% tax. 



MDX-1 


MDX-2 


MDX-3 


MDX-4 


MDX-5 


$69.95 


$ 74.95 


$ 74.95 


$ 29.95 


$ 59.95 




$399.95 


$324,95 


N/A 


$259.95 




$299.95 


$199.95 


N/A 


$159.95 




$45.00 









Sh 




oiv n 



EMl- 



CASE 



Encloses LNW & MDX I & II 

P.C. Boards, plus 

Cabling, A/C Cords, etc. 

Silver-gray Fiberglass 

$32.50 plus $2.50 shipping 
N.Y.S. residents add 7% tax 

SYRACUSE R&D CENTER 

Box 125, Dewitt, N.Y. 13214 
"Specializing in Electronic Packaging" 

mmammmmummmmmmm 




DISK DRIVES 

5 1 A" 40 Track drive with case and 
power supply. 



FLIPPY DRIVES ONLY $295.00 

2 DRIVE CABLE $14.95 

4116 MEMORY CHIPS 8 FOR $20 

CORSAIR COMPUTER 

CORPORATION -200 

7952 Highway 80 West 

Fort Worth, TX 76116 

817-244-8051 



MEMOREX 

FLEXIBLE DISCS 

WE WILL NOT BE UNDER- 
SOLD!! Call Free (800)235-4137 

for prices and information. Dealer 
inquines invited and C.O.D.'s 
accepted 




PACIFIC 
EXCHANGES 

100 Foothill Blvd. 

San Luis Obispo. CA 
93401 In Cal call 
(800)592-5935 or 
1805)543-1037 

.--207 
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8289 222040 


09000 


LD 


(4020H) .HL 






09100 ; 


CONTINUE THIS SUBROUTINE 




09200 ; 


BY ENTERING THE "RIGHT 


' SUBROUTINE 


828C C35383 


09300 
09400 ; 
09500 ; 


JP 


RIGHT 


;MOVE CURSOR 




09600 ; 


UP ARROfc SKC'l'ION O!- P.KADKl! 




09700 ; 










09800 ; 








828F 2A2040 


09900 UP LD 


HL, (4020H) 


; CURSOR VALUE 


8292 114000 


10000 


LD 


DE,40H 


; VALUE OF 1 LINE 


8295 ED52 


10100 


SBC 


HL.DE 


;SET CURSOR 1 LINE LESS 


8297 222040 


10200 


LD 


(4020H) ,HL 




829A 11003C 


10300 


LD 


DE,3C00H 


? TEST IN VIDEO RANGE 


829D ED52 


10400 


SBC 


HL,DE 




829F 301C 


10500 


JR 


NC. OKCUP 


; RANGE OK 


82A1 2A2040 


10600 


LD 


HL,(4020H) 


; CURSOR VALUE 


82A4 110004 


10700 


LD 


DE,400H 


;POSN TO LAST LINE 


82A7 19 


10800 


ADD 


HL.DE 




82A8 222040 


10900 


LD 


(4020H) .HL 




82AB 2A0087 


11000 


LD 


HL, (BUFADD) 


;OLD BUFFER POSITION 


82AE 11F000 


11100 


LD 


DE,0F0H 


; POINT TO LAST LINE 


82B1 19 


11200 


ADD 


HL,DE 




82B2 220087 


11300 


LD 


(BUFADD) ,HL 




82B5 2A0387 


11400 


LD 


HL.(BUFASC) 




82B8 19 


11500 


ADD 


HL.DE 




82B9 220387 


11600 


LD 


(BUFASC) ,HL 




82BC C9 


11700 


RET 






82BD 111000 


11800 OKCUP LD 


DE.10H 


;BUF VALUE OF 1 LINE 


82C0 2A0087 


11900 


LD 


HL, (BUFADD) 




82C3 ED52 


12000 


SBC 


HL.DE 




82C5 220087 


12100 


LD 


(BUFADD) ,HL 


;SET BUFFER POINTER 


82C8 2A0387 


12200 


LD 


HL, (BUFASC) 


; START OF LINE 


82CB ED52 


12300 


SBC 


HL.DE 




82CD 220387 


12400 


LD 


(BUFASC) .HL 




82D0 C39183 


12500 
12600 , 
12700 , 


JP 


ENDRDK 


; RETURN 




12800 


DOWN 


ARROW SECTION OF 


READKB 




12900 










13000 








82D3 2A2040 


13100 DOWN LD 


HL,(4020H) 


; CURSOR VALUE 


82D6 114000 


13200 


LD 


DE,40H 


;1 LINE CURSOR VALUE 


82D9 19 


13300 


ADD 


HL.DE 


;NEW CURSOR VALUE 


82DA 222040 


13400 


LD 


(4020H) .HL 




82DD 110040 


13500 


LD 


DE,4000H 


;TEST VIDEO RANGE 


82E0 ED52 


13600 


SBC 


HL,DE 




82E2 3821 


13700 


JR 


C. OKCDN 


; VIDEO RANGE OK 


82E4 110004 


13800 


LD 


DE,400H 


; ADJUST TO TOP LINE 


82E7 2A2040 


13900 


LD 


HL, (4020H) 




82EA ED52 


14000 


SBC 


HL.DE 




82EC 222040 


14100 


LD 


(4020H) .HL 




82EF 2A0087 


14200 


LD 


HL, (BUFADD) 


;OLD BUFFER ADDRESSSS 


82F2 11F000 


14300 


LD 


DE,0F0H 


;SET TO TOP LINE 


82F5 ED52 


14400 


SBC 


HL.DE 




82F7 220087 


14500 


LD 


(BUFADD) .HL 




82FA 2A0387 


14600 


LD 


HL, (BUFASC) 


; START OF LINE 


82FD ED52 


14700 


SBC 


HL.DE 




82FF 220387 


14800 


LD 


(BUFASC) .HL 




8302 C39183 


14900 


JP 


ENDRDK 




8305 2A0087 


15000 OKCDN LD 


HL, (BUFADD) 




8308 111000 


15100 


LD 


DE,10H 




830B 19 


15200 


ADD 


HL.DE 




830C 220087 


15300 


LD 


(BUFADD) .HL 




830F 2A0387 


15400 


LD 


HL, (BUFASC) 




8312 19 


15500 


ADD 


HL.DE 




8313 220387 


15600 


LD 


(BUFASC) -HL 




8316 C39183 


15700 
15800 
15900 


JP 


ENDRDK 






16000 


LEFT 


ARROW SECTION OF 


READKB 




16100 










16200 








8319 2A2040 


16300 


LEFT LD 


HL.(4020H) 


; CURSOR VALUE 


831C 2B 


16400 


40VELF DEC 


HL 


;MOVE IT LEFT 


831D 2B 


16500 


DEC 


HL 


; ..TWO SPACES 


831E 7E 


16600 


LD 


A, (HL) 


;LOOK AT CHAR THERE 


831F FE20 


16700 


CP 


20H 


; BLANK? 


8321 2023 


16800 


JR 


NZ, OKCLF 


;NO - OK. MOVE IT 


8323 7D 


16900 


LD 


A,L 


;LSB CURSOR VALUE 


8324 E604 


17000 


AND 


04H 


;TEST START OF LINE 


8326 FE04 


17100 


CP 


04H 




8328 20F2 


17200 


JR 


NZ,MOVELF 


;NO - KEEP TRYING 


832A 7D 


17300 


LD 


A.L 




832B E63B 


17400 


AND 


3BH 




832D 20ED 


17500 


JR 


NZ,MOVELF 




832F 112600 


17600 


LD 


DE,26H 




8332 19 


17700 


ADD 


HL,DE 


;MOVE TO END OF LINE 


8333 222040 


17800 


LD 


(4020H) ,HL 


;SAVE IN CURSOR 


8336 2A0087 


17900 


LD 


HL. (BUFADD) 


; ADJUST BUFFER POINTER 


8339 111000 


18000 


LD 


DE,10H 




833C 19 


18100 


ADD 


HL.DE 




833D 220087 


18200 


LD 


(BUFADD) .HL 




8340 CD8F82 


18300 


CALL 


UP 


;GO TO NEXT LINE 


8343 2A2040 


18400 


LD 


HL, (4020H) 




8346 222040 


18500 


OKCLF LD 


(4020H) .HL 




8349 2A0087 


18600 


LD 


HL. (BUFADD) 




834C 2B 


18700 


DEC 


HL 




834D 220087 


18800 


LD 


(BUFADD) ,HL 




8350 C39183 


18900 
19000 
19100 


JP 


ENDRDK 






19200 


; RIGHT ARROW SECTION OF READKB 
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19300 ; 












19400 ; 










8353 2A2040 


19500 RIGHT 


LD 


HL, (4020H) 


; CURSOR VALUE 


8356 23 


19600 HOVERT 


INC 


HL 




8357 23 


19700 




INC 


HL 




8358 7E 


19800 




LD 


A, (HL) 


;LOOK AT CHAR THERE 


8359 FE20 


19900 




CP 


20H 


; BLANK? 


835B 2025 


20000 




JR 


NZ, OKCRT 


:NO - OK FOR MOVE 


835D 7D 


20100 




LD 


A,L 


;LSSB VIDEO ADDR 


835E E62C 


20200 




AND 


2CH 


;TEST END OF LINE 


8360 FE2C 


20300 




CP 


2CH 




8362 20F2 


20400 




JR 


NZ,MOVERT 




8364 7D 


20500 




LD 


A,L 




8365 E613 


20600 




AND 


13H 




8367 20ED 


20700 




JR 


NZ,MOVERT 


;NO - KEEP TRYING 


8369 112600 


20800 




LD 


DE,26H 


;YES - GO TO START OF LINE 


836C ED52 


20900 




SBC 


HL.DE 




836E 222040 


21000 




LD 


(4020H) ,HL 




8371 2A0087 


21100 




LD 


HL, (BUFADD) 


; ADJUST BUFFER POINTER 


8374 111000 


21200 




LD 


DE,10H 




8377 ED52 


21300 




SBC 


HL,DE 




8379 220087 


21400 




LD 


(BUFADD) .HL 




837C CDD3 82 


21500 




CALL 


DOWN 


;GO TO NEXT LINE 


837F 2A2040 


21600 




LD 


HL,(4020H) 


; RELOAD CURSOR VALUE 


8382 222040 


21700 OKCRT 


LD 


(4020H) .HL 


; STORE CURSOR 


8385 2A0087 


21800 




LD 


HL, (BUFADD) 


;MOVE BUFFER POINTER 


8388 23 


21900 




INC 


HL 




8389 220087 


22000 




LD 


(BUFADD) ,HL 




838C 1803 


22100 
22200 ; 
22300 ; 




JR 


ENDRDK 






22400 , 




ENTER 


KEY SECTION OF 


READKB 




22500 , 




SET CARRY FLAG AS <ENTER> SIGNAL 




22600 , 












22700 , 










83 8E AF 


22800 E 


NTER 


XOR 


A 




838F D601 


22900 




SUB 


1 


;SET CARRY 


8391 C9 


23000 E 
23100 , 
23200 , 


NDRDK 


RET 








23300 , 




READ 


AND CONVERT KEYBOARD RESPONSE SUBROUTINE 




23400 , 




<A> CONTAIN:; KKYHOAPJ 


INPUT 




23500 












23600 , 










83A0 


23700 




ORG 


83A0H 




83A0 


23800 I 


BMOD 


EQU 


$ 




83A0 2A2040 


23900 




LD 


HL, (4020H) 


; CURSOR VALUE 


83A3 0602 


24000 




LD 


B,2 


;DO THIS TWICE 


83A5 FE00 


24100 1 


TRYLET 


CP 





;TEST NO KEY 


83A7 CAF083 


24200 




JP 


Z,RD2ND 


;READ 2ND CHAR 


83AA FE0D 


24300 




CP 


0DH 


;TEST <ENTER> 


83AC 2005 


24400 




JR 


NZ,CONTKB 


;NO, GO ON 


83AE 3EFF 


24500 




LD 


A,0FFH 


;<ENTER> FLAG 


83B0 C3EF83 


24600 




JP 


KB RET 




83B3 FE47 


24700 


:ONTKB 


CP 


47H 


;TEST > 'F' 


83B5 D2F683 


24800 




JP 


NC.RET2ND 




83B8 FE40 


24900 




CP 


40H 


•TEST < 'A' 


83BA 3803 


25000 




JR 


CTRYNUM 


:NOT A-F TRY A NUMBER 


83BC C3C983 


25100 




JP 


NLOOP 




83BF FE3A 


25200 


rRYNUH 


CP 


3AH 


;TEST > '9' 


83C1 D2F683 


25300 




JP 


NCRET2ND 




83C4 FE2F 


25400 




CP 


2FH 


;TEST < '0' 


83C6 DAF683 


25500 




JP 


CRET2ND 




83C9 77 


25600 ( 


JLOOP 


LD 


(HL) .A 


; DISPLAY 


83CA 23 


25700 




INC 


HL 




83CB CD5B03 


25800 




CALL 


035BH 


;READ KEYBOARD AGAIN' 


83CE 10D5 


25900 




DJNZ 


TRYLET 






26000 




CONVERT TO HEX ASCII 






26100 




DISPLAY 2 BYTES/BYTE 




83D0 2B 


26200 


10DBUF 


DEC 


HL 




83D1 2B 


26300 




DEC 


HL 




83D2 7E 


26400 




LD 


A, (HL) 




83D3 FE40 


26500 




CP 


40H 




83D5 3802 


26600 




JR 


CMODNUM 




83D7 D607 


26700 




SUB 


7 




83D9 E60F 


26 800 


10DNUM 


AND 


0FH 




83DB CB27 


26 900 




SLA 


A 




83DD CB27 


27000 




SLA 


A 




83DF CB27 


27100 




SLA 


A 




83E1 CB27 


27200 




SLA 


A 




83E3 4F 


27300 




LD 


C,A 




83E4 23 


27400 




INC 


HL 




83E5 7E 


27500 




LD 


A, (HL) 




83E6 FE40 


27600 




CP 


40H 




83E8 3802 


27700 




JR 


CMODNU2 




83EA D607 


27800 




SUB 


7 




83EC E60F 


27900 


40DNU2 


AND 


0FH 




83EE Bl 


28000 




OR 


C 




83EF C9 


28100 
28200 
28300 


<BRET 


RET 






83F0 CD5B03 


28400 


*D2ND 


CALL 


035BH 


;NO KEY YET - READ AGAIN 


83F3 C3A583 


28500 
28600 
28700 




JP 


TRYLET 




83F6 3E02 


28800 


*ET2ND 


LD 


A, 2 


;TEST FIRST CHAR TYPED 


83F8 B8 


28900 




CP 


B 




83F9 C8 


29000 




RET 


Z 




83FA C3F083 


29100 
29200 
29300 




JP 


RD2ND 






29400 




DUSPLA', b..i-'F;:? rc-\'Tf.\Ts .-ub^^ti'--;?: 




29500 












29600 








Program Listing 2 Continues 




MAYDAY means HELP and here it is. 
*TRS-80 Programming 



HELP utility piogram -o< your 'NEWDOS 80 disk. .. help command 
returns a mini-page display of Ihe manual... tor mod. I and mod. 

Ill- disk... *15 

program lets you put mod- I discs 

nd get an automatic p-dnve setup... makes it quick and easy.. 

$15 



ADB auto density recognition program lets you put mod. I discs i 
and get an automatic p-dnve setup... makes it quick and easy, 
disk tl 



COMPACTOR mod. I or mod III disc compactor program... gets 
the most out of each ol your discs $15 



LISTR :eads compacted programs and giv* 
expanded and super legible format. . disc 



, hard copy listing I 



Get all lour ot the above < 



QCDATA process control analysis . . g 
screen and a hard copy report i 
vesication.-- mod. Ill, level II disc 



qui. 



ults on 

:curate 

(ISO 



WGHTCAL compute part weight from blueprints by geometric 
definition... was developed for use in the plastics industry, but 
could be modified for other uses--- gives a hard copy report of the 
results and methods used . mod- HI. level II disc or casset te $250 

Send check or money order only... 
add SI. 50 for shipping... Wis. residents add 4% lax 



c=ffi\ayday 



SOFTWARE 



Post Ollice Box 66, Phillips, Wisconsin 54555 
715-339-3966 



MODEL III TRS-80® 
Software on Disks! 

At last! All Model III. 
Put it in — Watch it run. 

GUARANTEED — SEND FOR 

FREE CATALOG. INCLUDE $9.95 

FOR DISK VERSION AND 

A FREE PROGRAM. 



Rt. 5, Box 277-C 
Benbrook, TX 76126 



• UTILITIES • 

MISSING COMMAND ON THE MODEL I 
FORMS 

No more printing off the paper Self relocates to top of 
available memory Change print line width from DOS or 

Basic Model I -Disk ... $14 95 

ZAPPER 
NEWDOS/80 Ver. 2 users Zaps your NEWDOS 80 
Ver. 2 disk without using SUPERZAP then transfers 
those zaps to all your disks, update your old operating 
system(s) to NEWDOS/80 Ver 2, changes single density 
to double and double to single density ■ Model 1 or III - 2 
drives - Model I must have double density installed to use 

all features $24.95 

SMARTT2 
Smart Terminal Program written in Basic with Machine 
Language I/O Routines Full featured Make your own 
modifications, suggestions included, fully commented 

listing - Model I or III - disk $39 95 

LISTER 4 
"Pretty Lister" that LLlSTs both ASCII and Compressed 
Basic programs to your printer with machine language 

speed Model 1 disk. ... $19.95 

Programs are on disk with instructions and listings Check, 
Money Order or COD Shipped Postage Paid Add 

$2 00 for COD. 

CALL - Custom Software for your application - CALL 

I. J. S. 

625 Cedar Street - Rock Springs. Wy. 82901 

Phone (307) 382-8742 

NEWDOS -80 SUPERZAP trademarks of Apparat Inc 



■4CM 



sSee List of Advertisers on page 386 
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The 

Lawyer's 

Microcomputer 

A Newsletter for Lawyers 
Using the TRS-80* 

• Articles for Lawyers 

• Law Office Applications 

• Lawyer Information 
Exchange 

• Software Reviews 

• Hardware Reviews 

• Advertisements Directed 
to Lawyer Users 

• Technical Tips 

• Letters and Suggestions 

• And Much More 

A New Monthly Newsletter 
For Lawyers 

Send $28 For A 
One Year Subscription 

The Lawyer's Microcomputer™ 

Post Office Box 1046A 
Lexington, S.C. 29072 
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Program Listing 2 Continued 



83FD 
8400 

8401 

8404 
8406 
8409 
840D 
840E 
8411 
8414 
8417 
8419 
641A 
841D 
64 IF 
8420 
8423 
84 2 4 
8426 
8427 

842 9 
842C 
b 4 2 F 
8430 
6431 
••433 

843 5 
84 3 8 
B4:'A 
843D 
8 4 3 F 
84 4 2 
84 4 4 



CDC 901 

AF 

320287 

0610 

210086 

DD2100E 

C5 

3A0287 

CD 67 84 

CD4584 

060 4 

C5 

CD4584 

06 4 

7E 

CD67 84 

23 

1 F 9 

CI 

10F0 

CD4584 

CD4E8 4 

CI 

78 

FE0] 

280D 

3A0287 

C610 

320287 

3F0D 

CD3A0 3 

10C9 

C9 



3443 3319 
844" CD3A03 
844A CD3A03 

6 4 4D C9 



B44E 
84 5 
84 53 
8433 
8457 
8459 
84 5 B 
34 30 
84 5F 
8462 
8464 
8466 



8467 
8468 
8 46B 
846C 
846E 
8470 
8472 
8474 
8476 
8478 
8479 
847A 
847B 
847E 
847F 
8481 
8482 
3483 
8486 
8487 
848A 
848B 



0610 

DD7E0 

FE1F 

3002 

3E2E 

FE80 

3 80 2 

3E2E 

CD3A0 3 

DD23 

10EA 

C9 



E5 

210587 

4F 

E6F0 

CB3F 

CB3F 

CB3F 

CB3F 

1600 

5F 

19 

7E 

CD3A03 

79 

E60F 

5F 

210587 

19 

7E 

CD3A03 

El 

C9 



848C 01001C 
848F 0B 

8490 78 

8491 Bl 

8492 20FB 
8494 C9 



1000 TOTAL 



29700 DISP! 

2 9 800 
29900 
30000 

30100 
6 3(3 200 

30300 LINE 

30400 

30500 

30600 

30700 

30800 GROU: 

30900 

31000 

31100 BYTE 

3 12 

31300 

31400 

31500 

31600 

31300 

32 800 
31900 
32000 
32100 
32 200 
32300 
32400 
32500 
326 00 
32300 

32 80 NOCR 
8 2 900 

3 3 000 
33100 
33288 
3 3 3 8 8 

33 400 
8 3 688 
8 3 b 8 
3 3 7 8 
33 800 
33900 
34000 
34100 
34200 
34300 
34480 
34308 
3 4 6 8 
34700 
34800 
34900 

35000 ASC0K1 
3 318 8 

35200 
35300 
35400 
38308 
35600 
3 5 7 8 
35800 
35900 
36000 
36108 
36200 
36300 
36400 
36500 
38608 
36700 
36800 
3 6 908 
37000 
37 1 80 
37200 
37 3 08 
37400 
37500 
37688 
87 78 8 
87 88 
37900 
38000 
38100 
38200 
38300 
38400 
38500 
38600 
38700 
3 8 800 
38900 
39000 
3 910 8 
39200 
3 9 3 8 
3 9 4 8 
39500 
39600 
39700 
39800 
39900 
ERRORS 



ASCPRT 
DISASC 



ASC0K2 



DELAY 

PL 2 



CALL 


01C9H 


XOR 


A 


LD 


(BADDR) ,A 


I.D 


8,10H 


LD 


HL, BUFFER 


LD 


IX, BUFFER 


PUSH 


BC 


LD 


A, (BADDR) 


CALL 


CONVA 


CALL 


SPACE 


LD 


B, 4 


PUSH 


BC 


CALL 


SPACE 


LD 


B,4 


LD 


A, (HL) 


CALL 


CONVA 


INC 


HL 


DJNZ 


BYTE 


POP 


BC 


DJNZ 


GROUP 


CALL 


6 PACK 


CALL 


ASCPRT 


POP 


BC 


LD 


A, 13 


CP 


1 


JR 


? , NOCR 


LD 


A, (BADDR) 


ADD 


A.18H 


LD 


(BADDR) ,A 


LD . 


A,0DH 


CALL 


833AH 


DJNZ 


LINK 


RET 





fCLS 

; RELATIVE BUFFER ADDR 

;LINE COUNTER = 16 

; RUFFES ADDRESS 

tUSED FOR ASCII DISPLAY 

; BUFFER COUNTER 
.•CONVERT TO ASCII (HEX) 

; LEAVE A COUPLE OF SPACEi 
; NUMBER OF GROUPS 



; NUMBER BYTES/GROUP 
! FETCH A BYTE 



•TEST FOR LAST LINE 

;SKIP CR/LF ON LAST LINE 
rINCR BUFFER COUNTER 



rCR/I F AFTER LIKE 



LEAVE A COUPLE OF SPACES SUBROUTINE 



LD 


A, 198 


CALL 


033 AH 


cm i. 


03 3A6 


RET 





; SPACE CONTROL CHAR 



PRINT ASCII SUBROUTINE 

<IX> CONTAINS ADDR OF START OF LINE IN BUFFER 



LD 

LD 

CP . 

JR 

LD 

CP 

J R 

LD 

CALL 

INC 

DJNZ 

RET 



B,10H 

A, ( LX) 

1FH 

NC.ASCOKl 

A, ' . ' 

80H 

CASC0K2 

A, ' . ' 

033AH 

IX 

DISASC 



;16 BYTES IN LINE 
;ADDR OF START OF LINE 
;TEST < 'BLANK' 

;NO - CONTINUE 
; DISPLAY PERIOD 
j TEST > 'LO CASE' 

; DISPLAY PERIOD 



CONVERT A BYTE TO HEX-ASCII AND 
DISPLAY 

<A> CONTAINS INPUT 



6886 


HL 


LD 


HI..HEXN0 


LD 


CA 


AND 


0F0H 


SRL 


A 


ORE 


A 


SRL 


A 


886 


A 


LD 


D,0 


LD 


E,A 


ADD 


HL,DE 


LD 


A, (HL) 


CALL 


03 3AE 


LD 


A,C 


AND 


0FH 


LD 


E,A 


LD 


HL,HEXN0 


ADD 


HI, .BE 


LD 


A, (HL) 


CALL 


033AII 


POP 


HL 


RET 





ADDR OF HEX CHARACTERS 

SAVE PARAMETER 

HI NIBBLE 

SHIFT TO LO NIBBLE 



; CLEAR <D> OF 6DE » 

?<DE> IS INDEX INTO HEXNO 

;ADDR OF HEX NUMBER 



; RESTORE PARAMETER 
:L0 NIBBLE 



DELAY SUBROUTINE 



LD BC1000H 

DEC BC 

LD A,B 

OR C 

8 8 NZ,DL2 

RET 
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Program Listing 3 
00100 jitmttnm >;;?;>;>;;;; 





00200 




SIHPLZAP ; 








B8300 




(PART 


3) •; 






0040B 




MMIMMIt 






00500 












00600 












00700 




WRITE 


A SECTOR 






00800 












00900 










85 


01000 




ORG 


8500H 




8600 


01100 


BUFFER 


EQU 


8600H 




8717 


01200 


DRIVNO 


EQU 


8717H 




81A0 


01300 


SEEK 


EQU 


81A0H 




8110 


01400 
01500 
01600 


QUERRY 
i 


EQU 


8110H 




8500 CDC901 


01700 


WRITE 


CALL 


01C9H 


;CLS 


8503 CD1081 


01800 




CALL 


QUERRY 




8506 CD0A85 


01900 




CALL 


WRITIT 




8509 C9 


02000 
02100 
02200 




RET 








02300 




WRITE 


I/O SUBROUTINE 






02400 












02500 










850A 210086 


02600 


WRITIT 


LD 


HL r BUFFER 




BUFFER ADDRESS 


850D 3A17 87 


02700 




LD 


A, (DRIVNO) 




DRIVE NUMBER VALUE 


8510 32E137 


02800 




LD 


(37E1H) ,A 




START MOTOR/SELECT DR 


8513 010000 


02900 




LD 


BC.0 




DELAY 


8516 CD6000 


03000 




CALL 


60H 




8519 CDA081 


03100 




CALL 


SEEK 




651C 3EAC 


03200 




LD 


A.0ACH 


; WRITE OP CODE 


851E 32EC37 


03300 




LD 


(37ECH) ,A 


; . . TO CMD REG 


8521 0606 


03400 




LD 


B,6 




8523 10PE 


03500 




DJNZ 


$ 


; DELAY 


8525 0600 


03600 




LD 


B, 


;256 BYTES 


8527 3AEC37 


03700 


WRWT1 


LD 


A, (37ECH) 


;READ STATUS REG 


852A CB4F 


03800 




BIT 


IrA 


; DRQ? 


852C 28F9 


03900 




JR 


Z r WRWTl 


(NO - LOOP UNTIL DRQ 


852E 7E 


04000 




LD 


A, (HL) 


;DATA BYTE FROM BUFFER 


852F 32EF37 


04100 




LD 


(37EFH) .A 


; . . INTO DATA REG 


8532 23 


04200 




INC 


HL 




8533 10F2 


04300 




DJNZ 


WRWTl 




8535 C9 


04400 
04500 
04600 




RET 








04700 




DATA 


i\ND STORAGE 






04800 












04900 










8600 


05000 




ORG 


8600H 




0100 


05100 


BUFFER 


DEFS 


2 56 




0002 


05200 


BUFADD 


DEFS 


2 




0001 


05300 


BADDR 


DEFS 


1 




0002 . 


05400 


BUFASC 


DEFS 


2 




8705 30 


05500 


HEXNO 


DEFM 


■0123456789ABCDEF' 


8715 00 


05600 


TRAKNO 


DEFB 







8716 00 


05700 


SECTNO 


DEFB 







8717 01 


05800 


DRIVNO 


DEFB 


1 




8730 


05900 




ORG 


8730H 




8730 53 


06000 


READ1 


DEFM 


•SIMPLZAP' 




8738 0D 


06100 




DEFB 


0DH 




8739 0D 


06200 




DEFB 


0DH 




873A 45 


06300 




DEFM 


'ENTER TRACK NUMBER" 


87 4C 0D 


06400 




DEFB 


0DH 




874D 4F 


06500 




DEFM 


•OR <ENTER> IF 


SAME TRACK' 


8765 0D 


06600 




DEFB 


0DH 




8766 3F 


06700 




DEFM 


'? ' 




8768 00 


06800 




DEFB 







877 


06900 




ORG 


8770H 




8770 0D 


07000 


READ2 


DEFB 


0DH 




8771 4 5 


07100 




DEFM 


'ENTER SECTOR 


NUMBER' 


8784 0D 


07200 




DEFB 


0DH 




8785 4F 


07300 




DEFM 


'OR <ENTER> IF 


SAME SECTOR' 


879E 0D 


07400 




DEFB 


0DH 




879F 3F 


07500 




DEFM 


'? ' 




87A1 00 


07600 




DEFB 







87B0 


07700 




ORG 


87B0H 




87B0 53 


07800 


MENU0 


DEFM 


•SIMPLZAP - A 


DISKETTE REPAIR UTILITY 


87D4 0D 


07900 




DEFB 


0DH 




87D5 0D 


08000 




DEFB 


0DH 




87D6 43 


08100 




DEFM 


'COPYRIGHT (C) 


' 


87E3 0D 


08200 




DEFB 


0DH 




87E4 42 


08300 




DEFM 


'B. BOASSO 1 




87ED -0D 


08400 




DEFB 


0DH 




87EE 37 


08500 




DEFM 


'700 N. WKNDY 


#7' 


87FD 0D 


08600 




DEFB 


0DH 




87FE 4E 


08700 




DEFM 


'NEWBURY PARK, 


CA. 91320' 


8815 0D 


08800 




DEFB 


0DH 




8816 0D 


08900 




DEFB 


0DH 




8817 53 


09000 




DEFM 


•SELECT PROCESSING OPTION' 


882F 0D 


09100 




DEFB 


0DH 




8830 0D 


09200 




DEFB 


0DH 




8831 31 


09300 




DEFM 


•1 - READ A SECTOR' 


8842 0D 


09400 




DEFB 


0DH 




8843 32 


09500 




DEFM 


•2 - MODIFY BUFFER' 


8854 0D 


09600 




DEFB 


0DH 




8855 33 


09700 




DEFM 


•3 - WRITE A SECTOR' 


8867 0D 


09800 




DEFB 


0DH 




8868 34 


09900 




DEFM 


'4 - QUIT' 




8870 0D 


10000 




DEFB 


0DH 




8871 3F 


10100 




DEFM 


'? ' 




8873 00 


10200 




DEFB 







0000 


10300 




END 









OMNITEK COMPUTERS " 195 

INTERNATIONAL, INC. 

1899 MAIN STREET 

TEWKSBURY, MASS 

617-851-4580 

RS232 Direct Connect Modems 99.00 

Scotch S.S/S.D 5.25" Diskettes 25,00 

Verbatim 5 25" D L 25.00 

1 6K RAM KITS 14.00 

TECO 12" B&.GMonitor I 19.00 

Okidata Microline 80 329.00 

Okidata Microline 82A 449.00 

Okidata Microline 83A 699.00 

Epson Mx-80 479.00 

Epson MX-80 FT 569.00 

Radio Shack Mill w/48K 879.00 

Radio Shack Mill w/48l< and 2 40T dr 

1099.00 andRS232 .. 1799.00 

40 track 5.25" Tandon TM- 100- 1 .284.00 
80 track 5.25" Tandon Dual Head. 484. 00 

5 2 5" Power Supply and case 49.00 

8" Power Supply and case 99.00 

CENTRONICS 739 Printer 499.00 

TRS-80 is a registered trademark of 
Tandy Corp. 

Prices are for mail order only. 

TERMS: Check, money order. Mastercard 

and Visa accepted. F.O.B. Tewksbury- 

freight extra. Mass residents add 5°o 

sales tax Write for FREE CATALOG. 



TRS-80™ Model 1 & 3 

SYSTEM DIAGNOSTIC $99.95 

Tests for every component of your TRS-80 
Model 1 or 3: ROM, RAM, Video Display, 
Keyboard, Line Printer, Cassette Recorder, 
Disk Drives, RS-232 Interface. 

SMART TERMINAL $69.95 

Model II Version (CP/M only) ...$79.95 
The intelligent telecommunication pro- 
gram. Automatic transmission and recep- 
tion of data. True BRFAK key. Complete 
character mapping, lower case. Cassette 
and disk files compatible with both 
SCRIPSIT™ and Electric Pencil'". 

MONITOR #4 $49.95 

Disassembler; memory displays; move, 
search, modify memory; read and write 
machine language cassettes; object code 
relocator; hexadecimal arithmetic; disk 
file and sector input and output; RS-232 
communications. (Models 1 and 3 only.) 
SMALL BUSINESS ACCOUNTING 

Disk version $49.95 

Cassette version $29.95 

Based on Dome Bookkeeping record, 
keeps track of income, expenditures, and 
payroll for small business (up to 16 em- 
ployees). Cassette version does not 
contain payroll. 

Specify Model number 

Send S.A.S.E. for FREE Catalogue 

Add $3.00 for postage and handling. 

HOWE SOFTWARE 

14 Lexington Road, New City NY 10956 
(914) 634-1821 ^175 

TRS-80 is a registered trademark of Tandy Corp. 



■See List ol Advertisers on page 386 
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TRS-80* Computer Owners. 




RVAL 




for Perco 




Complete First-Drive Systems 
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from 

Internally mounted drives that feature double- or 
single-density storage, comprehensive pre- 
delivery testing, 48-hour burn-in and, best of all, 
Percom's widely acclaimed disk controller. A 
First-Drive System includes the four-drive disk 
controller, one or two drives, power supplies, 
cables and a fully illustrated owners manual. Use 
Model III TRSDOS*, Percom OS-80 4 and all 
other Model III compatible DOSs. 

Note: If you prefer not to make the First-Drive 
System installation, we'll do it for only $29.95 
plus shipping. This includes a 48-hour operat- 
ing burn-in of your Model III computer, instal- 
lation of the drive system and final checkout 
of the expanded system. 



Our Own Fully Tested Drives 

from only $275 

Every Access Floppy Disk drive is electrically tested, mechanically tested and 
burned-in 48 hours under operating conditions. Look for the signed test list in 
the shipping carton. 

AFD drives are capable of either single- or double-density operation. Store up 
to 364 Kbytes (formatted) in double density. Store twice the data on a single 
diskette using AFD "flippy" drives." 

15-day free trial offer... comprehensive 90-day limited warranty... unbeatable 
prices... AFD-1 00 (a $275.00, -100F (a- $329.00, -200 (a $429.95, -200F (a 
$449.95. 



How to order-Order by calling Access Unlimited toll-free on 1-800-527-3475 Or order by mar 
Orders may be charged to a VISA or Master Card account, or paid by cashier's check, certified 
check or money order. Sorry, we cannot accept personal checks. We pay freight (surface only) 
and insurance charges for shipments in U.S. on orders over S1 .000.00. Add approximate 
insurance and shipping charges for orders under $1,000.00. If in doubt about these charges, 
ask when you call in your order. Texas residents include 5% sales tax. Minimum mail order 
$20.00. Allow 2 to 4 weeks for delivery. 

Texas (214) 340-5366 

Save! VISA and Master Card charges are not deposited 
until the day your order is shipped. 



PRICES AND SPECIFICATIONS SUBJECT TO CHANGE WITHOUT NOTICE. 



Everybody's Favorites - for Less! 

Percom Data Separator $23.95 

Green Screen I, II, or III $18.95 

Head Cleaning Kit $24.95 

Drive Numbering Tabs (pkg 0-3) $4.50 

5 1 /4" Flip-N-File $24.95 

8" Flip-N-File $39.95 




PRIC 
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Percom s Proven DOUBLER ll f 

Upgrade Your Model I to Double Densi 

only $159,95 

And not with some unproven hacker's kit, either. But with an assembled and fully 
tested Percom DOUBLER-lP . The DOUBLER ll r simply plugs into the disk drive 
controller socket of your Expansion Interface. Then it lets you store over four times 
more on one side of a diskette, depending on the drive, than you can store on 
standard Tandy Model I drives. Other features: • Reads, writes and formats either 
single- or double-density • Includes DBLDOS ", a TRSDOS* compatible disk- 
operating system • Runs TRSDOS*, NEWDOS n , Percom 05-80+ and other 
single-density software immediately. Change to double-density operation when con- 
venient • Use Move 1-2-3 utility ($29.95) or other appropriate software to read 
Model III programs on your Model I. • Includes on-card high-performance data 
separation and write precompensation circuitry. 






Low Cost 
System Furniture 

Modular design permits cus- 
tom arrangements • Furniture 
styling and quality • TRS-80* 
colors • OK for UPS shipping 
• Reassemble without tools 

System desks from $115 
Printer stands from $144 



Arrick Products Quick-Switch^: 

Jus; flick a switch to connect your TRS-80' printer port Irom device # ! to 
device 42. Or, "Quick-Switch" a peripheral between computers. Versions 
for RS-232 or Centronics interfacing. Includes box-mounted 34-pin card-edqe 
plugs. From $89.95. Cables from $29.95. 
* trademark of Arrick Products Company. ■■*> 



Save! Make ACCESS your one-call shopping center for TRS-80* 
hardware and software. Call our toll-free order number for free 
product literature and latest prices. Ask for our new, free 
software catalog. 



Toil-Free 
Order No. 



1-800-527-3475 



o 



(orders & literature only) 



ACCESS UNLIMITED 



"Trademark ol Access Unlimited 
t Trademark o! Percom Data Company. Inc 



JftS&SSfcBsS'.**!* *#« 



401 N. Central Expressway #600 

Richardson, Texas 75080 

(214) 340^5366 ^26 

'Trademark of Tandy Radio Shack Corporation 
tt Trademark of Apparat Corporation. 



BUSINESS 



LOAD 80 



This telemarketing program will cut down your company's overhead. 




Rodger Wells 
1008 Kehoe Drive 
Saint Charles, I L 60174 
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eluded in this system. The main 
program (Survey) reads input 
from two other files, created 
using the other two Basic pro- 
grams, (Loadfile/BAS and Ques- 
tion/BAS). 

Survey (Program Listing 1) 
reads telephone numbers from 
one file and questions from an- 
other file. After dialing the number 
for you (using about $10 worth of 
hardware), the program displays 
appropriate questions on the 
screen. As you input answers, the 
next question is displayed; irrele- 
vant questions are automatically 
skipped to avoid confusion and 
save time. The auto-dial saves ad- 
ditional time and money through 
accurate dialing. 

You can program up to thirty 
screens (questions and state- 
ments) in a 16K system. With 
each screen, up to seven dif- 
ferent responses guide you to 
the next question. After the ques- 
tion routine all the answers are 
written to an output file where 
they can be processed further to 
include mailing lists, order entry 
and statistical analysis. 

The question set development 

80 Microcomputing, June/July 1982 



As the price of energy esca- 
lates beyond everyone's 
guesses, businesses continue 
to trim the high cost of travel. 
The current cost of a personal 
sales call approaches $200; a 
solution is Telemarketing, re- 
placing face-to-face sales calls 
with the telephone. 

A low-cost microcomputer 
can simplify any telemarketing 
program, including selling, mar- 
ket research and fund drives. 

Three Basic programs are in- 



The Key Box 

Basic Level II 

Model I or II 

16K RAM 

Telephone dialing interlace 







Program Listing 1. Survey 




10 


CLEAR 10000 








20 


JIM TN$(18) 


TC$(18), CF$(18), NUM(20), A$(30) 




30 


)IH QS(30, 


) , AA$(30, 7) , NA(30) , 


AP(30, 7) 




40 


JEFINT A-Z 








50 


:ls 








60 


>RINT ? 347 


"SURVEY" 






70 


'RINT @ 408 


"RODGER WELLS"; 






80 


'RINT @ 471 


"COPYRIGHT 19 80"; 






90 


^OR X = l TO 500 






100 


NEXT 








1 1 


CLS 








120 


INPUT'DO YOU NEED INSTRUCTIONS (Y/N)";A$ 




130 


IF LEFTS(A$, 1)="Y" GOSUB 1570 






140 


X = 








150 


CLS 








160 


IF LEFT$(TIME$, 2) ="00" PRINT'SET 


CLOCK & DATE. . .": 


END 


178 


GOSUB 1690 








180 


CLS 








190 


INPUT'ENTER TELEPHONE NUMBER FILE 


';FSS 




200 


OPEN"R" r l, 


FSS 






210 


INPUT"AREA 


CODE FROM WHICH CALLS 


<\RE BEING MADE";AC$ 


220 


INPUT"NUMBERS TO PREFIX TO CALLS" 


PD$ 




230 


INPUT"MUST 


■1' BE USED TO PLACE LONG DISTANCE CALLS 


' ;DD$ 


240 


INPUT n ENTER OUTPUT (RESULTS) FILE 


NAME";FSS 




2 b 


OPEN"0",2, 


FS$ 






26 


INPUT"QUESTION FILE NAME";FQ$ 






27 


OPEN "I", 3, 


FOS 






280 


GOSUB 93 




Program Listing 1 


continues 



+ 9V 



(RELAY) 
WABASH 
5504-II0II 



TO 

CASSETTE OUT 
(LARGE GREY 
PLUG) 




TO 

TELEPHONE 
"TIP a RING' 



2N2222A 

NPN 

TRANSISTOR 



Fig. 1. Telephone dialing relay 



requires much thought. You 
must consider every possible 
response and plan the ap- 
propriate next question. Plan the 
question set logic with flowchart 
diagrams to assure that every 
path is correct before you load 
the files. 

Survey Development 

After defining your objectives 
and your target market and lay- 
ing out your questioning pro- 



this number has already been 
called, and a flag to show if this 
number is blocked or completed. 
Loadfile/BAS prompts you for 
each number. If you enter too 
many or too few digits, input any 
non-numerics, or if the second 
digit of a ten-digit (long distance) 
number is not a zero or a one, the 
program will reject it. If you pur- 
chase a customer list, get one 
readable by your computer. A 
separate program can easily 



"If you purchase a customer list, 
get one readable by your computer." 



cess, assemble your question file 
by running Question/BAS (Pro- 
gram Listing 2). You can also 
modify a similar question file. 
The program prompts you to in- 
put each screen. Use any com- 
bination of characters to lay out 
the screen. The down arrow 
allows multiple input lines. 

You can input three lines for 
each screen; if you do not need 
that much space, respond to the 
prompt with Enter. The maximum 
input is three 255-character lines, 
probably more than is ever 
necessary for a single screen. 

After each screen input you 
are asked how many responses 
can be expected, determining 
the steering action to the next 
question. Straightforward ques- 
tions such as name and address 
have only one response. 

After stating how many re- 
sponses (maximum of seven) are 
possible, input those answers in- 
to the file. They act as a menu 
when you are running Survey. Fi- 
nally, you will be asked to steer 
each response to another screen. 
Careful planning allows special- 
ized messages to be delivered 
with thirty screens. 

You will now be shown a review 
of the screen. Any item can be 
changed at this time. When final, 
the detail is written to your ques- 
tion file to be accessed by Survey. 

Create a random access cus- 
tomer file with Loadfile/BAS (Pro- 
gram Listing 3). The file contains 
three pieces of information for 
every client: telephone number, a 
counter to show how many times 



transform the numbers into the 
correct format. 

You now have your audience 
and questions defined and your 
numbers loaded into a file. Be- 
fore going into production, build 
the simple telephone dialing in- 
terface in Fig. 1 to allow Survey 
to dial your calls through the 
cassette output port. It does not 
use the cassette on/off relay. 



Survey Use 

Set the time and date in your 
system using the DOS Time and 
Date commands. The output 
logs start and stop time for 
analysis. Load Basic and run 
Survey. You can review instruc- 
tions in the program itself. You 
are asked the names for the vari- 
ous files. Enter the telephone 
area code from which the calls 
are to originate and any prefix 
digits (such as 9). You are also 
asked if 1 must be dialed to 
place a long distance call. The 
first telephone number in the file 
that is not completed will be dis- 
played and you will be asked 
whether you want to dial it. 
Answer yes, and the call will be 
dialed. Press Enter to display 
your screens. At the end of the 
call, the answers are written to 
your outf ile and the next number 
is referenced. 

The output file can be used to 
generate a mailing list, to cut 
an order or to be statistically 
studied. 

If you plan to reuse the file, 
save a copy of the original. ■ 



Program Listing 1 continued 

290 'FIELD INPUT BUFFER 

300 FOB X = TO 18 

310 FIELD 1,(X*13) AS DU$, 10 AS TN$(X), 2 AS TCS(X), 1 AS CF$(X 

i 

320 NEXT 

330 NN=1 

340 IF E0F(1)PRINT"AT END OF CUSTOMER FILE.": CLOSE: END 

350 GET 1, NN 

360 FOR X=0 TO 18 

370 IF VAL(TN$(X) ) =0 THEN 1420 

380 IF CF$(X)="C" THEN 1420 

390 IF TN$(X)="" THEN 1420 

400 CLS 

410 PRINT-NEXT TELEPHONE NUMBER IS. . . " ; TNS (X) 

420 A$(N+1)=TN$(X) 

430 PRINT"THIS NUMBER HAS BEEN TRIED " ; TC $ (X ) ; " TIMES." 

440 A$="" 

450 PRINT 

460 INPUT"<ENTER> TO PLACE CALL OR 'N' FOR NEXT NUMBER";AS 

470 IF LEFT$(A$, 1)="N" THEN 1460 

480 IF LEFTS(TN$(X) , 3)=AC$THEN TNS (X) =RIGHT$ (TN$ ( X) , 7) 'STRIPS 

AREA CODE 
490 IF DDS="Y" AND LEN (TNS (X) ) =10 THEN TN$(X)="1" +TNS(X) 'PREFI 
X 1 

500 IF DDS="Y" AND LEN (TN$ (X) ) =7 THEN INPUT"MUST '1' BE DIALED F 
OR THIS NUMBER ( Y/N) " ; Q2 $ : IF Q2$="Y" THEN TN$(X)="1" +TN$(X) 
510 IF PD$<>"" THEN TNS (X) =PD$+TN$ (X) 
520 FOR XX=1 TO LEN(TNS(X)) 
530 T=ASC(MID$(TNS(X) , XX, 1)) 

540 IF T<48 OR T>57 PRINT"BAD NUMBER - SKIPPING": LSET CF$(X)="B 
": GOTO 1380 

550 NUM(XX)=VAL(MIDS(TNS(X) , XX, 1)) 
560 IF NUM(XX)=0 THEN NUM(XX)=10 
570 NEXT XX 
580 CLS 

590 PRINT"DIALING.. .' 
600 OUT 255, 1 
610 FOR Z=l TO 350 
620 NEXT 
630 PRINT TNS(X) 

640 PRINT"PRESS <ENTER> TO ABORT DIALING." 
650 FOR XX=1 TO LEN(TN$(X)) 

660 IF NUM(XX)=10 PRINT"0"; ELSE PRINT NUM(XX); 
670 FOR Y = l TO NUM(XX) 
680 OUT 255, 
690 BS=INKEYS 
700 IF B$<>"" GOTO 1460 
710 FOR Z = l TO 8 
720 NEXT 'DIAL PULSE TIMING 
730 OUT 2 55, 1 
7 40 FOR Z=l TO 8 
7 50 NEXT 
760 NEXT Y 
770 FOR Z=l TO 100 
780 OUT 255, 1 

790 NEXT 'INTERDIGIT TIMING 

800 NEXT XX 
810 PRINT" " 
820 OUT 255, 1 

830 PRINT"LIFT HANDSET AND WAIT FOR CONNECTION..." 
840 FOR XX=1 TO 1000 
850 NEXT 
860 OUT 255, 

870 PRINT"PRESS <ENTER> WHEN PARTY ANSWERS OR 'N' IF NOT ANSWERE 
1!" 

880 BS=INKEY$ 
890 IF B$="" THEN 880 

900 IF BS="N" THEN PRINT'CALL CANCELLED - HANG UP PHONE": LSET T 
C$=MKIS(CVI(TCS(X) )+l) : GOTO 1460 
910 A$(0)=TIMES 
920 GOTO 1060 

930 'READ QUESTIONS FROM FILE 
940 IF E0F(3)THEN 1050 
950 N=N+1 
960 FOR X = l TO 3 
970 LINE INPUT*3, QS(N, X) 
980 NEXT 

990 INPUTS3, NA(N) 
1000 FOR X=l TO NA(N) 
1010 INPUTt3, AAS(N, X) 
1020 INPUT#3, AP(N, X) 
1030 NEXT 
1040 GOTO 940 
1050 RETURN 
1060 Q=l 
1070 CLS 
1080 PRINT 
1090 FOR 1=1 TO 3 

1100 IF Q$(Q, I)<>"" PRINT QS(Q, I) 
1110 NEXT 
1120 PRINT 

1130 FOR 1=1 TO NA(Q) 
1140 PRINT I;". ";AAS(Q, I) 
1150 NEXT 
1160 INPUT AS(0) 

1170 IF NA(Q)=1 THEN V=l: GOTO 1200 
1180 V=VAL(AS(Q) ) 
1190 IF V=0 THEN V=l 
1200 NQ=AP(Q, V) 
1210 Q=NQ 

1220 IF QO0 THEN CLS: GOTO 1080 'V/Q=0 AT END OF SEQUENCE 
1230 CLS 
1240 PRINT 

1250 PRINT"THANK YOU FOR YOUR TIME." 
1260 PRINT 
1270 PRINT 
1280 PRINT 

1290 PRINT"<< HANG UP PHONE NOW >>" 
1300 AS(0)=AS(0)+RIGHT$(TIME$, 9) 
1310 FOR A=0 TO N+l 
1320 PRINT#2, A$(A) 
1330 NEXT A 
1340 PRINT 
1350 PRINT 
1360 INPUT'PRESS <ENTER> TO GO TO NEXT NUMBER"; A 



Program Listing 1 continues 
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COMPUTER AIDED INVESTMENT 

Had you ever missed opportunities to purchase stocks at their low 
points, and/or had hesitated to sell and resulted in financial losses? 

One of the secrets for success in the STOCK-MARKET is timing. 

A computed program, STOCKCHART-I", for usage on the TRS-80* 
models I & III. APPLE II*, & ATARI-800' computer systems, will time the 
stocks in your portfolio for BUY & SELL opportunities. The BUY & SELL 
signals are based on a unique price-trend analysis technique developed 
by Micro-Investment Software. It only requires the weekly high, weekly 
low, and the last trading day of the week's close stock prices. With this 
program, you no longer need to guess or listen to rumors for your invest- 
ment decisions. 

Aside from its ability to assist you on deciding when to BUY & SELL, it 
also will generate a price-chart from the High, Low, and Close stock 
prices. The user has the option to select the price-chart to be generated 
onto the video screen or to the line-printer. And many other useful 
features. . . . 



— STOCKCHART-r — 



Features: 



generate BUY/SELL signal 
1 generate price-chart from 
High, Low. & Close stock prices 
data entry in newspaper format 
(accept fractions) 

SPLIT mode for price data readjust- 
ment on stock split 
EDIT mode for data changes and/or 
corrections 

STATUS mode display BUY/SELL 
signal for all stocks on file 
Fully menu driven, user friendly 
LIST mode for price data 
print out onto video or line 
printer 



Sample Results: 

• Tandy Corp. -5/19/80 to 9/07/81 

3 BUY/SELL signals 
ROI: 163% 

• Hewlett Packard-5'25/80 to 8/30/81 

4 BUY/SELL signals 
ROI 42% 

• Adv Micro Dev. -5/12/80 to 6/22/81 

3 BUY/SELL signals 
ROI 51% 

• Natl Semi -5/25/80 to 6/22/81 

3 BUY/SELL signals 
HOI 40% 

• Storage Tech. -5/18/80 to 6/22/81 

3 BUY/SELL signals 
RO!. 111% 




An Investment Tool 
for the Serious Investors 



System Requirements: 

• cassette version - min. 16K RAM 

• disk version - min. 32K RAM, 1 disk drive 

• printer optional 

To order, see your local computer/software dealers or send check, 
money order, or C.O.D. to: 



Micro-investment Software 
9621 Bowie Way 
Stockton, CA 95209 



cassette version $79 per copy 

disk version $99 per copy 

TM - STOCKCHART-I Is a trademark of Micro-Investment Software 
•trademare of TANDY CORP., APPLE COMPUTER, & ATARI respectively 
ROI - return on investment 

Dealer Inquiries Invited 

Visa and Mastercard welcome. (209) 952-8833 




•in 



Program Listing 1 continued 

1370 LSET TCS(X)=HKIS(CVI(TCS(X))+1) 
1380 LSET CFS(X)="C" 'COMPLETED CALL 
1390 FOR A"0 TO N 
1400 A$(A)="" 
1410 NEXT 
1420 NEXT X 
1430 PUTtl, NN 
1440 NN=NN+1 
1450 GOTO 340 
1460 OUT 255, 

1470 PRINT-CALL HAS BEEN CANCELLED" 
1480 PRINT'ENTER (1) TO REDIAL" 
1490 PRINT" (2) SKIP FOR NOW" 

1500 PRINT" (3) BLOCK THIS NUMBER" 

1510 INPUT A 

1520 ON A GOTO 520, 1420, 1550 
1530 PRINT'l - 3 ONLY" 
1540 GOTO 1460 
1550 LSET CF$(X)="B" 
1560 GOTO 1420 
1570 CLS 

1580 PRINT'THIS PROGRAM AND YOUR PERSONAL COMPUTER WILL SIMPLIFY 
AND SPEED UP A SURVEY OF ANY LARGE NUMBER OF LOCATIONS. YOU MUST 
HAVE LOADED A DISK WITH 'FILES' CONTAINING TELEPHONE NUM- 
BERS AND THE QUESTIONS TO BE ASKED." 
1590 PRINT 

1600 PRINT'YOU WILL BE ASKED TO SUPPLY THE FILE NAME FOR THIS IN 
PUT 

INFORMATION. YOU WILL ALSO BE ASKED TO NAME AN OUTPUT FILE 
WHERE YOUR INFORMATION CAN BE STORED." 
1610 IF LEFT$(TIME$, 2)<>"00" THEN 1660 
1620 PRINT 
1630 PRINT" THE COMPUTER WILL BE KEEPING TRACK OF THE TIME TAKEN 

TO 
GATHER THIS INFORMATION. THE INTERNAL CLOCK MUST BE RUNNING TO 
ASSURE ACCURATE INFORMATION. SET THE TIME AND DATE NOW, AND RE- 
RUN THE PROGRAM. IF YOU DO NOT KNOW HOW TO DO THIS, SEE" 
1640 PRINT"YOUR SUPERVISOR." 
1650 END 

1660 PRINT @ 970, "PRESS <ENTER> WHEN READY TO GO ON."; 
1670 INPUT A$ 
1680 RETURN 

1690 INPUT'DO YOU WANT TO TURN ON THE CLOCK DISPLAY", -AS 
1700 IF LEFTS(A$, 1)-"Y" THEN CMD'CLOCK" 
1710 RETURN 



Program Listing 2. Question/BAS 



10 CLEAR 10000 

20 DEFINT A-Z 

30 DIM QS(30, 3), NA(30), A$(30, 7), AP(30, 7) 

40 CLS 

50 PRINT @ 340, "QUESTIONNAIRE BUILDER" 

60 FOR X=l TO 500 

70 NEXT 

80 CLS 

90 PRINT"THIS PROGRAM WILL CONSTRUCT A SEQUENTIAL FILE TO BE USE 

D 

BY 'SURVEY' PROGRAM. YOU MAY EITHER CONSTRUCT A NEW FILE 

OR MODIFY AN EXISTING FILE." 

100 PRINT 

110 INPUT" (1) CREATE NEW FILE 

(2) MODIFY EXISTING FILE 

">Q 

120 ON Q GOTO 140, 740 

130 GOTO 100 

140 INPUT"DO YOU NEED FURTHUR EXPLANATION (Y/N)";Q1$ 

150 IF LEFT$(Q1S, 1)="Y" GOSUB 1040 

160 N = N+1 

170 CLS 

180 PRINT"QUESTION/SCREEN # ";N 

190 PRINT" (ENTER MESSAGE NOW.. UP TO THREE COMPLETE INPUTS. ";CHR 

$(92) ;" CAN BE USED.) " 

200 FOR X=l TO 3 

210 LINE INPUT QS(N, X) 

220 IF X=l AND QS(M, X)="" THEN 570 

230 NEXT X 

2 40 IF F=l THEN 400 

250 PP.INT"HGW MANY POSSIBLE RESPONSES TO THIS MESSAGE"; 

260 INPUT NA(M) 

270 IF NA(N)<2 THEN NA(N)=1: AS(N, 1)="(NEXT SCREEN)": AP(N, 1)= 

N+l: PRINT'WILL ASSUME PROGRESSION TO SCREEN # ";N+1: FOR X=l TO 

500: NEXT: GOTO 400 
280 FOR X=l TO NA(N) 

290 PRINT'ENTER RESPONSE MESSAGE FOR # ";X; 
300 INPUT A$(N, X; 
310 NEXT 

320 IF F = l THEN 4KB 
330 CLS 

340 PRINT"YOU HOW MUST DIRECT EACH RESPONSE TO THE NEXT QUESTION 
/SCREEN." 

350 FOR X=l TO NA(N) 

360 PRINT"IF THE RESPONSE IS ";CHRS(34); A$(N, X); CHRSI34);", W 
HERE NEXT"; 
370 INPUT AP(N, X) 

380 IF AP(N, X)>HS THEN HS=AP(N, X) 
390 NEXT X 
4C0 CLS 

410 PRINT"REVIEW OF QUESTION/SCREEN '* ";N 
420 FOR X-l TO 3 

431) IF Q$(N, X}0"" PRINT QS(N, X! 
440 NEXT X 
450 PRINT 

460 PRINT" ANSWER", ," NEXT SCREEN" 

470 FOR X=l TO NA(N) 
480 PRINT X;".";AS(N, X),,AP(N, X) 
490 NEXT 



Program Listing 2 continues 
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;N;" QUESTION/SCREENS IN ";FS$ 



Program Listing 2 continued 

500 F=0 

510 INPUT-IS THIS CORRECT (Y/N)";Q1$ 

520 IF LEPT$(Q1?, 1)="V" THEN N=N+1:IF N1>0 THEN 990 ELSE GOTO 1 

70 

530 INPUT-WHICH IS INCORRECT... 

(1) QUESTION 

(2) ANSWER{S) 

(3) NEXT QUESTION POINTER 

";0 

j40 F=] 

550 ON Q GOTO 170, 250, 350 

560 GOTO' 53 

570 IF N=HS PRINT'THIS SCREEN IS CONTAINED IN YOUR DISPLAY LOGIC 

CHECK CAREFULLY.": INPUT Z 
- 580 N=N-1 

590 IF N<HS THEN N=N+1 : GOTO 160 

600 INPUT-FILENAME FOR QUESTIONNAIRE DATA";FS$ 

610 OPEN"0*,l, FSS 

620 FOR X=l TO N 

630 FOR K=l TO 3 

640 PRINTtl, QS(X, K) 

650 NEXT 

66? I RINT#] , NA(X) 

67 FOR K = ] TO NA(X) 

680 PRINTI1, A$(X, K) 

6 90 PRINTS] , AP(X, K) 
70 NEXT 

710 NEXT X 

7 20 CLOSE 
7 30 END 

7 40 CLS 

750 INPUT-FILE TO RETRIEVE" ;FS$ 

76 OPEN" I",] , FSS 

77 N=] 

780 IF EOF (1) THEN 890 

7 90 FOR X=l TO 3 

600 LINE INPUTS] , Q$ I N, X) 

810 NEXT X 

S20 INPiiTs:, NA(N) 

830 FOR X=l TO NA(N) 

840 INPUTI1, A$(N, X) 

850 INPUTI1, AP(N, X) 

860 NEXT 

870 N«N+1 

880 GOTO 7 80 

890 CLOSE 

90 N=N-1 

910 CLS 

920 PRINT-THERE ARE 

930 FOR X=l TO 500 

940 NEXT 

950 N1=N 

960 N=l 

970 FOR XX"1 TO Nl 

980 GOTO 400 

990 NEXT XX 

1000 N=N-1 

1010 INPUT-DO YOU WISH TO ADD ADDITIONAL SCREENS (Y/N)";Q1$ 

1020 IF LEFT$(Q1S, 1)="N" THEN 600 

1030 GOTO 160 

1040 CLS 

1050 PRINT"QUESTIONAIRRE BUILDING PROGRAM" 

1060 PRINT 

1070 PRINT-TUIC PROGRAM WILL CONSTRUCT A SET OF QUESTIONS THAT A 

RE USED 

BY THE MAIN PROGRAM 'SURVEY 1 . THE MAIN PROGRAM IS DESIGNED TO 

PROMPT AN OPERATOR THROUGH A SERIES OF QUESTIONS (SCREENS)" 

1080 PRINT-TO BE USED DURING A TELEPHONE SURVEY OR SALES CALL. 

FOR EACH QUESTION/SCREEN, UP TO SEVEN DIFFERENT 'BANDS' OR 
'TYPES' OF ANSWERS CAN BE ACCEPTED. THEN, BASED ON THE ANS- 
WER RECEIVED, THE PROGRAM WILL STEP TO THE CORRECT NEXT 
SCREEN." 
10 9 GOSUB 1320 

1100 PRINT'FOR EXAMPLE, SUPPOSE IF FOR QUESTION #2 YOU ARE ASKIN 
G, 

'HOW OLD ARE YOU? 1 , YOU MIGHT WANT TO CLASSIFY THE ANSWERS IN 
'BAUDS' SUCK AS: 

(1) 0-10 

(2) 11-20 

(3) 21 -" 
1110 PRINT 

1120 PRINT"BASED ON AN ANSWER, THE APPROPRIATE NEXT QUESTION WIL 

L BE 

DISPLAYED. . .BECAUSE YOU MIGHT NOT ASK THE SAME QUESTION TO 

EVERYBODY You SURVEY! " 

] 130 GOSUB 1320 

1140 PRINT-IT IS MOST IMPORTANT THAT YOU HAVE CAREFULLY THOUGHT 

THROUGH THE QUESTIONS YOU PLAN TO USE BEFORE YOU BUILD A FILE! 

IT IS BEST IF YOU LAY OUT THE QUESTIONS USING A 'FLOW CHART' TO 

ASSURE THAT ALL PATHS ARE COMPLETE." 

1150 PRINT 

1160 PRINT-BE ABSOLUTELY SURE THAT YOU HAVE TESTED THE ENTIRE SE 

T OF 

QUESTIONS BEFORE YOU BEGIN YOUR QUESTIONNAIRE BUILDING!! 

1170 GOSUB 1320 

1180 PRINT"THE LAYOUT OP THE SCREEN QUESTIONS CAN INCLUDE ANY CH 
ARACTERS { , ; ) . YOU CAN EVEN USE THE " ;CHR$(92) ; " TO GIVE YOU A N 
EW LINE! 

UP TO THREE 255 CHARACTER LINES ARE PERMITTED 
WITH EACH SCREEN." 

1190 PRINT-EVEN IF YOU DO NOT NEED THIS MUCH SPACE, THE 'ENTER' 
KEY 

MUST BE PRESSED THREE TIMES TO COMPLETE EACH SCREEN." 
1200 GOSUB 1320 

1210 PRINT'AS PREVIOUSLY MENTIONED, UP TO SEVEN DISTINCT ANSWER 
"07 PES' 

ARE POSSIBLE FOR EACH QUESTION/SCREEN. YOU MUST FIRST TELL THE 
PROGRAM HOW MANY TYPES TO ACCEPT, THEN YOU MOST ENTER EACH ONE." 
1220 PRINT 
1230 PRINT'AS TEE SYSTEM OPERATES, EACH OF THESE ENTRIES WILL BE 

DISPLAYED 
AS CHOICES TO THE OPERATOR." 

Program Listing 2 continues 



QUALITY 
WHOLESALE 
COMPUTER PRODUCTS 




Diskettes . . 

10 boxes of 10 



$190.00 



Individually certified 5 1 /4" double density, 
soft sectored, single sided with hub rings. 

LNW Research Computers 

Totally TRS-80 compatible, high speed pro 
cessor, 8" or 5V4" drives, double or single 
density . .dealer pricing available 

Now Available. 

125K CP/M - Team computer, compatible 
with TRS-80 Model I and CP/M 



Unit Price Unit Price 
Quantity 10 Quantity 100 



CABLES 

2 drive disc drive cable 

3 drive disc drive cable 

4 drive disc drive cable 
8" Extender (disc drive) 
6 ft printer cable 
10 ft printer cable 

Custom cables available 
Minimum orber 10 — Call for prices 



$19 29 


5 : 7 54 


S26.00 


$23 30 


S28 96 


$26 33 


S 9 98 


$ 898 


515 40 


$14 00 


$17 79 


$16 17 



DISC DRIVE CABINETS 

1 drive cabinet $51 20 
w/ power supply 

2 drive cabinet $57 82 
w/power supply 

-IBM type Horizontal Design 

-Does not require extender caoie 



$44 00 
$50 00 



DOUBLE DENSITY BARE DRIVE ...$195.00 

Minimum Quantity 10 

U.P.S. Shipping 

$5.00 per order shipping and handling 

wholesale orders only, 

minimum 10 pieces. 




601 Lipan Street 
Denver, Colorado 80204 
(303) 892-6986 



s 10 



Manufacturers and Wholesale Distributors 
of Quality Computer Products. 



vSee List ol Advertisers on page 386 
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MODEL n 
USERS 

TIRED OF WAITING 

FOR DISK FORMATS 

AND BACKUPS? 



FASTFMT formats and verifies a disk in 43 seconds. 

TRSDOS 1 FORMA!' takes 1'h minutes. 

FASTBAK copies and verifies a full disk in 59 seconds (2 drives). 

TRSDOS BACKUP takes 8 minutes. 
These utilities make everday data backups a snap and are distributed 
on an 8" TRSDOS diskette for systems with 1 or more drives. 
S99.95 plus $2.00 shipping V1SA/MC 



CP/M 2 SOFTWARE FOR THE MODEL H 

Run Model II BASIC and VlsiCalc' under CP/M. 

Use the Magic Wand 4 word processor with the Daisy II printer — 

bidirectional printing, justified proportional spacing, more 
Make fast backups of your PST and ATON system disks. 
Write or phone for details. 

TRSDOS Is a trademark of the Tandy Corp 
'CP/M Is a trademark of Digital Research 
'VlsiCalc Is a trademark of VlsiCorp 
4 Magic Wand Is a trademark of Peachtree Software 

The MicroProgrammers 

5629 University Way NE 

Seattle. WA 98 105 

(206)525-1466 




Color Coiu^ 



v 



CD 

Are you tired of searching the latest magazine for articles about 
your new Color Computer? When was the last time you saw a 
great sounding program listing only to discover that it's for the 
Model I and it's too complex to translate? Do you feel that you are 
all alone in a sea of Z-80's? On finding an ad for a Color Computer 
program did you mail your hard earned cash only to receive a 
turkey because the magazine the ad appeared in doesn't review 
Color Computer Software? If you have any of these symptoms 
you're suffering from Color Computer Blues! 

But take heart there is a cure! 
It's COLOR COMPUTER NEWS. 

The monthly magazine for Color Computer owners and only Color 
Computer owners. CCN contains the full range of essential 
elements for relief of CC Blues. Ingredients include: comments to 
the ROMS, games, program listings, product reviews, and general 
interest articles on such goodies as games, personal finances, a 
Kid's page and other subjects. 

The price for 12 monthly treatments is only $21.00 and is available 

from: 

•$ , RKMarkable Software 

P.O. Box 1192 
Muskegon. Ml 49443 -s 145 






loW 



NAME 



ADDRESS 
CITY 



State Zip 

Allow 8-10 weeks for 1st issue. hq m 



Program Listing 2 continued 

,:340 G0SUB 1320 

1250 PRINT-FINALLY, FOR EACH OF THE POSSIBLE ANSWERS, YOU MUST 

INSTRUCT THE COMPUTER WHICH QUESTION/ SCREEN # IS TO BE DISPLAYED 

NEXT. NOTE THAT WHENEVER ONLY ONE ANSWER IS POSSIBLE, YOU WILL 

AUTOMATICALLY PROGRESS TO THE NEXT 

1260 PRINT-SEQUENTIAL SCREEN. 

WHEN YOU HAVE ENTERED AN INSTRUCTION FOR EACH CHOICE, YOU WILL 

BE SHOWN THE ENTIRE SEQUENCE TO REVIEW." 

1270 PRINT 

1280 PRINT-IF NECESSARY, ANY OF THE ITEMS CAN BE CHANGED AT THIS 

POINT. 
(ANOTHER FEATURE WILL PERMIT THIS EDITING CAPABILITY TO MODIFY 
A FILE THAT IS CLOSE TO YOUR NEEDS.) " 
1290 PRINT-WHEN COMPLETED, THE QUESTION MATERIAL IS WRITTEN TO A 

FILE THAT 
YOU SPECIFY. YOU WILL USE THIS FILE NAME WHEN RUNNING 'SURVEY'. 

1300 G0SUB 1320 

1310 RETURN 

1320 PRINT @ 980, "PRESS ENTER TO CONTINUE"; 

1330 INPUT Z 

1340 CLS 

1350 RETURN 



10 ' FILE LOADER FOR SURVEY PROGRAM 

20 CLEAR 1000 

30 DIM TN$(18), TCS(18), CFS(18) 

40 CLS 

50 PRINT @ 3 35, "SURVEY FILE LOADER"; 

60 FOR X=l TO 400 

7 NEXT 

80 CLS 

90 INPUT-DO YOU WANT INSTRUCTIONS (Y/N)";A$ 

100 IF LEFTSfAS, 1)=-Y" G0SUB 630 

110 CLS 

120 INPUT-FILE NAME FOR TELEPHONE NUMBERS" ; FS$ 

130 OPEN-R",l, FS$ 

140 FOR X=0 TO 18 

150 FIELD 1,(X*13)AS DUMMYS, 10 AS TNS(X), 2 AS TC$(X), 1 AS CF $ 

( X ) 

160 NEXT 'FIELD RANDOM FILE BUFFER 

170 IF E0F(1) THEN 210 

180 N=N+1 

190 GET 1, N 

200 GOTO 17 

210 FOR ■/.-■ 70 1 8 

220 IF VAL(TN$(X) )<>0 THEN K=K+1: NEXT X 

230 PRINT-THERE ARE NOW ";(N*19)+K;" NUMBERS IN ";FSS 

240 PRINT 

250 INPUT"FROM WHAT AREA CODE WILL CALLS BE MADE", -ACS 

260 IF K=19 THEN N=N+1: K=0 

270 FOR X=K TO 18 

280 T$="" 

290 PRINT-NUMBER " ; ( N*19) -tX-tl ; 

38 INPUT T$ 

310 IF T$="" THEN 500 

320 GOSUB 550 

3 30 IF BFO0 THEN 280 

340 IF LEN(T$)=7 THEN LSET TN$(X)=T$: GOTO 370 

350 IF LEFT$(TS, 3)=AC$THEN LSET TN$ (X) =RIGHT$ (T$ , 7): GOTO 370 

363 LSET TN$(X) =T$ 

370 NEXT X 

380 PRINT 

390 PRINT 

400 PRINT" 

413 PRINT" 

420 N=N+1 

430 PUT 1, N 

440 CLS 

450 K = 

46 IF F=0 GOTO 27 

470 PRINT"FILE ";FS$;' 

4 80 CLOSE 
4 90 EN 13 

500 FOR Y=X TO 18 

510 LSET TN$(Y)="" 

520 NEXT 

33 2 F=l 

540 GOTO 380 

550 BF=0 

560 FOR KK=1 TO LEN(TS) 

570 T=ASC(MIDS(T$, KK, 1)) 

580 IF T<48 OR T>57 THEN PRINT T$;" - BAD INPUT CHARACTER. DO NO 

T USE ";CHR$(T): BF=1: GOTO 620 

590 NEXT KK 

600 IF LEN(TS)=10 THEN Z1=VAL (MIDS (T$ , 2, 1)):IF Z1>1 PRINT"BAD 

AREA CODE": BF=1 : GOTO 620 

610 IF LEN{T$)<>10 AND LEN(T$)<>7 PRINT"ERROR ** WRONG NUMBER OF 

DIGITS ***": BF=1 
620 RETURN 
630 PRINT 

640 PRINT-THIS PROGRAM WILL ALLOW MANUAL ENTRY OF TELEPHONE NUMB 
ERS 

INTO A RANDOM DATA FILE TO BE ACCESSED BY RODGER WELLS' SURVEY 
PROGRAM. YOU MAY EITHER CREATE A NEW FILE OR ADD TO AN EXISTING" 
650 PRINT"0NE. DURING THE ACTUAL SURVEY, YOU MAY BLOCK OUT ANY N 
UMBER (S) 

THAT ARE INVALID. ALL NUMBERS ARE ENTERED AS SEVEN OR TEN DIGIT 
NUMBERS WITHOUT HYPHENS OR OTHER SEPARATORS." 

660 PRINT-EXAMPLES OF VALID ENTRIES ARE '3773954' AND '201555121 
2 

FOR 7 & 10D RESPECTIVELY. IF LOCAL NUMBERS ARE ENTERED WITH 
AREA CODES, THE PROGRAM WILL STRIP THEM OFF." 
670 PRINT 

680 INPUT"PRESS << ENTER >> TO CONTINUE. ";A 
6 90 RETURN 



Program Listing 3. Loadfile/BAS 



WRITING BLOCK TO FILE 
«.*.. WAIT PLEASE ***** 



NOW HOLDS " ; (N*19) +X; " NUMBERS.' 
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M982 Alger Software, Distributed exclusively by Soft Sector Marketing, Inc. 

For the serious businessman who has as little as 1 00 name mailing list or200,000 names, 
THERE IS ONLY ONE SYSTEM FOR YOU! 

FEATURES OF THE NEW POSTMAN MASS MAILING SYSTEM 

The Postman system (version 2) is an almost COMPLETE rewrite, rethink, redesign of the original POSTMAN. The many features of the 
new POSTMAN system are quickly outlined below. 



MULTI-DRIVE - True mult'-drive operation is possible POSTMAN will search all drives for 
address files and connect them together into one large file for the duration of that session 
Once POSTMAN has found the data files on the disks, the operator sees' iust ONE 
CONTIGUOUS sorted list of addresses The operator does not need to telr POSTMAN when to 
switch' drives or manually swap" sections of the data file in and out of the computer's 
memory Tnis is the foremost among the list of features because of its relative uniqueness 
among mail list handlers written for the TRS-80 

LAROE LIST SUPPORT- The multi-drive operation allows the user to access data files on ALL 
configured drives CONCURRENTLY (at the SAME time) for truly large mailing lists Files need 
not be sectioned into smaller "byte size' chunks to fit into memory 

HARD DISK SUPPORT - (HARD DISK POSTMAN only) The FULL utilization of the space and 
speed of the new hara disk drives is possible with POSTMAN. For example, a 7.5 megabyte 
drive can be configured to hold almost 60.000 labels Multiple hard drives can be accessed 
CONCURRENTLY allowing 200.000+* entry mailing lists 

FORM LETTER CAPABILITY- With the purchase of the separate POSTOTE program the user is 
provided with an easy to use form letter generator which will merge a generalized letter 
proauced from a word processing systemij.e LAZY WRITER, etc), with the nameand address 

information from the POSTMAN MASS MAILER aata base POSTWRITER allows the user to 

insert any field from o POSTMAN label entry anywhere in the letter 

MENU OPERATION - As you would in o restaurant. Choose your dinner from a list (or MENU) 
POSTMAN will allow you to direct its actions by selecting from various menus that n will 
display A complete discussion of each menu is presented in the manual 

INSERT -New names can be quickly added to your list at anytime The new addresses are 
placed into the file in their proper sorted order eliminating the need for o separate sort 
operation after entering c stock of new names POSTMAN will allow the operator to enter a 
"batch' of labels without returning to the control menu between eqch label insertion, thus 
speeding entry ana reducing the aggravation of extra menu control keystrokes 
DELETE - Names can be removea at any time when they are no longer needed 
EDIT- Information in any name entry can be quickly changed at will with "word processor' 
ease A "transparent cursor simpiy is moved to the labei displayed on the computer screen 
and corrections are iust typed over the existing label If you happen to change a fieid which 
is also used as a sort key. POSTMAN will automatically move the changed label to its correct 
position in the list to maintain the sorted arrangement of the labels 
OVERLAY- When identical changes are needed on many addresses, the OVERLAY feature 
can make then with one keystroke The needed changes which are common to many 
labeisare entered into the "overlay mas*" When you wish toapply these common changes 
to any label one command will do it 

SORT - Arrange your list in any alphabetic or numeric order The ordering may use one or 
more fields to control the sort A machine language heap sort assures fast execution The son 
need only oe performed once, the sortec list win stay sorted through an subsequent 
insertions, deletions, and changes to existing labeis NO NEED to leave the POSTMAN 
program to use a separate program to sort your data Your data is sorted quickly and after 
sort completion POSTMAN is ready for your next command 



SPECIAL STREET ADDRESS SORT - For the user with many addresses on the same street. 
POSTMAN will sort your entries bv the house NUMBER after grouping those on the same street 
together Local city lists can be quickly sorted to aid post office dispatching 

PUROE - Unwanted duplicate dddresses can be removed from your list automatically or 
unaer operator control 

SEARCH - Any address in your list can be quickly found with tost search and positioning 
commands Three different types of searches ore provided A "fasr search which uses a 
hashing technique, a "selective sequential" search for labels with common fields, and 
"quick" positioning using the first or major sort field to get you into the general "ball pork" of 
a labe 1 or sequence of labels 

LABEL PRINTING - One. a few or all addresses in your list con be printed on stdndard or non- 
standard label stock Up to 6 labels across can be printed with a format YOU can easily 
control TWO user definable ATTN' lines are provided for ony use. Ldbels can be printed from 
many of POSTMAN s menus, search, edit, or during Idbel insertion 

EFFICIENCY - POSTMAN is written in the machines native language to gain the full 
aavantage of the microcomputers speed Extensive use of program segmentation 
reduces the amount of use RAM needed to hold the program allowing o greater number 
labels to be kept in core, resulting in faster operation Little used routines need only be 
brought into memory when they are needed and once through with their task, release their 
space back to POSTMAN 

REPORT LISTINGS - A special program to produce columnar listings of address data from 
your label data base is proviaed You can easily specify the information to be printed 
DATA DISK MEROMO - Labels can be quickly transferred from one disk to another with the 
PSTMERGE program callable from the mam POSTMAN SYSTEM menu Source and destination 
drives needed not be separate drives, prompts to exchange diskettes if the same drive is 
used, are provided 

DATA DISK PREPARATION UTILITY - Provided with POSTMAN is the DPREP program which 
allows the userto prepare a floppy/hard disk tor use with POSTMAN Thiseasytouse utility can 
oe told to prepare any portion of the available space on a disk 

DATA INTEGRITY- All aata transfers to the disk filesare mode using special write commands 
which instructs the operating system to check the validity of EACH write to the disk 

DATA GUARD' - Is o special programming technique only offered by Soft Sector 
Marketing, inc. If by chance your mochine resets while writing information to the disk, you 
only lose the informotion that you were writing Your files are afways protected from the 
danger Of losing all the work that you have put in that aay NO OTHER PROGRAM ON THE 
MARKET OFFERS THIS PROTECTION If vou reset with ANYBODY'S MAILING PACKAGE DURING 
WRiTING you would destroy your ENTIRE data disk We can't stop your machine from failing 
but tin can protect your date 



IDEAL SYSTEM 



Mod III 48K 1-40 Track Drive • 2-80 Track Dual Headed Drives • Dosplus or Newdos-80 Operating Systems 

Gives space for over 1 1,000 names - 5 second average name insertion - time sorts all 1 1.000 names in less than 4 minutes 

"Special version to work on Dosplus 4.0 Hard Disk operating system. 

- Overview Available - 

The POSTMAN system requires Mod I or Mod III. 48K. 2 disk drives minimum 

Standard Version with For DOSPLUS Hard Disk 

POSTWRITER form letter writer 4.0 Operating System 

$175.00 $225.00 



Standard Version 
Only $125.00 






INQUIRIES WELCOME - 



SOFT SECTOR MARKETING 

INCORPORATEC 

6250 Middlebelt • Garden City, Michigan 481 35 
Order Line 800-521-6504 

l Michigan Orders & Questions 313-425-4020 



PAYMENT-paymentaccept<?d bvchargo personal checi. 

I or C O only under the following conditions Charges 
processed when shipped, usually within 48 nours Personal 
Checks delay shipping pending 3 weeks to clear C.O.D. 
orders are certified check ot cosh only add S 1 50 Mi residents must aad 4% sales tax 
SHIPPING ft HANDLING - Shipping Charges: Send the larger amount 2% or S? 50 unless 
stipulated otherwise Any order received without shipping and handling will Pe shipped freight 
I Air Mail Shipping outside of North America, please send the larger amount 10% or 
Overpayment will be refunded 



The Quality Continues 



EDUCATION 



One school district's story. 




Education 



Stephen Radin 

751 Bard Ave. 

Staten Island, NY 10310 



Community School District 
22 in New York City has 26 
schools: five middle and 21 ele- 
mentary, and more than 23,000 
students. It enjoys successes 
and suffers problems like other 
school districts of this size. Its 
needs and problems are typical 
of those in schools everywhere. 

The district supervisors have 
concluded that computer illit- 
erates would be ill prepared for 
their futures. School officials 
everywhere are reaching the 
same conclusion. 

Because the microcomputing 
field is so new, a district's entry 
into it can be frustrating and be- 
wildering. The many experts tell 
us different things. The hard- 
ware and software manufactur- 
ers freely criticize their competi- 
tors' work and really good user 
groups for computer educators 
do not exist yet. 

Computers are entering 
schools by the thousands in an 
uncoordinated and disjointed 



fashion all over America. They 
have found their way into ele- 
mentary and high school classes 
and in some school districts 
machines figure prominently 
in kindergarten and nursery 
schools. 

No major scientific institution 
has studied classroom com- 
puting's benefits or dangers to 
our children even though the 
machines are an unusually pow- 
erful force. This is due to the 
newness of the field and to the 
people's lack of awareness of 
just how powerful they are as 
educational tools. 

Teachers are beginning to 
experiment with this new force. 
They are using the machines as: 
computer aided instruction 
(CAI) devices, with pre- 
programmed materials to drill or 
practice; instruments to 
heighten computer awareness, 
(children are learning they can 
control computers and that 
computers will work for them); 
teacher's servants to reduce the 
mundane clerical chores and 
free them to teach; devices to 
experiment with "Teaching By 
Computer." Systems like LOGO 
appear to allow students to 
learn and not merely practice. 
These are largely unexplored 
and have made little impact in 
classrooms to this date. 

One problem with the lack of 
coordination is that all over the 
country teachers are re-inventing 
the wheel. Many are developing 
software to create a C.A.I, envi- 
ronment, purchasing and test- 
ing commercial hardware and 



software (some good and some 
mediocre), and rethinking logi- 
cal patterns that others have al- 
ready concluded. Little thought 
and almost no structural organi- 
zation—groups, periodicals, or 
research and training centers — 
provide the sharing of ideas nec- 
essary to make strides. 

Hardware manufacturers and 
book publishers are showing in- 
terest in this area but if their 
track record is any sign of the 
future they will hawk their wares 
and cut throats in the traditional 
money-first way until one or two 
giants control what we can buy. 

Recognizing the potential for 
instructional improvement in- 
herent in this new medium, New 
York City's Community School 
District 22 initially developed a 
four-pronged approach designed 
to tap this resource. I suspect 
many districts will move in simi- 
lar directions during the next 10 
years. 

District 22's Initial Goals 

Computer awareness was the 
primary component in this dis- 
trict effort. We wanted to ex- 
pose youngsters in all schools 
and with varying academic abili- 
ties to computers. The overrid- 
ing philosophy was that compu- 
ters are controllable much like 
bikes and television sets. Chil- 
dren would be programming 
computers to do their bidding 
and we would train teachers so 
that they could transmit this 
philosophy to their students. 
They would learn about the his- 
torical sequence which spawned 



computers, the physical charac- 
teristics of the most common 
machines and some of the most 
important consequences of com- 
puting in our society as well as 
how to program their machines. 
Breaking down fear became a 
paramount thrust. 

The district would develop 
C.A.I, software in the areas of 
mathematics and reading and 
eventually in the other academic 
areas. Our TRS-80 Model III 
microcomputer equipment is 
suited to subjects as diversified 
as physical coordination and 
music composition. 

The district would develop 
software packages to help 
school administrators refine at- 
tendance follow-up procedures 
and maintain parent lists. We 
would add report cards and 
other clerical mass data storage 
functions at a later stage. 

The District would regularly 
examine and test the ideas and 
products proliferating in the 
marketplace. We would try 
LOGO and Pascal with our stu- 
dents and we would experi- 
ment with different texts. We 
decided to attend conferences 
and coordinate a district-wide 
sharing of ideas. 

We Begin 

Community School District 22 
began with the hiring of a full 

time teacher who had 20 years 
of teaching and supervisory ex- 
perience including 11 years in 
the computer education field to 
coordinate its computer educa- 
tion efforts. Any district, to suc- 
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This Month Only 



TAPE COPY 2 

c 198" Soft Sector Marketing, inc 
This program will load most any TRS-80 500 
Baua system tape(standara Mod i speed) and 
load it into memory and save it at either 500 or 
1 50C Baud on the Mod III. NO KNOWLEDGE O c 
MACHINE LANGUAGE NEEDED Now it gives you 
a way to Pack up a machine language program 
that loads at the lower speed and makes 
cassette loaamg into your new Mod III a much 
faster, more reiiaole process. Works with Mod I* 
& Mod III 
Only $14.95 

"ViOd I loads and saves at 500 Baud only 



Was $125.00- Now $50.00 
Mod I & III Version 

Reduced for Quick Sale! 



s 1981 by James Limkemann 

A S«tf-r«toeattng Machine Uanguag* Monitor 

for MOO I & III 

C 1981 by J Limkemann Bug-Ms a powerful machine 
language monitor The one point most improved over 
other monitors, is the tape write Bug-t- has the ability to 
write a "clean" tape (at 500 baud), this tape will read 
into the TRS-80 under the system commana. without 
the problems previously associated with the vaume 
setting. Regardless what version basic you have or 
whether or not you have a Radio Shack cassette fix. this 
monitor will improve the reliability of vour cassette by 
100% ^here is also a verify command that works the 
same as a 'CiOAD' 7 ". except when an error is found. 
the memory address ana what is found on the tape is 
displayed. 

Finally a break pointthat works' When a break point is 
reached, there is a blinking astnsk in the bottom right 
hana corner, vou are aDIe to see wnat is on the screen 
before the momtortakes control Press theenterkevthe 
screen clears and the monitor comes to life When you 
continue from a break point the monitor will restore the 
screen first then load the CPU registers ana return to 
vour program You do not lose your program on display, 
ana it does work'. 

Bug+ aiso has av fne commanas of T-Bug. fhev just 
work better Bug+ icaas into low memory, then reic- 
cates itself 

Mod ill has all "he commanas of 'he Mod version 
Dius ' gives vou the ability of reading or writing 1500 
baud ::*5!X; baua tapes rou can read a! onerateana 
write at another Mod i or III 4K both on same tape 

Cassette $14.95 



S 1981 Soft Sector Marketing. 
For Moa III 



BASIC 
OPERATED 
SINGLE 
STEPPER 

T his Machine Language utility is designed to 
aid you in creating ana debugging programs 
written in BASIC. The utility allows you to trace 
the program flow, to single steo the BASIC 
program, to oPserve the conditions of vanaPles 
during program execution, and to push your 
basic program on the stack during program 
development. The utility is known to operate 
with Mod III, TPS-DOS or Moa III Rom BASIC. 
Cassette (goes to disk) . — . . . $18.95 



*1982 Soft Sector Marketing, inc. 
Mod III Radio Shack operating system Com- 
ments on every system files, with a chapter on 
how to use some ot the DOS calls. 
Fixes for your TPS-DOS users. Helpful reference 
guide for experienced machine language 
programmers. 

A MUST FOR EVERY MOD III OWNER! 

List S29.95 

Introductory Special 

$19.95 




Do you reap only mystorios from your 

TRS-80 ROMs? 

Your book has arrived! 

MOD II ROM COMMENTED 

Copyright '1981 Soft Sector Marketing, Inc 
Not iust a rehash of old information, but detailed 
comments on the ROMs in the latest machine from 
Tandy 



List $22.50 




"1981 by Soft Sector Marketing, inc 

Written for TRS-DOS & DOSPLUS by Larry Ashmun 
Requires 32K Disk - Mod III 

Zapsit is a stana alone machine language program that lets vou examine, modify, copy disk sectors ana much 
more it does not use any of the resident DOS routines so that you are not limited to the restrictions of the particular 
DOS that you normally use Vou do not have to have a system disk in DRIVE once Zapsit is running 

Currently there are two versions of Zapsit - one for use with TRSDOS' ana one for use with DOSPLUS" ' They are the 
same except in the way that they format a disk and the way that they write DATTA ADDRESS MARkS. Because of the 
difteneces. they are not mterchangable Writing to a TRSDOS diskette with the DOSPLUS version (or vice-versa) 
couia make the diskette written too unuseapie 

For all disk operations you will be asked a series of auestions. Each question can be answered by pressing the 
ENTER key or by entering a specific value Pressing the ENTER Key will cause the DEFAULT value to be usea Aliaefault 
values are indicated on the screen at the time the question is asked 

When entering a specific numbenc value it is assumed to be DECIMAL unless ana H is appended to the number 
When and H is appended, the number is assumed to be hexadecimal (base 16) 

CAPASIUTIS 
Dteploy/ Modify Dtofc Se ct or * / Memory. Pnnt to screen. Dnnt win De asked it you want the unreadable sectors reeded tc 
sector to printer Modify m Hex. Modify m ASCII the printer Nowyou can venfythatthe format o'youraisKette 

s in good snaoe before vou coov your important tiles to c 
diskette This orevents loosing your aata that vou are trying to 
oack uD 

Copy Dtefc Sectors. Coov oisk sectors Glows you to Cody 
sectors (Smgie or OouDie jensitv. from c dis« to different 
sectors on the same cisk Coov sectors from a Douole Density 
disk to o different Double Density aisk Copy sectors from a 
Single Density disk to a different Single Density disk. Copy 
sectors from a Single Density disk to a Double Density aisk 
Copy sectors from a Double Density disk to a Single Density 
disk ah copying to o Different ask must be done on o Two 
Dnve System 

Zero Dtek Sector*. Zero Oisk sec'ors allow you to write a vaiue 
of yourcnoice to the sectors specified 
Read a Troctc. Reading a track allows vou to read an entire 
track r-tomemon, with an ot 'he aaaress marks ana informa- 
tion that you aon't normally see with a sector read The 
output can oe to either the screen or printer 



Chang* Track * Sector limits. Smgie aensitv read ana 
write uouDle aensitv read dnd write for 1-80 track, from 0- 1 8 
sectors Smgie and dual sided drives 

Format a Disk. S«Stanoara Format W— Format without Erase 
it you Dress ENTER or S you will be asxec which anve what 
aensitv After answering these auestions Zapsit will format *he 
aisk using the parameters specified As each tract is format- 
ted ail of the sectors are checked for reaaaomty before the 
next track if formatted Any unreadable sectors are reported 
but the operation will not be aDortec 

if you type W vou win be asked which drive, what density tc 
use and if you want any baa sectors reported to the printer 
Before each track is formatted each readdble sector on me 
track is reod into o holding area Unreaacbie sectors ore 
reported anc tneir holding drea >s zeroed After all of the 
sectors for a track are stored fne track is reformatted and tne 
aata ir the holding areas written to 'he appropriate sec'ors 
Verity a Disk, verity a aisk does iust mat it verities that every 
sector is reaoaDie Any unreadable sectors are reported «ou 



List $24.95 - Introductory Special $19.95 



- DEALER INQUIRIES WELCOME - 



(OFT SECTOR MARKETS 

INCORPORATE 




D 



6250 Middlebelt • Garden City. Michigan 481 35 
Order Line 800-521-6504 

w Michigan Orders & Questions 313-425-4020 



PAYMENT- poympnt accepted Ov cnarqe. personal check ' 
i or COD only, unaer the following conditions Charges 
"I processed wnen shipped, usually within 48 nours Personal 
Checks deldv shipping, pending 3 weeks to cleat C.O.D 
otders are certified check or cash only, add 51 50 Ml residents must add 4% sales tax 
SHIPPING* HANDLING - Shipping Charges: Send the larger amount. 2% or 52 50 unless 
stipulated otherwise Any order received without shippmgand nandhng will be snipped freight 
collect Air Mail Shipping outside of North America piease send the larger amount 10% cr 
S1000 Overpayment will de refunded 



The Quality Continues 



ceed, will have to make a similar 
personnel commitment. This co- 
ordinator should assume re- 
sponsibility for the development 
and maintenance of the entire 
program, including on-site 
teacher training, curriculum 
development, hardware aquisi- 
tion and coordination as well as 
software development and other 
related educational functions. 

Within two months nine of the 
26 schools in the district had 
teachers in a training phase in- 
tended to prepare them to de- 
velop computer awareness in 
their students. This included all 
five of its middle schools and 
four of its elementary schools. In 
six of those schools, student in- 
struction began after six weeks. 
By the end of four months the 
other three schools were teach- 
ing programming. Fourteen 
more elementary schools then 
came on line with their own 
equipment and teacher training 
began in those schools. The av- 
erage period of initial training 
(before a school can expect to 



begin teaching children) is ap- 
proximately six weeks. The dis- 
trict offers continuing instruc- 
tion on-site to help teachers de- 
velop their own curriculum. The 
last three schools have no plans 
to participate at this time. 



mitment. This, coupled with a 
centrally located teacher trainer 
and a little relief time for the 

staff during their approximately 
fifteen hours of training, serves 
well. In our experience, middle 
schools require more equipment 



The overriding philosophy 
was that computers 
are controllable ..." 



The initiation process is a 
quick one providing sufficient 
commitment is made and sup- 
port is given. 

Minimum Requirements 

In the area of computer litera- 
cy one microcomputer for every 
two elementary school class- 
rooms seems a reasonable mini- 
mum. Considerable pupil expo- 
sure is possible with this com- 



and generally cover more 
ground. They require more 
hands-on time for each stu- 
dent; a well-functioning lab can 
be outfitted with five comput- 
ers which will serve the needs 
of most medium-sized (1200 
student) middle schools. 

District 22 has developed a 
library of hundreds of C.A.I, pro- 
grams covering areas as diversi- 
fied as music and math. This is 



by no means a minimum require- 
ment as many schools find that 
one or two well-written pro- 
grams can help solve some of 
their most severe remediation 
problems. The same machine re- 
quirements apply to this func- 
tion as well. These programs 
generally serve a remedial func- 
tion primarily for the slowest 
students— youngsters who fail 
to meet minimum competency 
standards. Many C.A.I, pro- 
grams allow students to review 
modern languages as well as 
some of the more advanced 
science concepts and it appears 
that C.A.I, can enable students 
of varying ability to use the 
equipment for remediation dur- 
ing hours when it is not needed 
to develop a meaningful district- 
wide C.A.I, program. 

To be effective C.A.I, requires 
a library. This central function 
requires coordination and a 
friendly, sharing, non-threaten- 
ing atmosphere. I suspect that 
many districts will need to hire a 
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EE EPSON MX-80 PRI 



llli 



Wltht 
urchase 

RS 80, Model I 



For a limited time, Data Services, Inc., wi 
give you a FREE Epson MX-80 Printer ($645 
value), when you buy a TR5 80 Model III, 48k, 
with 2 PERCOM 40 track drives, at our new low 
prices of $2,395.00. 

(Includes RS-232, Printer Cable, TRSDOS.)" 

The perfect system, the perfect price! 

TRS 80 Model III, 48k - two PERCOM 40 

track drives - EPSON MX-80 Printer. 

Data Services offers more — APPARAT 5 
NEWDOS 80, version VER 2.0, regularly $149.95 
— now only $1 29.95 (Model III units only.) 

Up to 20% savings on TR5 computers — ac- 
cessories — programs. Plus: EPSON / PERCOM / 
APPARAT / HAYES SMARTMODEM / VERBATIM 
DISKETTES / MEMOREX DISKS. 

*TR5-80 is a trademark of Tandy Corporation. 
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■ FREE SHIPPING in 48 contiguous states. 

■ N o Sales Tax on out-of-state orders. 

■ Visa/Maste r Card welcome. 

■ Personal checks, allow 3 weeks to clear. 

■ (International orders, freight F.O.B. Wichita, 

Kansas) 

CALL TOLL FREE: 1-800-835-1129 

or order by mail from: 

DATA SBMCES, JMC. 



COMPUTER SERVICES SINCE 1970 

P.O. Box 1 1 57 Wichita, Kansas 67201-1 1 57 

(In Kansas, call 1-316-838-9021) 



118 



Copyright c 1 981 Soft Sector Marketing Inc. 
_ Written by A. Schwartz 

Requires 16-32K 

1 . 50 preprogrammed command keys. Standard 
and Extended command. 

2. Direct control of motor, trace, and audio from 
keyboard. 

3. Automatic line numbering. 

4. Programmable Custom Key. 

5. Direct Run Button. 

6. Keyboard overlay for easy program use. 

7. Easy entry of entire commands into computer. 

Load Master Control into your machine then 
either type in a BASIC program or load one in 
from tape to edit. Cuts programming time by 
50% or more. 



For The Radio Shack 
Color Computer 



m ^>V 





Written dv E.R. 



50 PROGRAMS 
In One Package 

■The Coior Computer is a product ot Raaio Snack, 
division ot the Tonov Corporation 



$24-95 




SOFT SECTOR MARKETING, 

NCORPORATED 

6250 Middlebelt • Garden City, Michigan48135 
Order Line 800-521-6504 

w Michigan Orders & Questions 313-425-4020 



PAYMENT- payment accepted by charge, personal chec k 



| processed when shipped usually within 48 nours Personal 
, Cheeks delay shipping pending 3 weeks to dear C.O.O. 
orders are certified check or cash only, add S1 50 Ml residents must cdd 4% sates tax 
SHIPPING * HANDLING - Shipping Charges: Send the larger cmount 2% or S2 50 unless 
stipulated otherwise Any order received without shipping and handling will De shipped freight 
collect Air Mail Shipping outside ot North America please send the lorger amount 10% or 



The Quality Continues 



central coordinator for this and 
related functions. Those who 
cannot afford one will be unable 
to develop a meaningful C.A.I, 
program. 

A full set of programs exists 
in the District 22 library to allow 
for administrative functions 
such as word processing, label 
printing and form filing at our 
schools. We have downplayed 
this function because if the 
equipment serves this purpose 
our classroom-based activities 
will suffer. When equipment use 
becomes more regularized the 
machines will perform tasks 
such as maintenance of P.T.A. 
lists, sending absence cards, 
grades maintenance, and class 
reorganization. A library must 
be maintained and someone 
must be on hand to train person- 
nel and develop new resources. 

Minimum Configuration 

The minimum single class- 
room machine allows typewriter 
keyboard access to a CPU and a 
Basic language interpreter. It 



has 16K of memory and has an 
associated storage device like a 
tape cassette machine. It dis- 
plays output on a CRT. screen, 
has RS-232 capability and in- 
cludes a 300 baud interface as a 
standard expansion possibility. 



duty since school office person- 
nel would probably not use the 
machine for more than about 
one hour per day. 

A dot matrix printer is also 
needed in each school's office. 

Color, hi-resolution graphics 



"These programs serve 
a remedial function 
for the slowest students . . 



It would be more important for it 
to be inexpensive ($1,000 in 1981 
dollars) than have provision for 
color or refined graphics. Sup- 
port is essential. Schools 
should look for companies with 
extensive software libraries and 
numerous repair outlets. 

The minimum office machine 
includes one disk drive (5 1 /i-inch 
size) and 32K RAM. The same 
machine could do classroom 



and sound are not essential but 
are a pretty addition in a school 
environment, and some schools 
will pay more for them (but not a 
lot more). 

Software is needed at all sites 
and vendors who can supply a 
complete range of remedial and 
drill software will have a great 
edge in the school marketplace 
of the future. Ignorance has 
caused much wasteful buying, 



(vis. recent lawsuits by dissatis- 
fied computer purchasers), but 
future buyers will be more wise- 
ly advised. 

Untapped Resources 

Community School District 22 
has not made any effort to tap 
the vast data bases like Compu- 
Serve or the nationally available 
networks like PLATO. While 
some districts no doubt will, I 
feel that they will be in the 
minority for many years. Ten 
years from now those data 
bases will include enough to 
make it worth the expense and I 
believe that library books will be 
replaced with terminals in many 
districts by 1990 when these re- 
sources will probably be a great 
deal less expensive and con- 
siderably more comprehensive. 

In many districts C.A.I, is the 
only function computers serve. 
This is because some consider- 
able staff training is required 
before a staff member can teach 
programming, and in most dis- 
tricts that have no trained staff 



Z8 BASIC 
COMPUTER/CONTROLLER 




As featured in 
Byte Magazine, July and August 1981 

•On board tiny BASIC Interpreter. 

• 2 on board parallel ports. 
•Serial I/O port 

• 6 interrupts. 

• Just attach a CRT terminal and 
immediately write control programs 
in BASIC. 

• BAUD RATES 110-9600 BPS. 

• Data and address buses available for 
124K memory and I/O expansion. 

•4K RAM, 2716 or 2732 EPROM 
operation. 

• Consumes only 1 1 /2 WATTS 

Z8 Basic Microcomputer/Controller 

Assembled & Tested $195.00 

Complete Kit $165.00 

Universal Power Supply 

( + 5, +12, & -12v) $ 35.00 

Z8 is a trademark of Zilog Inc. 



SWEET-TALKER, 

IT GIVES YOUR COMPUTER 

AN UNLIMITED VOCABULARY. 




As Featured In 
Byte Magazine, September 1981 

• Utilizes VOTRAX SC-01A speech 

synthesizer chip. 
•Unlimited vocabulary. 
•Contains 64 different phonemes 

which are accessed by an 8-bit code. 
•Text is automatically translated into 

electrically synthesized speech. 
•Parallel port driven or 

Plug-in compatible with APPLE II. 
•On board audio amplifier. 
•Sample Program for APPLE II on 

cassette 
SWEET-TALKER 
Assembled and Tested 

Parallel Port Circuit Card $139 

APPLE II Plug-in Card $149 

VOTRAX is a trademark of Federal Screw Works 



To Order: Call Toll Free - 1-800-645-3479 
(in N.Y. State Call: 1-516-374-6793) 
For Information Call: 1-516-374-6793 



DISK-80 

EXPANSION INTERFACE 

FOR THE 

TRS-80 MODEL I 




As Featured In 
Byte Magazine, March 1981 

• Disk controller (4 drives) 

• Hardware data separator 
•Buffered TRS-bus connector 
•Real-time clock 

• Printer port (optional) 

DISK 80-ASSEMBLED & TESTED 

with 32K RAM $329.95 

Centronics Printer 

Port add $ 50.00 

DISK-80 pc board $ 48.00 

Printer/Power Supply 

pc board $ 16.00 

Complete Kit with 32K 

RAM and Printer Port $275.00 

TRS-80 is trademark of Tandy Corp. 



MICROMINTINC. 
917 Midway 
Woodmere, N.Y. 11598 
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C.A.I, can be managed with a 
minimum of training — less than 
15 minutes in most cases. This 
is changing as many more col- 
leges and universities are in- 
cluding computer training in 
their elementary and secondary 
teacher training programs. 
Within ten years, many districts 
will have enough trained teach- 
ers to offer programming to 
their students. In those districts 
C.A.I, will be important but it will 
fall into second place. Comput- 
er aided teaching {via a LOGO- 
like medium) will be more preva- 
lent and this will tend to reduce 
the C.A.I, further. 

New Ideas 

We have begun to experiment 
with LOGO and Pascal and are 
considering both for future ex- 
pansion with younger students 
and those whose needs our cur- 
rent activities are not meeting. 
We are studying new hardware 
including the TRS-80 Color Com- 
puter, the Atari, Texas Instru- 
ments machines and I.B.M. per- 



sonal computers and we are en- 
larging our district library of soft- 
ware and texts. We have devel- 
oped a computer newsletter to 
keep our district users abreast of 
the changing software and hard- 
ware climate and as a medium 
for sharing ideas and software. 

Community School District 22 
will decide in the near future 
about implementing new lan- 
guages as well as new hardware. 

Similar plans would be appro- 
priate for most moderate or 
large size school districts. Pro- 
gram implementation for smal- 
ler communities would probably 
have to include a liaison with 
one or more businesses or 
higher education institutions. 
This has already occurred in a 
number of states and there is 
every indication that the pro- 
cess will continue. ■ 

Stephen Radin is a school dis- 
trict computer education coordi- 
nator and author of two books in 
the field. He teaches computer 
education on the college level. 




Just between you and us. . . 
We think we've got 

THE BEST 
TRS-80* MODEL III 
Disk System around! 
WHY? Here's three good reasons. 

1. VERSATILITY 

Our own proven, dependable drive controller board will give 
you the hardware to run almost any drive configuration you can 

imagine: 

• 5%" and 8" drives in any combination. 

• Internal/external combinations (up to all 4 drives external). 

• Single- and dual-headed drive combinations. 

2. QUALITY 

• We chose MPI drives— the long-time leaders in the field. 

• We construct our own disk drive installation kits of heavy 
gauge steel— no shielding problems! 

• We designed independently regulated linear power supplies- 
Cast and reliable. 

3. PRICE (including installation & 90-day warranty) 

• Drive controller board and first drive $679 

« Second (internal) drive $279 

• Third drive (with cable) $359 

■ fourth drive $324 

If these sound like really good deals but you don't have the Model III 
yet, we've got the answer. 

A TRS-80 Model III, 48K.TRSDOS, 2 MPI drives $1899 

— Fully tested with 90-day warranty — 
Dollar-for-dollar, we think this is the BEST TRS-80 system you can buy!! 
We also stock for immediate shipment: 

MODEL III, 32K $899 

EPSON Printers, accessories & interfaces at Low, Low Prices 

We Now Accept Visa & Mastercard 
"TRS-80 is a Trademark of Tandy Corp. 

NEW LOCATION f* 288 

PROCESS CONTROL TECHNOLOGY 

8030 Lorraine Ave., Suite 328 • Stockton, California 95210 • (209)952-6576 



GEAF DDT WRITER 

Another GEAP expansion module for Epson Graftrax Owners 

FEATURES: GEAP CHARACTER FONTS • Create High Res Drawings without TRS-80 modifica- 
tions or programming knowledge • Create or modify fonts • Print time options such as 

magnify, dot, spacing control, reverse and more • Library function allows saving to disk printing 
or re-editing. 
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ACTUAL CHARACTER FONTS / SIZE 
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SAMPLES - High Res 
and Modified Characters 
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GEAP is modular in lorm. We have a package for just about every system. 

If you don't see components for your system, call us; we probably didn't have 

room to list it. 

16 - 48K SYSTEMS - CASSETTE DISK - OR STRINGY 
GEAP 1.3 $25.99 • The famous GEAP editor; draw, rotate, magnify, 
"paintbrush'' merge, write basic program - just a few of the options. 
Here is what the reviewers have said about GEAP 1.3: 

"/ have seen other programs that claim to do what GEAP does, but 
no other has lived up to my expectations" — Richard McGarvey, 80 Micro- 
computing, March 1982, p 57. 

"01 all the TRS-80 programs that have passed my way, none has ex- 
ceeded my expectations as this one has, GRAPHICS EDITOR AND PRO- 
GRAMMER by Bill Mason" — Margaret M. Grothman (Sottside Magazine, 
Jan. 1982) 



M0D1/III 



J F CONSULTING / 74355 BUTT0NW00D / 



EXPANSION MODULES 1-5 $16.99. More magnify, rotation and other commands. 

"INS1ANT BLOCK'' letters to speed up your drawing. Magnification allows 
manipulation of the Instant Letters, giving you many variations. 

48K SYSTEMS 
GEAP 2.1 $45.95. A special enlarged GEAP 1.3 Editor plus over 10 GEAP 
Expansion Modules, instant Letters, EPS0N/0KIDATA Block "block graphics" 
support. Quickcursor module with 2 speed controllable cursors, rectangle, 
line and circle commands. 2.1 also includes the NEWSCRIPT interactive 
module, (lor other pr inter support call) 

GEAP DOT WRITER - You get all of the 2.1 Package plus all of the Dot Writer's 

high resolution capabilities With this package you entei a new world (Epson 
Printer Support only at this time) $75.95 

^273 

PALM DESERT, CA 92260 / (714) 340-5471 mc/visa 



.'See ( ist o! Advertisers on page 386 
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Aerocomp's 
Proven 
Best-By Test! 
The 



11 



in 




Double Density Controller 

• Technical Superiority 

At last! A double density controller for Model I with HIGHER PROBf^qjY OF DATA RECOVERY THAN WITH ANY OTHER 



DOUBLE DENSITY CONTROLLER ON THE MARKET TODAY! The "DDC" ft 

blems that keep cropping up on existing products. AEROCOM/J'S- 
has a wider capture window than the digital types currentl 
ing. The finest resolution available with digital circuitry is 1 'm 
finately variable tuning. Attack and settling times are op 
The units presently on the market use a write precompejjj 
tolerance is extremely wide - in the order of + 100 ns 
The bottom line is state of the art reliability! 



^ocomp. No need to worry about the pro- 
^oT^-design phase lock loop data separator 
Hows high resolution data center- 
•^<PDC" analog circuit allows in- 



>;%, 



i#- 



°**> 



t-i 



* Test Proven 






»*, 



Tests were conducted on AEROCOMP'S "DDC", Perco 

a Radio Shack TRS80* * * Model I, Level 2, 48 K with ~ 

(Siemens Model 82). Diskette was Memorex 3401 

mine performance under adverse conditions. Th^ 

expansion interface. 

The test consisted of formatting 40 tracks on th 

pattern was chosen because it is recommended 

attempt was then made to read each sector on 

1.0, with Double Zap, version 2.0. unreadable sectors were" 

each double density controller and the data averaged. Test 

* Features 

TRS80 Model I owners who are ready for reliable double 
density operation will get (1) 80% more storage per 
diskette, (2) single and double density data separation 
with far fewer disk I/O errors, (3) single density com- 
patibility and (4) simple plug-in installation. Compatible 
with all existing double density software. 

* value 

$139.95for the BEST double density 
controller on the market. 

$1 79.95 for "DDC" complete with dosplus 3.3D 
5229.95 for "DDC" complete with ldos 






y 






,Board to board 



/id LNW's "LNDoubler"** using 
•m TFD100* disk drive 
ied piece of media to deter- 
ire installed sequentially in the 



°&>:° u ^ 



attern on all tracks. The 6DB6 
urers of drives and diskettes. An 
g system was Newdos/80, version 
The test was run ten times with 
j( the table. 

• TEST RESULTS * 



MFR & PRODUCT 


SECTORS LOCKED OUTiavo 


AEROCOMP "DDC" 





PERCOM "DOUBLER II" 


18 


PERCOM "DOUBLER A" 


250 


LNW "LNDOUBLER" 


202 



Note: test results available upon written request. All tests conducted prior to 8-25-81 

Aerocomp's 14 day money back guarantee applies to hardware only. 

Specials will be prorated. Shipping $2.00 in Cont. US. See opposite page for details. 



_.!S,>«-i>l'---.<»>X-'/.:i;-».«!'.«>i ■ 



The advances that make the "DDC" great are incorporated in the new AEROCOMP Single Der 
and Double Density Data Separator ("DDS"). 



Happy DDS customer writes 



• Has your original manufac- 
turer left you holding the bag? 

If you already own a Percom 'Doubler A", 'Doubler U" or LNW 
"LNDoubler ", the AEROCOMP "DDS" will make it right. Look at the test 

results: 



MFR. & PRODUCT 


SECTORS LOCKED OUT 


WITHOUT "DDS" 


WITH "DDS" 


PERCOM "DOUBLER II" 


18 


1 


PERCOM "DOUBLER A" 


250' 





LNW "LNDOUBLER" 


202 






Note: Same test procedures as "DDC". 
* Trademark of Percom Data Co. 
** Trademark of lnw 

*** Trademark of Tandy Corporation 



• "DDS" $49.95 

(Use 1791 chip from your dd con- 
troller) 

"^ LsL/3 with disk controller 
chip included y / */.Cs£) 

* Disk controller 

chip $34.95 

(Shipping $2.00 Cont US - see opposite 
page for details) 



Plugs directly into your existing 
Double Density Controller. 



I don't often write letters 
such as this, but I feel I should 
in this case ... I am suprised 
and pleased with your DDS. It is 
not often a product is "better 
than one expects . . . This 
(these) test (s) used a Percom 
Doubler "A". (Test without DDS 
installed showed many errors) 
(With DDS) not one error!!! 
After ten (10) tests of format- 
ting and verifing and zeroing 
NOT ONE FAILUBE OR LOCK 
OUT. Great! II 



Phil Gnadt 

Kansas City, Kansas 



See opposite 
pagetmn 
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TRS80 






40 & 80 TRACK 



as low as 




.95 



NEW LOW PRICES 

Thanks to you our sales volume has 
allowed us to cut costs and we're pass- 
ing the savings along. We offer the best 
disk drive value in the market place. 
Reliability, features and cost tough to 
beat. We deliver.. .and we stand behind 
our products. AEROCOMP is the only 
manufacturer to offer FREE TRIALI Buy 
Aerocomp drives today. You deserve the 
best. 

BEST FEATURES 

• Fast 5 ms. track-track access time 

• Operates single or double density. 

• "FLIPPY" feature for lower media cost 
(4#1 &80-1). 

• Head load solenoid. 

• Disk ejector. 

• Easy entry door. 

• NEW EXTERNAL DRIVE CABLE 

CONNEC I ION. fno longer need to 'emove the 
covet to hook up caDle| 



EPSON 

MX80 

PRINTERS 

$469.00 

TRS80 Cable (I & III) $9.95* 

APPLE Cable & Interface. $ 105.00 

RS232 Interface S69.95 

Ribbon Cartridge. Black. . . $9.95 

Add $6.00 shipping (Cont. U.S.) does not 

include cable. 

MX80 F/T 

All the features of MX80 plus Friction 
Feed. Shipping & cables as above. 

$579. 



"With Purchase of Printer 



ORDER TODAYI 

• 40-Track Drive $299.95 

• 80-Track Drive $409.95 

• 40-Track "FLIPPY" Drive . . $329.95 

• 80-Track "FLIPPY" Drive. . . . $419.95 

• 40-Track Dual-Head Drive. . $419.95 

• 80-Track Dual-Head Drive. . $569.95 

All eibove ilNves a'e complete with srfver enclosure power supply 
dncl external drive cable connection 1 15 VAC SO/60 H? 2 30 VAC . 
50/60 Hz ^variable on special order 

• 40-Track Bare Drive $259.95 

• 80-Track Bare Drive $359.95 

• 40-Track "FLIPPY" Bare Drive$279.95 

• 80-Track "FLIPPY" Bare Dnve$369.95 

• SPECIAL PACKAGES* 

STARTER A $339.95 

40-Track Drive, 2-drive cable, TRSDOS 
2.3 Disk & Manual, Freight & Ins. 

STARTER B $369.95 

40-Track "FLIPPY" Dnve,cable. TRSDOS 
2.3 Disk & Manual, Freight & Ins. 

COMBO C $465.00 

40-Track "FLIPPY" Drive. 2-drive cable, 
LDOS - Freight & Ins. 

COMBO D $559.00 

80-Track "FLIPPY" Drive. 2-drive cable, 
LDOS- Freight & Ins. 

COMBO E $709.00 

Two 40-Track "FLIPPY" Drives, 4-Drive 
cable, TRSDOS 2.3 Disk & Mannual, 
Freight & Ins. 

COMBO F $989.00 

Two 80-Track "FLIPPY" Drives. 4-drive 
LDOS ins 

COMBO G $ 689. 00 

Two 40-Track Dual-Head Drives, cable, 
TRSDOS 2.3 Disk & Manual. Freight & 
Ins. 

COMBO H $1289.00 

Two 80-Track Dual-Head Drives, cable, 
LDOS . Freight & INS. 

DOSPLUS 33 or NEWDOS / 80,2.0 
available with any package. 

AddSS 00 per drive tor shipping & handling (Cont US). 

FREE TRIAL OFFER 

Order your AEROCOMP Disk Drive and 
use it with your system for up to 14 
days. If you are not satisfied for ANY 
REASON (except misuse or improper 
handling), return it, packed in the 
original snipping container, for a full re- 
fund. | Hardware only. Special packages will be prorated) 

We have complete confidence in our pro- 
ducts and we know you will be satisfied! 
ORDER TODAYIII 



WARRANTY 

We offer you a 1 20 day unconditional 
warranty on parts and labor against any 
defect in materials and workmanship. In 
the event service, for any reason, 
becomes nescessary, our service depart- 
ment is fast, friendly and cooperative. 

1 00% TESTED 

AEROCOMP Disk Drives are completely 
assembled at the factory and ready to 
plug in when you receive them. Each 
drive is 100% bench tested prior to ship- 
ment. We even enclose a copy of the 
test checklist, signed by the test techni- 
cian, with every drive. AEROCOMP 
MEANS RELIABILITY!! 

ORDER NOWII 

To order by mail, specify Model 
Number(S) of Drive, cable, etc. (above), 
enclose check, money order, VISA or 
MASTERCHARGE card number and ex- 
piration date, or request C.O.D. ship- 
ment. Texas residents add 5% sales tax. 
Add $ 5 .00 per drive for shipping & handl- 
ing (Cont. US). Please allow 2 weeks for 
personal checks to clear our bank. No 
personal checks will be accepted on 
C.O.D. shipments-cash, money orders or 
certified checks only You will receive a 
card showing the exact C.O.D. amount 
before your shipment arrives. Be sure to 
include you: name ana shipping address. 
You will be notified of the scheduled 
shipping date. Your bank credit card will 
NOT be charged until the day we ship.!! 



DRIVE CABLES 

2-DRIVE 

4-DRIVE . . 



C/4 95 
:34 95 



WRITE AEROCOMP TODAY 
FOR MORE VALUES II! 



CALL TOLL FREE FOR FAST SERVICE 
(800) 824-7888, OPERATOR 24 

FOR VISA/MASTERCHARGE/C.O.O. ORDERS 

California dial (800) 852 7777, Operator 24 Alaska 
and Hawaii dial (800) 824-7919, Operator 24. 
TOLL FREE LINES WILL ACCEPT ORDERS ONLYI 

For Applications and Technical information, coll 
(214) 337-4346 or drop us a card 



Dealers 



AE3 

Redbird Airpo 
P.O. Box 24829 
Dallas, TX 75224 




g. 8 



sSee List ol Advertisers on page 386 
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REVIEW 



Lockheed Corp. 's Data Base. 




Dialog Information Retrieval Service 
Lockheed Corporation 
Palo Alto, CA 

Alan Neibauer 

1 1 138 Hendrix Street 

Philadelphia, PA 19116 



Hopefully, people no longer doubt the 
business and personal advantages ac- 
companying microcomputer ownership. 
The wide range of excellent software avail- 
able, as well as the ease with which an in- 
dividual can program in Basic, should be 
the best advertisements for the little techni- 
cal wonders. If not, Dialog Information Re- 
trieval Service, part of the giant Lockheed 
Corporation, certainly should do the trick. 

Dialog's sole purpose is to provide speci- 
fic information on almost any subject to 
businesses, individuals and families. 

Having over 200 data bases covering some 
55 million records, the service provides the 
computer user with an easy means of 
searching for and retrieving information. 
Bases currently on line include listings from 
medicine to music, legal resources to 
geology, chemicals to complete listings of 
grant and foundation sources. History, U.S. 
Patents, most current periodicals, biogra- 
phies, agriculture and energy are all subjects 
open to research (see Table 1). 

Dialog is a giant clearinghouse for data 
bases from both private and governmental 
areas. Additional bases are always being 
added; one of the most recent is the Career 
Placement Registry, a file containing the 
names of graduates from over 1400 col- 
leges and universities. The scholastic 
records of graduates can be searched and 
their resumes ordered so that unique and 
qualified individuals can be found almost 
effortlessly. 

Searching 

Of course, just having all this data avail- 
able is not enough. Making Dialog most at- 
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tractive is the wide range of search tech- 
niques and aids available to the researcher. 
You may search for specific information 
using certain key words found in the refer- 
ence's title, subject index or abstract. Most 
data bases also provide additional indexes 
of searchable fields such as author, date of 
publication, language, journal name or 
classification code. The Historical Abstract 
file, for example, allows searching through 
fields such as document type, historical 
period (starting or ending dates), publisher 
and update. Each data base provides a 
complete list of particular search fields. 

To find specific references, Boolean op- 
erators can be used. If you are looking for 
records dealing with solar energy, for in- 
stance, you may search under the descrip- 
tor "Solar" or under "Energy." In addition, 
you may specify records which contain 
both through the use of "Solar and Energy." 
The "and," "or" and "not" operators make 
search expressions such as "children and 
television and violence" possible. 

Through the Search and Save feature of 
Dialog, you may formulate a search pattern 
which is stored on the system and auto- 
matically performed as data base updates 
are made. This enables the busy executive 
to retrieve regular search reports as new 
records are added. 

The search itself is performed with 
several Basic commands. Each specifies 
terms to be searched for and compiles a list 
of sets in which the particular descriptor is 
found. Once the operator is satisfied that 
appropriate references have been found, 
they can be displayed on a CRT or output to 
a printer in several formats. Dialog can also 
print results on its own high-speed printers 
and mail them to the researcher. If com- 
plete documents are desired, a Dialorder 
service places orders with any number of 
private retrieval services (see Table 2). 

With the growing use of CRT terminals, 
Dialog has made it easier for terminal users 
without printers. Video line width can be set 
by the researcher and information dis- 
played one screen at a time by specifying 



the number of lines. Formerly, a Type com- 
mand would output to the CRT and printer 
continuously until the end was reached. 
This was fine for those with printers but 
made searching difficult when only a 
screen was available. Thanks to Dialog's 
new Display and Page commands this is no 
longer a problem. 

Figure 1 is a sample search made on the 
Dialog system. Upon signing on to the sys- 
tem and requesting the data base to be 
searched, Dialog estimates sign-on cost. In 
fact, each time a new data base is selected 
the system presents a cost analysis, mak- 
ing it easy for information suppliers to keep 
track for billing purposes. In this case, the 
Dialog charge was 20 cents and a 5 cent 
charge by Telenet for the hook-up time. 

I requested file 58; the name and inclu- 
sive dates of the file are displayed. File 58 is 
Geoarchive, a data base published in 
England by Geosystems Inc. It indexes over 
100,000 references per year and currently 
holds over 300,000 individual citations on 
geoscience. 

Using the Select command, I requested a 
search for the word "silicon." Dialog re- 
sponded, placing 111 references with the 
word into Set 1. 

I have a friend who is interested in com- 
puters and would like to use them in his 
geology hobby. He wanted to find out how 
microprocessors have been used in field 
work to record and manipulate data. I thus 
selected "microprocessor" as the next 
search term and found 19 references. These 
were placed into Set 2. To reference any 
citation for additional searching, printing or 
ordering the Set number is used. 

The third term selected was "field." Here 
the computer found 8299 citations and 
placed them into Set 3. 

Finally, since this was not meant to be an 
exhaustive search, I asked Dialog to find 
citations with both the terms "microproces- 
sor" and "field." Two of these were found 
and placed into Set 4. 

You can request that citations be printed 
on line in several formats. These include 



"Dialog is a giant 
clearinghouse for data bases 



just the Dialog accession number, a full 
record (usually including an abstract), a 
bibliographic citation alone, or just the title 
and indexing information. Each data base 
varies in the types of format available. 

Since I have a printer and wanted the full 
record without an abstract I commanded 
TYPE 4/2/1. This directed Dialog to print on 
my screen and printer the first item of Set 4 
in format 2. Requests can be made for any 
number of items at one time. Users without 
a printer can use the "Display" command in 
the same manner. Even if you request to dis- 
play multiple records, just one will be dis- 
played at a time. The Page command brings 
the next citation to the screen. 

To get a copy of these citations, reenter 
the same data using the Print command. Ci- 
tations will be printed by Dialog and mailed 
to your address on record. When my printer 
is down I've used this feature and find 
delivery quick. 

Count the Cost 

Since I had a reference my friend was in- 
terested in reading, I entered Logoff and 
received the off time and accounting. My 
search cost $1.58. 

By carefully planning your search 
strategy before logging on, you can find 
specific information quickly and with the 
least expense. Unlike CompuServe, which 
charges a flat hourly rate, the on line 
charges vary with each data base selected 
on Dialog. While the average search only 
takes about 10 minutes if planned in ad- 
vance, hourly rates can be rather high and a 
large bill quickly develops if you are not 
careful. 



Rates range from $15 per hour for several 
practice data bases (called Ontap) to $300 
per hour. The average hourly rate, however, 
ranges from $35 to $70. In addition, a per 
record charge for printouts made off line 
and mailed to the researcher varies per data 
base but ranges from 10 cents to 30 cents 
with a few exceptions. All but 19 of more 
than 200 bases make no charge for records 
printed on line. 

One final additional charge is $6.00 per 
hour connect charge, made by either 
Telenet or Tymnet. Of course, you can dial 
Dialog direct to avoid these extra communi- 
cations charges. (For most of us, long 
distance calls to California are just too 
expensive.) 

While these hourly rates may seem high 
they must be placed in perspective. First, 
the average search time when planned 
before hand is only about 10 minutes. When 
doing research for business applications 
these costs are borne by the client. Second, 
while the most expensive hourly rate is $300 
there are only a few bases with rates over 
$90. Third, having the research power of 
Dialog at your keyboard saves the time and 
expense of other research techniques. In 
the long run Dialog can save a great deal of 
money. 

Dialog's excellent, and unique, customer 
service softens the blow of long searches. 

Each month active customers receive a 
free newsletter explaining Dialog changes, 
new data bases and search tips. Usually in- 
cluded are announcements of free time pro- 
vided on at least one data base each month. 
Dialog also operates a series of training 
seminars in principal cities all over the 



ABI/INFORM— Covering the period August 1971 to the present (134,636 records), this data base provides informa- 
tion on all phases of business management and administration. Some 400 primary publications are scanned 
for articles to be abstracted. 

ARTBIBLIOGRAPHIES MODERN— Over 50,000 references to modem art and design. 

BIOSIS PREVIEWS— Citations from both Biological Abstracts and Biological Abstracts/RRM from 8000 primary 
journals concerning the life sciences. 

CA SEARCH— Bibliographic data for all documents covered by Chemical Abstract Service. Almost 5 million rec- 
ords are maintained with biweekly updates. 

CHEMNAME, CHEMSEARCH AND CHEMSIS— Listings of all chemical substances, including their molecular 
formula, ring data, available synonyms and other information. Over 2 million records are in these three bases. 

EXCERPTA MEDICA— Over 1 million abstracts and citations of articles from some 3,500 biomedical journals 
throughout the world. 

FOODS ADLIBRA— Up-to-date information on food technology, nutritional and toxicology subjects. Significant 
developments in processing methods and packaging are included. 

FOUNDATION DIRECTORY and FOUNDATION GRANT INDEX— Two files which together contain information on 
4000 foundations providing grants. 

INTERNATIONAL PHARMACEUTICAL ABSTRACTS— Some 63,000 citations (growing at a rate of 3000 new 
entries per year) on the development and use of drugs, and on professional pharmaceutical practice. 

MAGAZINE INDEX— A broad on line data base of general magazines. Covers some 370 popular magazines in all 
areas. Monthly updates are made to the already half million citations. 

Table 1. Sample Data Bases 



GOOD GRIEF// 




SUN&ELIEVA6LE / 



TOP-NOTCH PROFESSIONAL 
SOFTWARE FOR THE TR5-80 
MODEL! at LOW prices/ 

— Power enough (or the 
professional programmer 

v; -- Easy lor the beginner 
- Extremely useful 

uc-.in _ ?' 

MENU - Program menu generator.. Price: $24.95 

• Greil way to organize disks, especially turd drives! 

• Like hiving i directory with descriptions and better! 

• Ideal fiont end for an application package 

• Displays menu of programs including descriptor 

• Usei selects piogiam with cuisot or by line num, 

• Can run BASIC or TRS00S compiled progiams 

• Up to 200 lines in menu" including comment lines 

• Submenus (other menu files) can be put in menu 

• TRS00S commands can be menu items 

• Each disk 01 piogiam package can have separate menu 

• Complete editing facilities including menu locking 

• Can pass infoimation to selected progiam through liie 
RESEO - Program line renumberer.. Price: $44.95 

• No programmer should be without this utility 1 

• The ideal solution lor inserting lines into crowded code! 

• Makes structured piogiammmg in BASIC easier 

• Renumbeis all or pan ol ihe fines of a piogiam 

• Renumbers up to 30 gioups of lines at once 

• Can copy gioups ot lines leaving originals 

• Can combine qioiips and ienumbei them together 

• Can leloccite a group by adding or subtracting a 

constant horn all line numbeis 

• Car' punt table showing old and new line mimbt'is 

• Can (lag on renumber able line number references 

• Car' have separate input and output tiles 

• Works on (.ompiessed tormal tiles 
iSAVE PROG BAS A unnecessary' 

• fast up in 240 lines ' minute 

-'its'- *^ 
CREF - Cross reference generator Pr 

• No more worries aboul accidental misuse ol 

• Contains leatures not found in similar utilitie 

• Complete cross leference listing ot vanabtes . 

(unctions, line number ie'eienct:s and USR ru 

• Flags different types ot use dine numbers GOTO 

G0SUB ON ERROR GOTO RESUME ERl FlElOedand 
regular vanabtes arrays use modify define 
lunctions and USR routines use define) 

• Warns when vanahle may have been used incorrectly 

• Reterences listed by effective name and type 

• Listing arranged alphabetically oi numerically ,• 

type ot item in a separate section 

• Disk tempoiary lite - no limit on piograr 

• Works on compiessed tormal files 

• Fast - up to 180 lines -'minute using Line 



program. Price: $24.95 

• When bought with CREF. this is the icing on the cake! 

• Lists full names ot all variables arrays and functions 

alphabetically USR routines are hsted separately 

• Variables having names with same fust 7 characteis 

ano type are listed together 

• Helps find variables with same lusl 2 characters 

• Output listing to CRT printer or disk file ■_;. 

• No limit on piogiam si/e f 

• Works on compiessed tor mat hies 

• Fast ■ up to 540 statements 'minute on Line Pur" 

Introductory offer: Purchase all , 

packages for only S99.95' 

Note: The above software requites 64K 

memory fo run 

For more information: Individual user's 

guides for above packages are available 

for S7.50 each creditable towards 

purchase of that package if purchased 

within 90 days 



Add S2.00 foi postage and handling 
Iowa residents add 3°o la. sales tax 

To order call collect |515) 236 8406 




QBji 2 accepted 

Worlo Software Resource 
Oiv. Sumner Enterprises 
Hwy. 146 N 
Grinnell. IA 50112 



sSee List ot Advertisers on page 386 
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The Captain 80 Book of 

BASIC 

ADVENTURES 

EIGHTEEN ADVENTURES: 

U Atlantean Odyssey 

□ Dog Star 

□ Thunder Road 

□ Deadly Dungeon 

□ Revenge of Balrog 

□ The Fortress at Times-End 
D Temple of the Sun 

□ Lost Ship 

n Spider Mountain 

□ Lost Dutchman's Gold 

□ Journey to the Centerof the 

Earth 

□ King Tut's Tomb 

□ Voyage to Atlantis 

G House of Seven Gables 

□ Sorcerer's Castle 

□ CIA Adventure 

LJ Arctic Adventure 

□ Adventureland 

All these program listings plus 
an Adventure Generator not 
available from any other 
source! 

$19.95* 

Although all programs are 
written for TRS-80 Model I & 
III, these programs will easily 
convert to any other machine 
using Microsoft" BASIC. 




Send to : 

80 Northwest Publishing 

3838 South Warner St. 

Tacoma, WA 98409 

(206) 475-2219 

Name 

Address 

City 

State, Zip ! 

Visa/MC 

Exp. Date 

*Please add $2.05 
Shipping and Handling. 



for 



„-3?9 



". . . Boolean operators 
can be used." 

world. For the serious researcher these 
seminars are well worth the price since 

learning how to plan search strategies can 
save hundreds of dollars in connect time. 

While I use Dialog for some business ap- 
plications, I also find it useful for personal 
reasons. Since Dialog only charges for con- 
nect time, there is no annual fee. This in- 
stant library in my home is a valuable 
asset. ■ 



Mr. Neibauer, a Philadelphia, PA, school 
teacher, works part time configuring word 
and data processing systems and writing 
business application programs. 



hor a complete list ot Dialog data bases, contact: 
Dialog Information Retrieval Services, Inc. 
.'!4o5 Hillviev* Avenue 

Palo Alto. CA 94304 



Begin 
Expand 

Solocl 



Starts a search in a particular file and resets Set numbers to 1. 

Displays related terms from an onnne thesaurus. Shows words with similar spelling to search 

term. 

Requests postings to sets to be retrieved from the index. Can be used with single words, combined 
with Boolean operators, prefix codes or limited to specific areas (such as a particular language or 
source). 

Select Steps Requests postings as above with Boolean operators but places each search element in its own 

distinct set. 
Combine Used with Boolean operators to relate previously established sets. 

Type Displays records on line to both CRT and printer i* available. 

Display Displays records on the CRT. Page length and video width can be specified. 

Print Orders oil line prints of specified records. 

Logoff Terminates current connect session and gives cost estimate. 

Table 2. Commands 



? BEGIN 58 

29sep81 14:33:49 User xxxxx 
$0.20 .008 Hrs. Filel 

$0.05 Telenet 

$0.25 Estimated Total Cost 
File58: Geoarchive - 74- 81/May 
Set Items Description 



? SELECT SILICON 

1 111 Silicon 

? SELECT MICROPROCESSOR 

2 19 Microprocessor 
? SELECT FIELD 

3 8299 Field 
? COMBINE 2 AND 3 

4 2 2 AND 3 
? TYPE 4/2/1 

4/2/1 

565064 GA479000866 

A SIMPLE MICROPROCESSOR SYSTEM FOR FIELD DATA ACQUISITION AND DISPLAY 

Ross. PJ 

Tech Pap Div Soils CSIRO (Melbourne) 40 17P 1979 JRNL. 

Code: TPDSCI 

LANGUAGE: ENGLISH 

DESCRIPTORS: COMPUTER SYSTEMS; FIELD METHODS; PEDOLOGY 

DESCRIPTOR CODES: 831000; 815000; 741000 

7LOGOFF 

29sep81 14:35.50 User XXXXX 
$1.58 .035 Hrs File58 4 Descriptors 
$0.40 Telenet 

$1.98 Estimated Total Cost 
LOGOFF 14.35.54 



Figure 1. Sample Session 
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RETAIL LOCATION: 447 S. WOOD, PRYOR, OKLAHOMA 74361 




TRS-80 MODEL III 




16K $825 

48K $849 

48K 1 DRIVE $1499 

48K 2 DRIVE $1749 



ERE'S NO 



TTiere's no secret as to why we can sell 
TRS-80 computer equipment for less. Low 
overhead — that 's the reason — pure, sim- 
ple and straight! As everyone knows, Radio 
Shack is a huge corporation. ..with huge 
expenses. We are able to buy the bare- 
bones computers from Radio Shack. To 
these computers, we add our own memory 
chips, disk drives, cables, etc. The result is 
a computer system which is equal to, or in 
many cases, superior to the one you would 
get from Radio Shack in both price and per- 
formance capabilities. There is one thing 
that you don ' t get from Radio Shack — their 
90 day warranty. What you get in its place is 
the exclusive 180 days American Small 
Business Computer's Warranty. So. ..if you 
like the Radio Shack computer, but don't 
like the price. CHECK US OUT!!! 



TRS-80 MODEL II 




COLOR COMPUTER 



RAM 

'ONLY 



m 



iiinnnaaaa 

aaaaaammtamm^' 

BBS 







For MOD I, II, III Color Comp. 



64k MODEL II 
WITH ONE DISK DRIVE 

$5287°° 



4K LEVEL 1 $318 

16K LEVELI $335 

16K EXT. BASIC $435 

32K EXT. BASIC $520 

DRIVE I $499 

DRIVE 2, 3, 4 $250 



American Small Business Com- 
puters is not an authorized Radio 
Shack Dealer. We do not offer a 
Radio Shack 90 Day Warranty on 
our computers. Instead, we offer 
the American Small Business 
Computers 180 Day Warranty. If 
you have a problem with your 
computer, return it to us for 
about 48 hours. If we can't fix it, 
we' II replace it! 



MODEL I, III SOFTWARE 

PROFILE $69.95 

PROFILE III PLUS $175.00 

VISICALE $87.95 

VISICALE III $175.00 

SCRIPSIT $87.95 

SCRIPSIT DICTIONARY $175.00 

SUPER SCRIPSIT $131.00 



o 



829-4844 



* TM Tandy Corp. 

.-2>7 



REVIEW 



Bigger, better and faster than Level II 



Extende 




Franklyn D. Miller 
8871 Falmouth Drive 
Cincinnati, OH 45231 

Extended Color Basic for the Color Com- 
puter is a powerful language rivaling 
Disk Basic in its repertoire while lacking 



some features of Level II. All arithmetic 
functions are carried out in nine significant 
figures. It is amazingly fast, especially in 
graphics functions. You can draw a rec- 
tangle in a few tenths of a second and fill it 
with a different color in two seconds or less. 
Since 8K Color Basic has been described 




R 



Figure 1 
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before, we will only look at the additional in- 
structions for Extended Color Basic. 

New Color Basic Functions 

ATAN (same as Level II). 

CIRCLE (for high resolution graphics). A 
circle can be drawn anywhere on the screen 
with a designated center (X,Y) of radius R, 
with a given color C. Choose a height to 
width ratio in the range of zero to four to 
form an ellipse. Draw an arc by specifying a 
starting and ending point using numbers 
between zero and one. For graphics, that is 
powerful and fast! 

CLOAD M loads a machine language pro- 
gram from cassette at 1500 baud. You can 
specify the address at which the program 
starts to load. 

COLOR allows you to specify a fore- 
ground and a background color for graph- 
ics. Lines and points are in the foreground 
color with an overall screen color set by the 
background color. Eight colors are avail- 
able; only two or four can be used at one 
time (see PMODE). 

COS is as in Level II. Radians must be 
used. 

CSAVEM writes a machine language pro- 
gram to tape. This is poorly defined in the 
manual. 

DEF FN defines a function as in Disk 
Basic. This is not available in Level II. 

DEF USR is the same as Disk Basic. You 
can define up to 10 USR functions. 

DEL is the same as delete in Level II. It 
also deletes program lines but is more 
forgiving and more flexible. 

DLOAD M loads a machine language pro- 
gram at either of two baud rates— 300 or 
1200. It is also poorly defined in the manual. 




118 SO. MILL ST 
PRYOR, OK 74*61 
(918) 825-4844 




SmaII 



SINESS 



ALL PRICES ARE CASH DISCOUNTED 3% . COD. AND CHARGE ORDERS ARE 3% MORE 
RETAIL LOCATION: 447 S. WOOD, PRYOR, OKLAHOMA 74361 






• • • 



We sell the complete EPSON line at the lowest prices! 

If you don't believe it, give us a call. But, just as important, we offer 
an unprecedented 180 Day Warranty! How do we do it? It's easy. 
We sell the most reliable printer in the world — EPSON! 




Our Mini Disk Drives are based on the world famous 
TEAC Mini Disk Unit. TheTEAC Unit features an esti- 
mated 8000 power-on-hours mean time between failure 
(that's 8 hours a day, 5 days a week, for 3.85 years! !). 
Our drives also feature a lead screw head positioner-not 
a band type positioner. This type of positioner insures 
accurate head positioning over the read-write media 
while giving a very quiet, noise-free read-write opera- 
tion. If you have any doubts about our drives, our one 
year warranty should convince you that we know this 
unit is the best drive at the best price on the American 
market. This is one example where you can pay less 
and get more!! 



40TRACK SINGLE SIDE $250 

40 TRACK DOUBLE SIDE $340 

80 TRACK SINGLE SIDE $340 

80 TRACK DOUBLE SIDE $475 

VERBATIM DISKETTES $29.95 

2-DRIVE CABLE $29.95 

4-DRIVE CABLE $39.95 



WE STOCK 
DISK DRIVES! 



•?I8 



"Thirty or more nested 
rectangles can be drawn 
in about one second!" 

DRAW is a powerful instruction. Begin a 
graphics figure anywhere on the screen and 
draw any of two or four colors in any of 
eight directions sequentially. You can draw 
blank lines or draw to scale (1-62) in units of 
Va. The color, angle and scale can be 
specified. For example, the instruction 

DRAW "BM60.1 16E20BE20E20F20BF20F20L40BL 
40240 BU40R40BR40R40G20B620H20BH20H20 
BM128.96NU40ND40NE20NF20N620NH20NL40R40: 

draws a complex star (see Fig. 1.). The in- 
struction set is 



U = up 
R = right 

D = down 
L = left 

E = up 45 degrees to the right 

F - down 45 degrees to the right 

G - down 45 degrees to the left 

H = up 45 degrees to the left 

B = X-axis starting point (Begin) 

M = move 

C = Color (followed by an integer from zero to eight) 

N - No. update. Start again at the beginning. 

S = scale 



Appreciating the versatility of this instruc- 
tion requires experimentation. Invisible 
lines can be drawn and a series of Draw in- 
structions concatenated into a single in- 
struction (similar to string concatenation). 
To draw nested rectangles use a loop and 
change the scale factor. Thirty or more 
nested rectangles can be drawn in about 
one second! 

EDIT is the same as Level II but you can- 
not use "EDIT" to access the last line num- 
ber. When you edit a line, the whole line is 
displayed and Basic goes into the Edit mode. 

EXP is the same as Level II. 

Exponentiation (t) is the same as Level II. 

FIX is the same as Level II. 

GET is not a disk instruction. Get puts a 
section of a high resolution screen into an 
array for later recovery. It is limited by 
memory. With I6K, the limit is about 36 x 36 
for a square or the equivalent in a rectangle. 
This is good for animation. Five options are 
available with Get and Put (PSET.PRESET, 
AND,OR,NOT). (See Put.) 

HEX$ is a bonus for machine language 
users. HEX$ converts decimal to hex, not 
available in either Level II or Disk Basic. 

INSTR returns the starting point of a sub- 
string within another string. It is the same 
as the Disk Basic instruction. 

LET is nothing new but can sometimes be 
used instead of Then. 

LINE draws a line between any two 
points on the screen using the foreground 
color. It is extremely fast. The format is: 



Line (X1,Y1)-(X2,Y2). If the beginning point 
is not specified, the last point set on the 
screen is the default, -(X1Y1) draws a line 
from the last point drawn or set to X1.Y1. If 
the instruction is followed by a ' , B' and the 
diagonal corners of the rectangle are speci- 
fied, a rectangle is drawn. If ' , BF' is 
specified, the rectangle is filled with the 
foreground color. (The color may be spec- 
ified with 'COLOR X,Y'.) 

LINE INPUT is the same as Disk Basic. 



There is no "?" displayed and any input 
from the keyboard is accepted. 

LOG is the same as Level II. 

MID$ is the same as Disk Basic. It 
replaces a section of a string with the 
designated substring. Mid$(A$,10,2) = 
"MS" replaces the characters at positions 
10 and 11 with MS. 

PAINT fills any area of the screen with 
one of four colors designated up to any 
other one of four color boundaries. The 



Instruction 


Byte I 


Byte II 


Byte 


Ill 








ABS 


255 


130 


— 


MEM 


256 


14/ 


— 


ASC 


255 


38 


— 


MID$ 


255 


144 


— 


ATN 


355 


I -18 


_ 


MID$ = 


255 


144 


179 


AUDIO 


161 


— 


— 


MOTOR 


159 


— 


— 


CHR$ 


265 


139 


— 


NEW 


150 


— 


— 


CIRCLE 


194 


_ 


— 


ON... GOSUB 


136 + ASCII 


■ 


— 


CLEAR 


149 


— 


— 


ON...GOTO 


136 + ASC II 


— 


— 


CLOAD 


151 


— 


— 


OPEN 


153 




— 


CLOADM 


•51 


77 


— 


PAIN! 


'96 


— 


— 


CLOSE 


164 


— 


— 


PCLEAR 


192 


— 


— 


CLS 


158 


— 


— 


PCLS 


188 


— - 


— 


CO I OH 


133 


— 


— 


PCOPY 


'99 


— 


_ 


CO NT 


147 


— 


— 


PEEK 


255 


136 


— 


COS 


255 


149 


_ 


PLAY 


20' 


— 


— 


CSAVE 


152 


— 


_ 


PMODE 


200 


— 


— 


CSAVEM 


152 


77 


— 


POINT 


265 


145 


— 


DATA 


'34 


— 


— 


POKE 


146 


— 


— 


DEE FN 


185 


204 


_ 


POS 


255 


152 


— 


DcF USR 


185 


255 


131 


PPOINT 


255 


160 


— 


dee 


131 


— 


— ■ 


PRESET 


'90 


— 


— 


DIM 


140 


— 


— 


PRINT 


135 


— 


— 


DLOADM 


202 


77 


— 


PRINT @ 


135 


6i 


— 


DRAW 


193 


— 


— 


PRINT #-1 


135 


35 


172 


EDIT 


182 


— 


— 


PRINT #-2 


135 


35 


172 


END 


138 


— 


— 


PRINTTAB 


135 


164 


— 


EOF 


256 


'40 


— 


PRINT USING 


1 35 


203 


— 


EXEC 


162 


— 


— 


PSET 


"89 


_ 


_ 


EXP 


255 


151 


_ 


pyi 


197 


— 


— 


t 


175 


— 


— 


READ 


141 


— 


— 


FIX 


255 


!52 


— 


REM (OR ') 


130 


— 


— 


FOR 


128 


— 


— 


RENUM 


203 


— 


— 


TO 


155 


— 


— 


RESET 


'57 


— 


— 


STEP 


169 


— 


— 


RESTORE 


143 


— 


— 


NEXT 


"39 


— 


— 


RETURN 


144 




— 


GET 


196 


— 


— 


RIGHTS 


255 


143 


— 


GOSUB 


129 


'66 


— 


RND 


255 


132 


— 


GOTO 


'23 


165 


— 


RUN 


142 


— 


— 


HEX$ 


266 


•56 


— 


SCREEN 


191 


„ 


— 


IF 


'33 


— 


— 


SET 


156 


— 


— 


THEN 


167 


— 


■ — 


SGN 


255 


128 


— 


IN KEYS 


255 


146 


— 


SKIPF 


163 


— 


— 


INPUT 


13/ 


— 


— 


SIN 


255 


133 


133 


INPUT#-1 


'37 


35 


172 


SOUND 


1 60 


— 


— 


NSTR 


255 


668 


— 


STOP 


145 


■ 


— 


INT 


255 


129 


_ 


STRINGS 


255 


161 


— 


JOYSTK 


255 


141 


— 


STRS 


255 


136 


— 


LEF ; 'S 


256 


'42 


— 


SQR 


255 


155 


— 


LEN 


255 


135 


— 


IAN 


266 


150 


— 


LET 


186 


— 


_ 


TIMER 


255 


'59 


— 


LIST 


148 


— 


__ 


EROFF 


184 


— 


_ 


LLIST 


'55 


— 


— 


IRON 


183 


— 


— 


LINE 


187 


— 


— 


USR 


131 


— 


— 


LINE INPUT 


'87 


137 


— 


VAL 


255 


137 


— 


LOG 


255 


153 




VARPTR 

Table 1 


256 


157 
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?2K EXPANSION INTERF 



These Expansion Interfaces are 
Brand New, with original docu- 
mentation and in perfect working 
condition. 

Notice: These prices are good 
only through June 1, 1982. After 
June 1, 1982, the price will be 
$399.00 



$729 



95 




lf -, vi ■{■;■■- 



CAMEO 
HARD DISK 
DRIVES FOR 

TRS-80 MODEL II 

The Cameo Hard Disk offers TRS-80 Model II users 10 
million bytes of on-line disk storage. Five million bytes are 
stored on a standard non-removable disk platter. The second 
five million bytes are stored on a removable "disk pack". 
This configuration allows, for example, the accounts receiv- 
able to be stored on one disk pack, accounts payable on still 
another disk pack, mailing list on another, etc., etc. 

The Cameo also allows up to four computers to share the 
same disk drive. This means one person working at one com- 
puter can be updating accounts payable, while another per- 
son working at another computer can be retrieving records 
from a data base. So. ..when your business needs soar 
beyond a floppy disk limitations, call AMERICAN SMALL 
BUSINESS COMPUTERS and ask for THE CAMEO CON- 
NECTION. 

CALL FOR PRICING INFORMATION 
* Dealers needed tor all Cameo Hard Disk Products * 




TRS-80" Dais y Wheel Printer n 

By Radio Shack 



Yes, this is the same 
Daisy Wheel sold by 
Radio Shack for a couple 
of hundred bucks more. 
This is just one more 
reason why it really pays 
to shop American Small 
Business Computers. 



AQ99 




*- 221 n 



TRS-80 



Line Printer V $1635 *| 

Line Printer VI $1020 1 

Line Printer VII $325 I 

Line Printer VIII $619 







Dos helper 



The features your dos doesn't 

have 

Fast ram spooler 

Type ahead 

Route to disk 

Compare files 

File format conversions 

• Add and drop line numbers 

• Word processor to EDTASM 

• Unpack Basic programs 
Append object files 

Model III TRSDOS directory 
Neat listing of packed Basic 

programs 
Designed for Newdos80. 

Works with any dos 
Only $19.95 



Tatum Labs 
P.O. Box 722 

Hawleyville, CT 06440 
(203) 426-2184 

^335 



MODEL I or III Disk 



PILOT 



# only $29.95* 



* Debug Package displays all flags and 

commands before they execute. 

* Break Key Enable/Disable. 

* One Command invokation. May be an AUTO 

command . 

* File Chaining. A complete system from AUTO 

to exit. 

* LAST RESPONSE always available for Jump 

Use, File, etc. commands. 

* Uses UPPER or lower case for all commands. 
- Command/Modifier order not important. 

* All extra spaces ignored. 

* F A S T - All Z80 Machine code. 

* Less powerful than the SHACK' s Pilot but a 

lot more friendly to the author and 
the user (and a little cheaper 1 ) . 



TINY PASCAL* Disk Mod. 

- $ 19.95 - 

- requires TINY PASCAL. 

* DISK storage of PROGRAMS and PCODE 

* DISK I/O from programs 

* LINE PRINTER commands 

* COMPILER can use alternate TABLES or 

compiler PCODE. 



- Georgia residents add U'l, sales tax. 

- Add SlC. 00 for complete SOURCE CODE. 

- either system. 



Personal checks Ok. 

Pilot includes many 

sample programs. 



^378 



Barker Softws.ro 

P. 0. Box S313 

Athens. Georgia 
30604 



". . . you can renumber a 
program or part of a 
program at any time." 

starting point does not need to be accurate. 
Anywhere within the area to be painted will 
do. It is surprisingly fast. Eight colors are 
available depending on the PMODE. 

PCLEAR. High resolution graphics re- 
quire large amounts of memory. Animation 
alone can use several pages of memory. 
This makes it necessary to reserve memory 
at the outset. With 16K you can PCLEAR up 
to eight pages. The default is PCLEAR 4. 

PCLS X sets the screen background col- 
or, where X is a number between zero and 
eight. 

PCOPY. If you PCLEAR enough pages 
then you may PCOPY pages of graphics 
memory and save them for use in animation. 

PEEK is the same as Level II. 

PLAY is for those who use sound with 
their programs. You have twelve notes in 
five octaves, a pause (rest) and a tempo. 
These can be set up as strings and the 
strings concatenated. The music is played 
through the tv speaker one note at a time. 
The volume can be varied as can the note 
length. This instruction is not the same as 
Sound. 

PMODE selects the resolution (0-4) and 
the memory page where graphics start. 
Available resolutions are 256 x 192, 128 x 
192, 128 x 192, 128 x 96, 128 x 96. Very low 
resolution (64 x 32) can be used also but 
without reserving pages. 

POKE is the same as Level II. 

POS(X) returns the current cursor posi- 
tion. For Level II users this can be used with 
the printer as POS(-2). POS(-2) will return 
the printer head position. 

PPOINT is the same as Point but in high 
resolution. 

PRESET resets a point to the background 
color. 

PRINT USING is the same as Level II. 

PSET is the same as Set but is used in 
high resolution graphics. A color must be 
specified. 

PUT places an array set up by GET on the 
screen. The area is designated by diagonal 
coordinates. 

RENUM is a useful command. With it you 
can remember a program or part of a pro- 
gram at any time. If you need to insert a line 
and do not have the space just RENUM. It is 
instantly available. 

SCREEN. There are two high resolution 
graphics modes with two sets of two or four 
colors. You can choose either and change 
them in the program. The contents of the 
screen are not lost in a change. 

STRINGS is the same as Level II. 

STR$ is the same as Level II. 

SQR is the same as Level II. 



TAB is the same as Level II. 

TIMER can be useful. The timer can be 
set to zero at any time. Time is kept in in- 
crements of 1/60 of a second. It is turned off 
automatically during cassette loads and 
saves. 

TRON-TROFF is the same as Level II. 

VARPTR is the same as Level II. 

Some Final Thoughts 

The well-written instruction manual in- 
cludes plenty of exercises and examples. 
There are twenty-one complete graphics 
and sound programs, as well as a memory 
map with entry points for a number of use- 
ful ROM routines. 

When using the higher resolution graph- 
ics it is not possible to put characters on 
the screen. They must be drawn with the 
Draw instructions. In high resolution, the 
pages of screen memory are retained and 
can be recalled or erased by PCLS. The 
latest Radio Shack computer catalog an- 
nounced an upgrade to 32K and one to four 
disk drives. Spectral Associates of Tacoma, 
Washington has software for entering Level 
II tapes into the Color Computer (with some 
reservations). 

For its price, the Color Computer with 
16K and Extended Color Basic is a bargain, 
especially if you use it for games, graphics 
or educational purposes. Software is scant 
but developing rapidly. Chromasette is pro- 
ducing a good edition of monthly tapes 
similar to Cload. 

Extended Color Basic has many similar- 
ities to Level II and Disk Basic. The main dif- 
ferences are in the memory map and the way 
Basic tokens are used. Whereas Level II and 
Disk Basic use only one number to store an 
instruction, Extended Color Basic uses up to 
three. Line numbers and pointers are stored 
the same as Level II except the order is MSB, 
LSB for the 6809E. For those interested Table 
I lists the Tokens used in Extended Color 
Basic for the storage of Basic programs. 
With this list you can alter Basic programs 
almost at will. 

Some Level II instructions I miss are On 
Error GOTO, ERL/2 + 1, Edit, DEFINT, 
DEFSNG, DEFDBL. The serial printer out- 
put is slower than parallel. On the other 
hand you have upper and lowercase capa- 
bility (for the printer only) and can access 
Videotex with inexpensive software. The 32 
character by 16 line screen is a disadvan- 
tage, but is easy to read. For some, the 
joysticks are a plus. The cassette system 
has not given me a poor or difficult Load in 
over 300 tries and is three times as fast as 
Level II and six times as fast as Level I. ■ 
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DISCOUNT SOFTW 

FOR THE 

TRS-80 




FARM & RANCH 
MANAGEMENT PROGRAMS 



BEEF PROJECTlON-Tn.» program 
BEEF RATION — Thi« program avail 

specified by (he use', $15.00 
DAIRY COW-Thit ration evaiuator 

production, and buiierfat coniant 11 
FEED LOT- Th.s pan record tracks i 
"y pan.ai ' 
odaJii) 

,RM HE' 
7 expenae calegonea *"'n mventon 



any pan, and a dose-out whan all 

(Modal II) 

FARM RECORD-Thiaprog 



ihe daily requirements lor aua<i'io<! • 
cattle on coats 



. $35.00 (Models I and II), $100.00 



a. net worth. 9 employee payroll! 



aivabia. 5 bank accounta. and 5 anterpriaaa, $16.00 
GOVERNMENT PROGRAM-Thn program compares participation with non-paMiopation m wheat 
feed Qrajn-coUon program* under wariout aiaurnptioni about yields, production coats. anO marker 

interest, Shrink, 

lis program cornputaa either intereat rata, paymant amount, amount of loan, or years of loan 
ilher three vanablaa and number ol payments par year are entered, $15.00 

ea the averaaa annual deoreciat ion. interest, repair a, fuel and 
r of ownerahip. $20.00 



LOAN-T 



MACHINE COST — Th la progri 

labor coata per hour and per acre, for machine* or vehicl 

RECORD management— Thia la a general purpoi 

searching data files such as cow records, fiBid records 

etc . $15.00 

ESTATE TAX-Thia program prima anticipated Oklahoma ana Federal taxes for specified estates of 

individual; spouse It allows for the test iiq of various distribution strategies. $25.00 

FEED FORMUl.ATOR-The Feed Formulatcr calculates the laaal-coal rahc 

constraints and uplo 30 ingredients. $35 00 

PASTURE PROJECTION -This program projects gams and income e-pense t'om pasture 'or beef 

cattle. $20.00 

HARDWARE REQUIREMENTS FOR THE ABOVE PROGRAMS (Mil 

ami Dlea** ac 

Modal I and HI 



chinery parts Data, mailing hats. 

i for specified estates of 

25.00 

i for up (0 20 nutritional 



RADIO SHACK SOFTWARE 
MOD I, III 

PROFILE $69.95 

PROFILE III PLUS $175.00 

VISICALE $87.95 

VISICALE III $175.00 

SCRIPSIT $87.95 

SUPER SCRIPSIT $175.00 

SCRIPSIT DICTIONARY $131.00 

MICROSOFT 

ADVENTURE $23.00 

OLYMPIC DECATHALON....$24.95 



NEW DOS/80 2.0 

OR 



».» M 



».£ 



YOUR CHOICE, 




BIG FIVE 

• Supernova 

• Attack Force 

• Cosmic Fighter 

• Meteor Mission 

• Defense Command 

$18.95 - Disk 
$12.95 - Cassette 



DOS PLUS 3.4 and NEWDOS/80 2.0 are two of the most advanced 
operating systems ever available for the TRS-80. After spending 
thousands of dollars on your computer, why limit yourself by using an 
inferior operating system? Order Today! ! 



CALL 
918-829-4844 

DEALER INQUIRIES INVITED 



y' 223 



• ATTENTION SOFTWARE AUTHORS • 

American Small Business Computers is one of the nation' s largest suppliers and distributors of TRS-80 related soft- 
ware. If you have a program which you would like to market, please contact Ms. Jeanie Phillips at American Small 
Business Computers. She will test and evaluate each program received. If the program meets our high standards, an 
offer of acceptance, along with our terms, will be returned with the software. All types of games, business and scien- 
tific programs will be considered. Highest royalties are now being paid for Color Computer programs. 




GENERAL 



LOAD 80 



Predict high frequency wave propagation. 




opagation Prediction 



John D. Chipman 
18 Laurel Drive 
Medfield, MA 02052 



During the years I became 
hooked on electronics and 
radio, computers warmed up 
large rooms. I never dreamed of 
using one to aid my new-found 
interests. But here I am to tell 
you how your TRS-80 micro- 
computer can perform a task 
previously reserved for large 
mainframes— predicting high 
frequency radio wave propaga- 
tion. I call the program which 



performs this task Propagation 
Prediction. 

Propagation Prediction oc- 
cupies less than 16Kof RAM in a 
Level II machine. The program 
helps the radio amateur and 
shortwave listener select the 
best radio frequencies and 
times for working or hearing 
various DX locations. Propaga- 
tion Prediction provides fore- 
casts based on current solar ac- 
tivity. Figure 1 illustrates some 
typical MUF (Maximum Usable 
Frequency) charts as displayed 
on the screen. 

The program presents the 
predictions in an easy-to-under- 
stand graphic display on the 
screen. The only items you need 
to enter are solar flux numbers 



and geographical locations 
(latitude and longitude). The pro- 
gram reduces much of the pre- 
diction complexity to a form the 
personal computer can manage. 
You obtain realistic results for 
path lengths greater than 3000 
kilometers. Accuracy decreases 
rapidly below 3000 km due to 
short range propagation pheno- 
mena factors the program does 
not consider. 

Definitions 

Before jumping into the pro- 
gram description, let's review 
some important radio propaga- 
tion terms. 

The Great Circle Path is the 
shortest route between any two 
points on the earth. Remember 



the earth is a sphere, not the flat 
surface we all become accus- 
tomed to viewing on maps. For 
example, if you lived in New 
England and desired to work the 
Philippines, where would you 
point your antenna? If you 
guessed southwest or west, you 
are wrong. The proper beam 
heading is north northwest. The 
shortest path length between 
New England and the Philip- 
pines is over northern Alaska. If 
you don't believe it, try this 
small experiment. Get a piece of 
string and a globe. Hold one end 
of the string to New England 
and move the other end due 
west to the Philippines. Mea- 
sure the string length, and re- 
peat for a path over Canada and 
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AMERICAN 



118 SO. MILL ST 
PRYOR, OK 74?61 
(918) 825-4844 



SmaII 
Business 
COMPUTERS 



ALL PRICES ARE CASH DISCOUNTED 3% COD AND CHARCE ORDERS ARE 3% MORE 
RETAIL LOCATION: 447 S. WOOD, PRYOR, OKLAHOMA 74361 





COUNT PRINTERS 



EPSON-CALL FOR PRICES 
O KID AT A 

MICROLINE 80 $350 

MICROLINE82A $469 

MICROLINE 83A $719 

MICROLINE 84 $1015 







C. ITOH 

PROWRITER $499 

F10-40 $1450 

F10-55 $1750 



Paper, Ribbons and Other 
Accessories are also available 




MasterCard 





VISA' 



DISCOUNT COMPUTERS 

It is the stated goal of CLEVELAND ELECTRONICS to sell TRS-80 computers and peripherals at the 
lowest prices in the WORLD. We ask that you call other dealers, check your local Radio Shack store and 
mail order houses and then call us LAST (Toll Free, of course). We think that you will be pleasantly sur- 
prised. 

So... give us a call TODAY! 



WE NOW SELL - EPSON 



miminmm Hmimiu" 




FOR TOLL FREE ORDERING 
AND PRICE QUOTES, CALL: 

1-800-771-7896 
CLEVELAND ELECTRONICS 



121 BROADWAY 
CLEVELAND, OK. 74020 

1 -800-55 1-5896 



TRS-80 MODEL III 

IN STOCK 




northern Alaska. It's shorter, 
isn't it! 

Most normal radio propaga- 
tion follows the shortest path, 
otherwise known as the Great 
Circle Path. Some infrequent 
propagation anomalies do not 
follow this rule. Propagation 
Prediction provides both the op- 
timum beam heading and path 
length for any Great Circle Path. 

Maximum Usable 
Frequency (MUF) 

The Maximum Usable Fre- 
quency, often referred to as the 

MUF, is the highest radio fre- 
quency which the ionosphere re- 
flects on any given Great Circle 
Path. If you operate (or listen, in 
the case of a shortwave listener) 
on a frequency or band lower 
than the MUF, the reflection dis- 
tance, better known as the skip 
distance, would decrease. Sig- 
nal strengths tend to be weaker 
since radio wave absorption in- 
creases as the frequency se- 
lected is decreased from the 
MUF. 

If you select a frequency 
higher than the MUF your trans- 
mitted radio signal is not 
reflected back to earth by the 
ionosphere, but travels out into 
space. For example, suppose the 
MUF for the East coast (your 
location) to the West coast path 
is 29 MHz (Megahertz). The 
strongest West coast signals 
would be found on the ten meter 
band (28-29 MHz). If you listen on 
the next higher band, six meters 
(50 MHz), no signals from the 
West coast would be heard. Six 
meters far exceeds the 29 MHz 
MUF. If you then tune down to 15 
meters you would notice that the 
strongest signals originate from 



stations closer than the West 
Coast. West Coast stations, if 
any, would be weaker than those 
you hear on 10 meters. If you 
then tune down even further in 
frequency, say to 40 or 80 meters, 
you hear few if any distant sta- 
tions due to excessive radio 
wave absorption. 

For any given path, the strong- 
est signal will be at or just below 
the MUF for that path. Different 



plex nature of radio wave propa- 
gation. No one really under- 
stands how the complex solar 
activity variations affect propa- 
gation on a daily basis. Nor can 
anyone predict what the solar 
activity is really going to do 
before it happens, so we must 
rely on trends of activity. This is 
why predictions are based on 
smoothed solar activity and why 
you must enter into the program 



'Most normal radio propagation 

follows the shortest path, 

otherwise known as 

the Great Circle Path." 



paths have different MUFs. The 
MUF for each path varies with 
respect to diurnal variations (the 
time of day), seasonal variations, 
and solar cycle variations. Prop- 
agation Prediction takes all three 
variations into account when dis- 
playing an MUF chart for any 
path selection. 

The MUF is a predicted value, 
not measured or observed. In 
scientific terms, the MUF is a 
probabilistic function having a 
50 percent probability of occur- 
ence. In other words, there is a 
50 percent chance of the actual 
observed MUF being at least as 
high as the predicted value. It 
can be and often is one to five 
MHz higher. But there is also a 50 
percent chance that the actual 
MUF is lower than predicted 
again by one to five MHz. This 50 
percent factor is due to the com- 



the solar flux for the seven days 
preceding a prediction. 

Solar Flux/Sunspot Numbers 

There are two world stan- 
dards for monitoring and record- 
ing solar activity: Zurich Sun- 
spot Numbers and Solar Flux 
Numbers. Linear relationships 
exist between smoothed Sun- 
spot Numbers, Solar Flux Num- 
bers, and Ultraviolet Radiation 
(U V) emanating from the sun. UV 
radiation ionizes (charges) the 
ionosphere, which is responsi- 
ble for reflecting radio waves. In- 
tense UV radiation ionizes the 
ionosphere more than weak UV 
radiation. The level of ionization 
in turn determines the MUF; 
high ionization levels mean high 
MUFs. With these series of inter- 
actions, you can predict the 
MUF by observing the solar ac- 



tivity. Of the two solar activity 
standards the average hobbyist 
can obtain only one on a daily 
basis— the Solar Flux. There- 
fore, the program uses Solar 
Flux for calculating and plotting 
MUFs. 

A-lndexVK-lndex 

The A-lndex is a standard 
scale used in measuring and 
recording the earth's geomag- 
netic field on a daily basis. 
Events on the sun influence the 
field, which in turn affects prop- 
agation of radio waves. A high 
A-lndex (greater than 15), usu- 
ally referred to as active or 
storm conditions, will generally 
suppress any east-west and nor- 
therly path MUFs below what 
the program predicts. However, 
MUFs will rarely be suppressed 
on any north to south paths. 
During the onset of or im- 
mediately after an active to 
storm level period, north-south 
MUFs are often enhanced. East 
to west or northerly MUFs will 
be highest during periods of low 
A-lndices (referred to as quiet 
conditions). 

The K-lndex is similar to the 
A-lndex, except measurements 
of the field are taken every six 
hours. This provides intra-day 
geomagnetic field trends. High 
K-lndices for the day will result 
in a high A-lndex for the same 
day. A sharp increase in the 
K-lndex (from two to six) in- 
dicates the beginning of active 
to storm level conditions. 

WWV Broadcasts 

The Solar Flux numbers re- 
quired to run the program are 

broadcast daily by WWV from 
Boulder, CO, on 5, 10, 15 and 20 
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Figure 1d 



Level IV Products, Inc. 
Is Expanding Again! 

3 Locations To Serve You... 



HEADQUARTERS 


LEVEL IV 


RADIO SHACK* 


DIVISION 


COMPUTER CENTER 


DEALER STORE #P-130 


32429 Schoolcraft Road 


182 North 20th Street 


134 South Front 


Livonia, Michigan 48150 


Battle Creek, Michigan 49015 


Dowagiac, Michigan 49047 


313/525-6200 


616/963-2212 


616/782-6600 



Our Purchasing Power, ($5 Million plus Gross Sales) allows us to offer the best of RADIO 

SHACK*, as well as other popular Hardware and Software at the 

LOWEST DISCOUNT PRICES AVAILABLE! 

OUR POLICY IS THAT IF WE SELL IT... WE ALSO SERVICE IT! 

CALL US TOLL FREE IF YOU DON'T SEE THE ITEM YOU'RE LOOKING FOR 



TYPICAL PRICES (PARTIAL LISTING) ■■ 

TRS 80* Color Computer, 32K w/ext. Bas 499.00 

TRS 80* Mod III, 48K w/1-40 TR Drive 1589.00 

TRS 80* MOD II, 64K w/1-8" Drive 3375.00 

TRS 80* MOD 16, 128K w/1 -Double 8" Drive CALL 

TRS 80* MOD III, 6.4MEG Winchester Drive 2795.00 

5W" Add on Drives for MOD I, III, Color, etc from 228.00 

8" Add on Drives for MOD II, MOD 16 from 540.00 

Printers, Radio Shack*, Epson, Citoh, etc CALL 

Technical Service (7 technicians on staff) 24.00/hour 

UPGRADE YOUR PRESENT COMPUTER CALL FOR A QUOTE! 



WARRANTY POLICY: 

The Radio Shack' 90 Day Warranty requires 
construction from Radio Shack* Supplied 
components, at slightly higher prices 

Equipment containing non-R/S components is 
covered by our 6 month parts and labor warranty. 

Inquire when ordering to ascertain your coverage. 



TERMS OF SALE: 

We allow a 2% discount for cash pre-paid 

orders, personal checks require 2 weeksforbank 

clearance. 

VISA, Master Charge and COD orders accepted, 

deposits are required for all special order and 

assembly items 



DEALER'S NOTE Some key areas are still available for both re-sale 
and servicing dealerships, contact our Headquarters Division for 
Details. 



SHIPPING: 

Foreign orders and large items shipped best-way 
frieght collect most others are shipped promptly 
from stock via UPS add 1.5% or $2 50 minimum, 
and $1.50 if COD 



TOLL FREE ORDER HOT LINE 
800-521-3305 



HARDWARE/SOFTWARE 

Service Line 

313 / 525-6200 



Your One Stop Computer Shopping Center 



'TRADE MARK OF TANDY CORPORATION 



.'See ( is! o! Advertisers on page 386 
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Hardware & 

Software 

at discount 

prices. 



RADIO SHACK 



Lis! Price 



26-1066 Mod III. 48 K. 2-Disk 2,495 00 

26-1062 Mod ill. 16 K 999.00 

26-1906 Invasion Force (T) 14 95 

26-1590SuperScnpset(D) 199.00 

26-1591 Scnpset Dictionary (D) 149.00 

26-1569 Mod III Visicalc(O) 199.00 

26-1592 Profile III Plus 199.00 

ADVENTURE INTERNATIONAL 

Star Trek 3.5 (T) 14.95 

Space intruders (T) 14.95 

Maxi Manager (D) 99.95 

Star Fiahter (T) 24.95 

BIG FIVE SOFTWARE 

Robot Attack (T) 15.95 

Cosmic Fighter (T) 15 95 

Attack Force (T) 15.95 

Super Nova (T) 15 95 

(T) = Cassette Tipe (D) = Disk 



OUR PRICE 

2,100.00 

849.00 

11.85 
155.00 
119.20 
155.00 
155.00 



11.95 
11.95 
79.95 

19.95 



12.75 
12.75 
12.75 
12.75 



We represent 20+ mfgrs with 300+ programs. Write for our FREE catalog for 
Mod II, Mod III and Color Computer 

COMPUTER HOUSE 

P.O. Box 538 Mammoth Lakes, CA 93546 

(714) 934-6538 

Orders less lhan $100 00 add $1 50 lor postage and handling Over $100.00 shipped free 
MC & VISA , 



•TRS-80 is a trademark of Tandy Corp 
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A 



fc!L_ 

■ for treasure to put a little adventure 

in your life . . . We're selling Adventure™ 

Software at a special 1 /3 off the retail price. 

18 titles to choose from, in TRS-80 tapes and 

disks or Apple disks. Jazz up your microcomputing 

while the price is right . . now! 





Retail 


Our Price 


Al) Land/Pirate/Mission 


$39.95 


$26.77 


R Pirate's Adventure 


S19.95 


5:3. 37 


R Mission Impossible 


$19.95 


SI 3.37 


R Voodoo Castle 


S19.95 


$13.37 


AD Voodoo/Count/Odyssey 


S39.95 


$26.77 


RD Voodoo/Count/Odyssey 


S39.95 


526.77 


R rhe Count 


S19.95 


$13.37 


R Strange Odyssey 


S19.95 


S13.37 


R Mystery Funhouse 


S19.95 


513.37 


AD Mystery/Pyramid/Ghost 


$39.95 


$26.77 


RD Mystery/Pyramid/Ghost 


S39.95 


$26.77 


R Ghost Town 


$19.95 


S13.37 


RO Star Trek 


SI 9.95 


$13.37 


R Kid Ventures 


S14.95 


$10.02 


R Galactic Empire 


$14.95 


$10.02 


RD Galactic Empire 


$19.95 


$13.37 


RD Galactic Trilogy 


$39.95 


$26.77 


RD Six Micro Stories 


S14.95 


$10.02 


RD Local Call for Death 


S19.95 


$13.37 


RD 2 Heads of the Coin 


$19.95 


$13.37 


RD Savage Island 


520.95 


$14.04 


RD Savage Island 


S20.95 


$14.04 



.■ 540 



ELECTRONICS 



61 LOWELL RD 
HUDSON, NH 03051 

603-883-5005 

OPEN DAILY 10-6 SUNDAY 12-5 



R TRS-80 tape 
RD- TRS-80 disk 
AD ■■ Apple disk 



MHz at 18 minutes after every 
hour. WWV's signals are usually 
readable in all of North America 
even with an inexpensive short- 
wave receiver. Depending on the 
time of day, season, and solar 
activity, one of the four broad- 
cast frequencies will be much 
stronger than the others. If 
reception is poor on one fre- 
quency, try another or try listen- 
ing at a different time of day. 
Better yet, use the program to 
determine which is best. 

The Solar Flux number, A- 
Index and solar forecast are up- 
dated once a day at 0018 UT 
(Universal Time). The K-lndex is 
updated every six hours starting 
at 0018 UT. Plotting the Solar 
Flux and A-lndex WWV broad- 
casts will provide insight into 
solar activity trends, both short 
and long term. 

Universal Time 

Universal Time (UT), the 

world's standard time, is based 
on a 24-hour system where 0000 
UT is midnight in England. Other 
names for the same include: 
UTC; GMT; and ZULU. If a 24- 
hour digital clock is not avail- 
able I suggest buying one; other- 
wise, you must convert from UT 
to local time. A good 24-hour 
digital clock will only cost about 
$10-24. WWV broadcasts the 



Universal Time every minute; 
use it to set your 24-hour clock. 

Prediction Complexity 

The explanations I have pre- 
sented are simplifications of a 
very complex phenomenon known 
as radio wave propagation. 
There is much to be said for ob- 
serving solar activity and its re- 
lationship with MUFs. A little ex- 
perience will allow good under- 
standing of the MUF charts the 
program displays. Although not 
necessary to use the program, 
further reading will provide you 
with better insights into the pro- 
gram. The ARRL Radio Amateur's 
Handbook available from most 
electronic hobbyist stored 
would be a very good starting 
place. The better you under- 
stand the complex nature of 
propagation, the more accurate 
you can read the MUF charts the 
program plots. 

The Program 

Lines 10-460 prompt for in- 
puts, set titles and set variables. 
The program prompts you for: 
month; day; solar flux; location 
input option; QTH; QTH latitude 
and longitude; DX locations; DX 
latitude and longitude; and 
another path. 

Lines 470-680 are a prepro- 
grammed location subroutine. 



Place recorder in play position, CLOAD tape and then RUN. 

Enter the month number. 11. 

Enter the day number. 15. 

Enter the following flux numbers (seven days) upon program prompts: 186, 195. 205. 

214, 20? 200, 198 
Select location input option. 1. 
Enter location by number. 16 (London). 
The program will now display ""COMPUTING***. After about two minutes it will 

display the propagation chart. 

Figure 2 
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Locations contained within Data 
statements are displayed on the 
screen with corresponding num- 
bers. The program searches 
Data statements for the loca- 
tion, reading in the correspond- 
ing latitude and longitude. Data 
line 570 is reserved for your loca- 
tion data (name, latitude and 
longitude); be sure to enter that. 
CSAVE your personal version 



for later use. Presently, Data 
statement 570 has my location 
for demonstrating the program. 
You can alter any or all of the 
programmed data lines. 

Lines 690-900 set variables 
used in calculating the propaga- 
tion chart. They change the aver- 
age solar flux to a sunspot num- 
ber. They calculate the distance 
in radians, kilometers and nauti- 



Program Listing 

10 .. * * * PROPAGATION PREDICTION PROGRAM * * * * 

20 REV 2.0 , LII , 16K , J.D.CHIPHAN , WAlKYH , 9/25/81 

30 '* * * * MAIN PROGRAM * * * * ' ' 

40 CLEAR 200:DIMMF(25) :CLS 

50 X=0:SF=0:RC=57.296 

60 AA$="NORTH LATITUDE" :AB$="-90 TO 90" 

70 AC$="WEST LONGITUDE* :ADS="-180 TO 180" 

80 MNS="JANFEBMARAPRMAYJUNJULAUGSEPOCTNOVDEC" 

90 CLS: PRINT? 20, "PROPAGATION PREDICTION" :X=X+1 

100 PRINTSTRINGS(63,"*") :PRINT 

110 ONXGOTO120,160,180,260,320,3 80 

120 INPUT-ENTER THE MONTH NUMBER (1 TO 12)";MN 

130 IFMN<1ORMN>12THEN1810 

140 MM=(MN-1)*3+1 

15 GOTO90 

160 INPUT-ENTER THE DAY NUMBER (1 TO 31)";DN 

170 IFDN<1ORDN>31THEN1840ELSE90 

180 PRINT0192, "ENTER THE SOLAR FLUX FOR THE PAST 7 DAYS" 

190 FORZ=1T07:PRINT@(192+64*Z) , "TYPE IN THE FLUX NUMBER FOR 

fZ 

200 INPUTFX:IFFX<60THEN1860 

210 IFFX>400THEN1880 

220 PRINT@(234+64*Z) ,FX:SF=SF+FX :NEXTZ 

230 SF=INT(SF/7+.5) 

240 INPUT-ARE THE FLUX NUMBERS CORRECT. (YES/NO) " -OS 

250 IFQS="YES"ORQS="Y"THEN90ELSE180 

260 PRINT"SELECT LOCATION INPUT OPTION" 

270 PRINT"1 - PREPROGRAMED LOCATIONS" 

280 PRINT"2 - MANUAL LOCATION ENTRY" 

290 INPUTQ:IFQ<1ORQ>2THEN1900 

300 IFQ=1GOSUB470:X=X+2:GOTO430 

310 GOTO90 

320 PRINT'ENTER YOUR QTH" : INPUTHNS 

330 PRINT-ENTER IN DEGREES, YOUR : " : PRINTAAS; ABS 

340 INPUTLT:IFABS(LT) >90THEN1910 

350 PRINTAC$;AD$:INPUTWT 

360 IFABS(WT)>180THEN1940 

370 GOTO90 

380 PRINT'ENTER THE DX ' S QTH" : INPUTDXS 

390 PRINT-ENTER IN DEGREES, THE DX ' S :": PRINTAAS; ABS 

400 INPUTLR:IFABS(LR) >90THEN1910 

410 PRINTAC$;ADS:INPUTWR 

420 IFABS(WR)>180THEN1940 

430 GOSUB690 

440 PRINT@970 , "ANOTHER PATH YES/NO" ; 

450 INPUTQS:IFQ$="Y"ORQS="YES"THENX:O:GOTO90 

460 END 

470 REM * * * * PREPROGRAMED LOCATIONS * * * * 

480 CLS: PRINT'ENTER THE DX LOCATION BY NUMBER" 

490 READHNS,LT,WT:PRINT"FROM ";HNS 

500 PRINTSTRINGS163,"*") 

510 FORZ=0TO29STEP3:FORY=0TO1:READDX$»DD,DU 

520 PRINTTAB(Y*21) Z+Y+l;" - " ;DX$; : NEXTY: READDXS ,DD,DU 

53 PRINTTAB( 42) Z+Y+l;" - " ;DXS:NEXTZ : RESTORE 

540 PRINTSTRINGS(63,"*") : INPUTQ 

5 50 FORZ=lTOQ+l:READDXS,LR,WR:NEXTZ 
560 RESTORE 

570 DATA"BOSTON",42,71 

580 DATA"MIAMI",26,81,"SAN ANTONIO" , 29 ,98, "SEATTLE" , 47 ,123 

590 DATA"QUITO",-l,78,"LIMA",-12,77,"SAO PAULO" ,-24 ,45 

600 DATA"SAN FRANCISCO" , 37 , 1 22 , "ANCHORAGE" , 62 , 150 , "CARACAS" 

1 

610 DATA-BUENOS AIRES" ,-35 , 58 , "TOKYO" , 36 ,-140 , "SYDNEY" ,-35 , 

6 20 DATA'TAHITI ",-18,150, "HONOLULU" , 22 ,157 , "MANILA" ,15,-120 
630 DATA"LONDON",52,0,"ROME",42,-12,"MADRID",41,4 

640 DATA-MADAGASCAR", -18, -50, "LIBERIA", 8, 10, "FT LAMY, CHAD" 

16 

650 DATA-CANARY IS .", 25 , 16 , "CAIRO" , 30 ,-33 , "CAPETOWN" ,-35 ,-2 

66 DATA'MOSCOW", 56, -37, "STOCKHOLM ",58, -18, "ATHENS ",37, -24 

670 DATA-HONG KONG" , 23 ,-114 , -SINGAPORE" , 2 ,-104 , "RIYADH" , 24 , 

6 80 RETURN 

6 90 REM ***** MUF ROUTINE ****** 

700 RT=10:EX=9:NT=1.5:SR=250:F0=6:F1=58:PI=3.1415:LG=0 

710 CLS:PRINTCHRS(23) :PRINT"*** COMPUTING MUF ***" 

7 20 LR ( 1 ) =LR : LT ( 1 ) =LT : WR ( 1 ) =WR : WT ( 1 ) =WT 
730 LR=LR*PI/180:LT=LT*PI/180 

740 WR=WR*PI/180:WT=WT*PI/180 

750 WO=WT-PI 

760 SN=(SF-70)/.63 

770 SN-INT(SN+.5) 

7 80 AL=COS ( LT) *COS ( LR) *COS ( ABS (WT-WR) ) +COS ( ABS ( LT-LR) ) -COS ( 

OS(LR 

7 



,66,1 
-150 



rl2,- 



AL=ATN ( SQR ( 1-AL*AL) /AL) 

800 IFSGN(AL)=-1THENAL=PI+AL 

810 DM=INT(AL*3956.834+.5) 

820 DK=INT(DM*1.6093+.5) 

830 HD=(SIN(LR)-SIN(LT) *COS ( AL) ) / ( SIN ( AL) *COS(LT) ) 

840 HD=ATN(SQR(1-HD*HD)/HD) 

850 IFSGN(HD) =>0ANDSGN ( SIN (WT-WR) ) =>0THEN890 

860 IFSGN(HD)<0ANDSGN(SIN(WT-WR) ) =>0THENHD=PI+HD :GOTO890 



Program continues 
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Program continued 

870 IFSGN(HD) <0ANDSGN( SIN (WT-WR) ) <0THENHD=PI~HD : GOTO890 

880 HD=2*PI-HD 

890 HD(l)=INT(HD*RC+.5) 

900 NH=INT( (AL*5/PI)+1) 

910 N=l 

920 IFNH>1THENN=2 

930 PRINT:PRINTTAB(1) "UT";TAB(10) ; "MUF"; 

940 REM DO FOR TO 23 HOURS 

950 FORUT=0TO23 

96 MF(UT)«60 

970 FORI T=l TON 

980 IFIT=1THENDF=1/(NH*2) :GOTO1000 

990 DF=1-1/(NH*2) 

1000 NL=(SIN(AL*(1-DF) )*SIN(LT)+SIN(AL*DF)*SIN(LR))/SIN(AL) 

1010 NL=ATN(NL/SQR(1-NL*NL) ) 

1020 NN»NL*57.296 

1030 IFIT=1THENWL=WT+SIN(WR-WT) *AL*DF : GOTO1080 

1040 WL=WR+SIN(WT-WR)*AL/(NH*2) 

1050 IFABS(WL)<=PITHEN1080 

1060 IFSGN(WL) =-lTHENWL=PI-ABS(PI+WL) :GOTO1080 

1070 WL=-PI+ABS(PI-WL) 

1080 TA=.0172*(3 0.4*(MN-1)+DN+10) 

1090 TB=.409*COS(TA) 

1100 LN=12+.13*(SIN(TA)+1.2*SIN(2*TA)) 

1110 TN»WL*3.82+LN 

1120 IFTN<0THENTN=TN+24 

1130 IFTN>24THENTN=TN-24 

1140 DT=(-.26+SIN(TB)-SIN(NL) ) / (COS (TB) *COS (NL) ) 

1150 IFABS(DT) >1-1E-5THENDT=1-1E~5 

116 DT-(24/PI) *(-ATN(DT/SQR(l-DT*DT) ) +PI/2) 

1170 LD=LN-DT/2:LS=LN+DT/2 

1180 TD=TN-DT/2:TS=TN+DT/2 

1190 IFTD<0THENTD=TD+24 

1200 IFTD>24THENTD=TD-24 

1210 IFTS<0THENTS=TS+24 

1220 IFTS>24THENTS=TS-24 

1230 NR=NE*NT[XN 

1240 XN=ABS(COS(NL+TB)) 

1250 IFIT=lTHENNX=XN 

1260 DR=RT*XN[EX 

1270 NR=NT/EXP(-(DT/20) ) 

1280 BT=PI*DR/DT 

1290 XS=(XN/(1+BT*BT) ) *BT* ( 1+EXP ( -DT/NR) ) 

1300 LO=UT-WL-3.82 

1310 IFLO<0THENLO=24+LO 

1320 IFLO>24THENLO=LO-24 

1330 IF(LO<LD)OR(LO>LS)THEN1390 

1340 AP=PI*(LO-LD)/DT 

13 5 XD= ( XN/ ( 1+BT*BT) ) * ( SIN ( AP) +BT« ( EXP ( - ( ( LN-LD) /DR) ) -COS ( AP) ) ) 
1360 XA=XS*EXP( (DT-24J/NR) 

1370 IFXD<XATHENXE=XA:GOTO1420 

1380 XE=XD:GOTO1420 

1390 IFLO>LSTHENXM=XS*EXP(-(LO-LS)/NR) :GOTO1410 

1400 XM=XS*EXP(-(LO+24-LS)/NR) 

1410 XE=XH 

1420 FO=(1+SN/SR)*SQR(F0+F1*SQR(XE) ) 

1430 FH=.75*COS(NX+.5)+.5 

14 40 FS=1-.1*(1+SGN(ABS(SIN(NL-PI/12) ) -COS ( NL-PI/12) ) ) 
1450 FT=l+(l-SGN(LT)*SGN(LR))*.l 

1460 IFAL>PI/5THENLG=PI/5 

1470 M=(1+2.5*(SIN(LG*2.5)) [ 1 . 5) *FH*FS*FT 

1480 MF=FO*M 

1490 IFMF<MF(UT)THENMF(UT)=MF 

1500 NEXTIT 

1510 PRINT§256,UT; : PRINT@27 4 ,HF ( UT) ; 

1520 NEXTUT 

1530 HF(24)=HF(0) 

1540 REM * * * * SCREEN DISPLAY * * * * 

15 50 CLS:PRINTe4,"5 0";:PRINT@6 8,"4 8"; 
156 PRINT §13 2, "4 2";: PRINT @1 96," 36"; 

1570 FOR Z-l TO 9:X=31-3*Z:PRINT@(195+64*Z) ,X;:NEXTZ 

1580 FOR Z-l TO ll:FOR X=ll TO 27 STEP4 : PRINT@ ( 64*Z+X) ,"+";: NEXT 

X:NEXTZ 

1590 FOR Z=0 TO 38:SET(13,Z) :SET(63,Z) :NEXTZ 

1600 FOR Z=13 TO 63:SET(Z,0) :SET(Z,38) rNEXTZ 

1610 PRINTe839,"0";:PRINTe843,"4";:PRINTe847,"8";:PRINTg851, 
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.,"12" 

PRINTg855,"16";:PRINTe859,"20";:PRINT@863,"24 UT" ; 

PRINTe226,"M";:PRINTg290,"U"; : PRINT3354 , "F" ; 

PRINT§40,"MUF CHART" ;:PRINTgl04, "DATE ";DN;" " ;MID$ (MN$ ,MM, 

PRINTei68,"FROM " ;HN$; : PRINT@234 , "N . LAT. " ;LT ( 1) ; "DEG" ; 
PRINTg298,"W. LONG. " ;WT (1) ; "DEG" ; : PRINT§360 , "TO ";DX$; 
PRINT@426,"N. LAT. " ; LR ( 1) ; "DEG" ; : PRINT0490 , "W. LONG. ";WR( 
DEG") 

PRINTg552,"BEAM HEADING " ;HD ( 1) ; "DEC" ;: PRINT@616 , "PATH LENG 
;DK; "KM"; 

PRINT§680,"NO. OF SKIPS " jNH) : PRINTS744 , "SOLAR FLUX ";SF; 

PRINT§808,"SUNSPOT NO. ";SN; 

Z=15:Y=3 

FOR UT=0 TO 24:F=INT(MF(UT)+.5) 

IF F>30 THEN F=30+INT ( (F-30) /2) : IF F>41 THEN F=41 

IF UT=0 THEN 17 80 

IF F<Y THEN 1770 

FOR Q=(41-F)TO(41-Y) :SET(Z-1,Q) : NEXTQ: GOT017 80 

FOR Q=(41-Y)TO(41-F) :SET(Z-1,Q) : NEXT Q 

SET(Z,41-F) 

SET(Z-1,41-F) :Y=FtZ=Z+2:NEXTUT 

RETURN 

REM * * * * ERROR MESSAGES * * * * 

PRINT'MONTH NUMBER MUST BE A WHOLE NUMBER FROM 1 TO 12" 

PRINT'WHERE JANUARY IS 1 AND DECEMBER IS 12":GOTO120 

PRINT'THE DAY NUMBER MUST BE A WHOLE NUMBER FROM 1 TO 31* 

GOTO160 

PRINT'THE SOLAR FLUX NUMBER MUST BE GREATER THAN 60" 

GOTO200 

PRINT'A SOLAR FLUX NUMBER GREATER THAN 400 IS" 

PRINT'UNREALISTICALLY HIGH * :GOTO200 

PRINT'ENTER EITHER A 1 OR A 2 PLEASE" :GOTO290 

PRINT'THE LATITUDE MUST BE FROM -90 TO 90 WHERE;" 

PRINT"-90 IS THE SOUTH POLE AND 90 IS THE NORTH POLE" 

IFX=5THEN33 0ELSE3 90 

PRINT'THE LONGITUDE MUST BE FROM -180 TO 180 WHERE;" 

PRINT"- DEGREES ARE IN THE EASTERN HEMISHERE AND +" 

PRINT'DEGREES ARE IN THE WESTERN HEMISPHERE" 

IFX=5THEN350ELSE410 



cal miles to the DX location, 
beam heading in degrees to the 
DX location, and number of 
radio skips to the DX location. 

Lines 910-1530 calculate the 
MUF for 0-23 hours via loop UT. 
If the number of skips is greater 
than one, the MUF is calculated 
for each end of the Great Circle 
Path via loop IT (for iteration). In 
this case, line 1490 selects the 
lesser of the two calculated 
MUFs. Each hour's MUF is 
stored in the array MF (UT). 

Lines 1540-1800 contain a 
subroutine to display the re- 
sults. Lines 1710-1790 draw the 
plot. Lines 1540-1700 display 
associated information (titles, 
distance, headings, and so on). 

Lines 1810-1970 contain error 
trapping subroutines for each 
prompted input. 

A Sample Program 

Once you have entered Prop- 
agation Prediction, try this 
sample run to verify proper 
operation. Enter the data shown 
in Fig. 2, and examine the MUF 
chart for the two-hop path to 
London. Figure 3 shows the 
screen printout of this path. 
Notice that the graph's vertical 
scale on the left side is fre- 
quency in MHz and the hori- 
zontal scale is Universal Time in 
hours. The chart provides one 
plotted point per hour. 

In this example the highest 
plotted MUF of the day is about 
1300 UT, reaching 42 MHz. 
England's BBC-1 tv audio may 
be heard on 41.25 MHz between 
1230 to 1430 UT. The lowest 
MUF of the day is from 2100 to 
0900 UT. This is the best time to 
listen on the lower bands for 
western Europe. Ten meters 
(28-29.5 MHz) is best for the 
western Europe path from about 
1130 to 1730 UT. 

To determine the best times 
and frequencies, simply follow 
along the curve observing the 
MUF versus time. Remember, 
the best operating times are 
when the desired operating fre- 
quency is at or just below the 
MUF curve. 

Notice that the highest MUF 
of the day is during noon, at the 
midpoint of the path. The lowest 
MUF of the day is just before 
sunrise at the most easterly end 
of the path (around 1330 UT), in 



this case Europe since sunrise 
is 5-6 hours earlier than on the 
US east coast. Rapid increases 
in the MUF occur after sunrise 
at the most westerly end of the 
path (in this case, about 6:30- 
7:00 am local time (1100 UT)). 
Rapid decline of the MUF oc- 
curs after sunset at the most 
easterly end of the path, about 
1800 UT in Europe. The rate of 
the MUF curve's decline is 
slower than its incline. This is 
due to the physics of the 
ionosphere. 

Conclusions 

I have described a program 
for the prediction of radio prop- 
agation which the average 
ham, shortwave listener (SWLs) 
or even CB DXer can use. The 
obvious advantage of this pro- 
gram is the user's ability to 
select the best times and fre- 
quencies for scheduled con- 
tacts, DX chasing, and contest- 
ing. Imagine the advantage you 
could have at the start of the 
next DX contest knowing when 
to operate and where to aim 
your antenna. 

The program also carries an 
educational value with it. By 
entering different levels of solar 
flux, changing the time of year, 
or selecting different paths, you 
can gain a great deal of insight 
into the phenomenon known as 
HF radio wave propagation. 
With enough use you could even 
become a propagation wizard 
within your locale, explaining to 
others how the seasonal, diur- 
nal, and solar cycles affect the 
band conditions. 

The program shown in the list- 
ing (Version 2.0) is an ab- 
breviated version of a longer ver- 
sion (2.1). Version 2.1 includes 
instructions and definitions for 
reference, both screen print and 
LPRINT options, an auto-scal- 
ing MUF chart option, and a 
numeric MUF table display op- 
tion. This version also includes 
numerous Remark statements 
throughout the listing to aid in 
program customization. Version 
2.1 is available from the author 
postpaid on a high quality tape 
for $19.95. ■ 

Mr. Chipman, an engineer at 
GTE, is a ham radio operator and 
computer hobbyist. 
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QUALITY SOFTWARE FOR TRS-80 COLOR AND OSI 
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ADVENTURES!!! 
For TRS-80 COLOR and OSI. These Ad- 
ventures are written in BASIC, are full fea- 
tured, fast action, full plotted adventures 
that take 30-50 hours to play. (Adventures 
are inter-active fantasies. It's like reading 
a bock except that you are the main char- 
acter as you give the computer commands 
like "Look in the Coffin" and "Light the 
torch.") 

Adventures require 16K on COLOR-80 and 
TRS-80. They sell for $14.95 each. 

ESCAPE FROM MARS 
(by Rodger Olsen) 
This ADVENTURE takes place on the RED 
PLANET. You'll have to explore a Martian 
city and deal with possibly hostile aliens to 
survive this one. A good first adventure. 

PYRAMID (by Rodger Olsen) 
This is our most challenging ADVENTURE. 
It is a treasure hunt in a pyramid full of 

problems. Exciting and tough! 

TREK ADVENTURE (by Bob Retelle) 
This one takes place aboard a familiar star- 
ship. The crew has left for good reasons — 
but they forgol to take you, ana now you 
are in deep trouble. 

NEW!! 

CIRCLE WORLD - We got Kzimi and 

puppeteers and problems. Our newest and 
biggest adventure. Requires 12k on OSI and 
16K on TRS-80 Color. 

NUCLEAR SUB - You are trapped in a 
nuclear sub at the bottom of the ocean. 
Escape and even survival is in doubt. Plotted 
by three of the most sadistic - I mean 
"creative" minds in adventure programming. 




VENTURER !-A fast action all machine code 
Arcade game that feels like an adventure. Go 

berserk as you sneak past the DREADED HALL 
MONSTERS to gather treasure in room after 

room, killing the NASTIES as you go. Great 
color, high res graphics, sound and Joystick game 
for the TRS-80 Color or OSI machines, (black 
and white and silent on OSI.) Tape only $19.95. 

BASIC THAT ZOOOMMS!! 

AT LAST AN AFFORDABLE COMPILER FOR 
OSI AND TRS-80 COLOR MACHINES!!! The 
compiler allows you to write your programs in 
easy BASIC and then automatically generates a 
machine code equivalent that runs 50 to 150 
times faster. 

It does have some limitations. It takes at least 
8K of RAM to run the compiler and it does only 
support a subset of BASIC- about 20 commands 
including FOR, NEXT, END, GOSUB, GOTO, 
RETURN, END, PRINT, STOP, USR(X), PEEK, 
POKE, *, / , + , - , X , X , = , VARIABLE 
NAMES A-Z, A SUBSCRIPTED VARIABLE, 
and INTEGER NUMBERS FROM - 64K. 
TINY COMPILER is written in BASIC. It gener- 
ates native, relocatable 6502 or 6809 code. It 
comes with a 20 page manual and can be modi- 
fied or augmented by the user. $24.95 on tape 
or disk for OSI or TRS-80 Color. 

LABYRINTH - 16K EXTENDED COLOR 
BASIC — With amazing 3D graphics, you fight 

you' way through a maze facing real time mon- 
sters. The graphics are real enough to cause claus- 
trophobia. The most realistic game that I have 
ever seen on either system. $14.95. (8K on OSI) 




PROGRAMMERS! 

SEE YOUR PROGRAM IN THIS SPACE!! 
Aardvark traditionally . pays the highest com- 
missions in the industry and gives programs the 
widest possible coverage. Quality is the keyword. 
If your program is good and you want it pre- 
sented by the best, send it to Aardvark. 




QUEST A NEW IDEA IN ADVENTURE 
GAMES! Different from all the others. 
Quest is played on a computer generated 
map of Alesia. Your job is to gather men 
and supplies by combat, bargaining, explor- 
ation of ruins and temples and outright 
banditry. When your force is strong enough, 
you attack the Citadel of Moorlock in a 
life or death battle to the finish. Playable 
in 2 to 5 hours, this one is different every 
tune I6K COLOR-80 OR IMS 80. ONLY 
$14.95. 




SPACE ZAPPER - Protect your central 
Star Base from ships that attack from all 
four sides. Fast reflexes are required as the 
action speeds up. Great for kids or Dads. 
This game has high speed high resolution 
graphics and looks as if it just stepped out 
of the arcades. — 16K extended or 32K 
disk. BASIC TRS-80. Color only. $14.95. 



Please specify system on all orders 

This is only a partial listing of what we have to offer. We have arcade and 
thinking games, utilities and business programs for the OS1 and TRS-80 Color. 
We add new programs every week. Send $1.00 for our complete catalog. 
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AARDVARK -80 

2352 S. Commerce, Walled Lake, Ml 48088 

(313)669-3110 



OSI 
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■ See List ot Advertisers on page 386 
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REVIEW 



Microstat vs. Statistical Analysis. 



Statistical Analyses Analyzed 



Statistical Analysis 
Tandy/Radio Shack 
Cat. 26-4540 
Model II 
$99 

Microstat 

Ecosoft 

P.O. Box 68602 

Indianapolis, IN 46268 

Model II 

$250 

L H. Zincone 

1730 Beaumont Road 

Greenville, NC 27834 



Statistical analysis on micro- 
computers is rapidly be- 
coming competitive with the 
same type of analysis on main- 
frames. This is especially true 
where relatively small data sets 
are the norm. Moreover, statisti- 
cal analysis of business data by 
firms employing microcomput- 
ers is becoming more and more 
common. Consequently, a num- 
ber of general statistical analy- 
sis programs are now being mar- 
keted. The primary concern in 
the purchase of a statistical 
package is the content of that 
package and whether the com- 
putations and concepts are cor- 
rect. You should consider op- 
tions in data handling, price, the 
technical information available, 
format of the output, and cus- 
tomer service as important as- 
pects when choosing a package. 
These two packages contain 
common statistical procedures. 
Statistical Analysis runs under 
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TRSDOS 2.0A, while Microstat 
runs under Pickles and Trout 
CP/M and MBasic. Both man- 
uals were more than satisfac- 
tory, although the Shack manu- 
al is slicker and more tutorial. 
Both contained sample print- 
outs and were easy to follow. 
The Microstat package, how- 
ever, contains sample data 
which can be run to confirm the 
accuracy not only of the pro- 
grams, but of how the user is re- 
sponding to the prompts. This is 
an excellent feature which 
should be included in all 
packages. 

Data files in both packages 
are random access. Each con- 
tains a data handling utility al- 
lowing the creation of new files 
and the editing of old files. Mi- 
crostat allows the user to spec- 
ify the precision of the files, a 
desirable feature. I like Radio 
Shack's data entry better be- 
cause you can review an obser- 
vation and reenter it if there is an 
error. With Microstat's package, 
you must enter the entire data 
file and then edit it by observa- 
tion number; this is not as con- 
venient as reentering observa- 
tions before they are recorded. 
Microstat also claims to save ev- 
ery observation as it is input, al- 
though my disk drive did not run 
after entering every observation. 
Radio Shack did not provide a 
way to recover data if you acci- 
dentally depress Break. I looked 
in vain for a way to recover data 
in the Radio Shack manual, but 
was unable to find it. When one 



of my students accidentally hit 
Break during data entry, not even 
the CONT statement worked. 

In terms of entering data, the 
Radio Shack package is a little 
more convenient. However, this 
is more than offset by the ability 
to transform data available with 
Microstat. Anyone who deals 
with statistics, especially re- 
gression, knows that all rela- 
tionships are not linear, even 
though least squares regression 
works only with linear functions. 
Statisticians handle this situa- 
tion by transforming the data, 
say to logarithms or reciprocals, 
thereby enabling the analysis of 
nonlinear relationships. Also, it 
is sometimes easier to enter raw 
numbers and compute a vari- 
able from those raw numbers 
than to do the computations by 
hand. If, for example, you wish 
to use income per person as a 
variable, it is much easier to 
enter income and the population 
of a locality into the data file and 
then form the income/popula- 
tion variable through a transfor- 
mation than to make all of the 
divisions by hand or write a pro- 
gram to do them. The lack of the 
ability to transform variables in 
Statistical Analysis is a serious 
deficiency. 

A serious deficiency in Radio 
Shack's data handling utility is 
the lack of a satisfactory meth- 
od for subsetting observations 
in the data set. Radio Shack 
allows specifying up to ten 
values of a particular variable 
that the program uses to select 



observations for analysis. While 
this is better than nothing, it 
makes it difficult if you are deal- 
ing with a large data set and im- 
possible if you wish to subset on 
more than one variable. Micro- 
stat solves this problem by pro- 
viding file moving and merging 
utilities as well as a sorting utili- 
ty. While it is not as convenient 
as the mainframe packages, you 
can sort on multiple keys and 
then subset by either copying 
part of a file to another file or 
specifying that only certain 
observations in the sorted file 
be used. 

Both packages contain pro- 
grams for descriptive statistics 
(mean, standard deviation, 
range, and so on) and histo- 
grams. The Radio Shack pack- 
age has separate programs, 
while Microstat combines them. 
The Radio Shack package offers 
an option to let the computer de- 
termine the intervals based on 
the data, while Microstat re- 
quires the user to enter the low- 
er limits of each class. I prefer 
having the option of allowing 
the computer to compute the 
frequency and histogram inter- 
vals. It is simply more conve- 
nient not to have to run the de- 
scriptive statistics program to 
see the distribution of the data. 
More sophisticated researchers 
would probably like Microstat's 
program better, since it provides 
the sum of squares, the devia- 
tion sum of squares, and the 
first four moments about the 
mean. 



In addition to descriptive stat- 
istics and histograms, each 
package offers analysis of vari- 
ance, correlation analysis, re- 
gression analysis, and time-ser- 
ies analysis. In general, the pro- 
grams do what they are sup- 
posed to. Radio Shack's ANOVA 
offers one-way, randomized 
block and two-way, factorial de- 
sign while Microstat offers sim- 
ple one-way as well as the other 
two. Microstat's correlation pro- 
gram is more sophisticated in 
that it provides the sum-of- 
squares-and-crossproducts ma- 
trix as well as the variance- 
covariance matrix and the corre- 
lation matrix. Again, Microstat 
has added that extra touch 
which could be valuable to 
those doing more sophisticated 
research projects. 

The difference in sophistica- 
tion between the two programs 
shows up especially well when 
comparing the regression pack- 
ages. The Shack offers multiple 
regression in one subprogram 
and simple regression within 
the correlation program, a satis- 
factory arrangement. The re- 
gression is full model with com- 
plete analysis of the variance 
table. Unfortunately, it does not 
display (or apparently compute) 
the t ratios which indicate 
whether a particular coefficient 
is significantly different from 
zero. The user is left to do this 
from the output of the regres- 
sion slopes and their standard 
deviations. There is no Durbin- 
Watson statistic and no residual 
analysis. Microstat, on the other 
hand, offers both stepwise and 
full-model regression and pro- 
vides an option to compute and 
plot the residuals as well as the 
Durbin-Watson statistic. In my 
estimation, these are necessi- 
ties for serious research. 

Time-series analysis is pro- 
vided in both packages and both 
contain serious flaws. The 
Radio Shack package offers 
moving averages, analysis of 
seasonality based on the ratio 
of actual to moving averages, 
and a time-series regression 
program which is called Fore- 
casting. However, there is no 
way to combine the time-series 
regression and the seasonal in- 
dices to obtain a true forecast of 
a seasonal series. These indivi- 



dual programs are three of the 
component parts of a forecast- 
ing technique known as Classi- 
cal Decomposition. It amazes 
me that someone would go to 
the trouble of computing the 
time-series regression and the 
seasonal indices and not pro- 
vide a way that the two could be 
combined to forecast a season- 
al series. This is a serious flaw 
and renders the time-series 
package useless. 

Microstat provides moving 
averages, centered moving aver- 
ages, deseasonalization (or the 
computation of the seasonal in- 
dices), and simple exponential 
smoothing. However, they suc- 
ceed in frustrating the time- 
series forecaster again, since 
there is no way to compute the 
time-series trend, much less a 
way to combine the trend and 
the seasonal indices to com- 
pute a forecast. Worst of all, the 
program displays the prelimi- 
nary seasonal indices instead of 
final seasonal indices which are 
normalized so that their mean 
value is one. Simple exponential 
smoothing provides a way of 
predicting data without a trend 
and works as it is supposed to. 
Unfortunately, there is no com- 
putation of mean square errors 
or any other indication of fit, ef- 
fectively eliminating the use of 
the program in searching for the 
optimal smoothing constant. 
This again makes this part of the 
program effectively useless. 

The programs generally do 
their job, but the output from Mi- 
crostat is more sophisticated. 
The one exception to this is the 
time-series package which I re- 
gard, in both instances, as com- 
pletely inadequate. 

Programs contained in the 
Radio Shack package not in- 
cluded in Microstat are analysis 
of covariance, a test-scoring 
package and a random-sample 
generator. For those who use 
ANCOVAR, and those who do 
questionnaire research, these 
programs are quite valuable. Un- 
fortunately Radio Shack has 
made it impossible to use what 
would otherwise be quite a use- 
ful program to draw random 
samples from the data observa- 
tions. I can think of two uses: 
The first is to draw a small sam- 
ple from a large data set to anal- 



yze. This necessitates the stor- 
age of the selected sample on 
disk for later analysis. Unfortu- 
nately, no mechanism is provid- 
ed for such storage. Conse- 
quently, the samples are lost or 
the user must reenter the data 
for the selected observations. 
The other use, that of showing 
the students the effects of sam- 
pling error on various statistics, 
is equally frustrated by the fact 
that no statistics are computed 
for the samples. 

Programs which Microstat of- 
fers not available in the Radio 
Shack package include non- 
parametric statistics, factorials, 
permutations, combinations, 
several probability distribu- 
tions, and test for differing pro- 
portions and means. The impor- 
tance of these programs again 
is determined by what your ap- 
plications are. 

In the final analysis, a pack- 
age is only as good as its reli- 
ability and customer service. In 
using Microstat, there were 
three problems which I encoun- 
tered—an illegal function call, a 



hang-up when I tried to go to the 
printer in the probability distri- 
bution program, and the failure 
to read a double-precision file in 
the descriptive statistics pro- 
gram. I notified Ecosoft of the 
first two problems (the third oc- 
curred the day before this writ- 
ing). They asked me to return my 
disk for an updated version. 
While it took them about three 
weeks to return the new version, 
I am happy to report that the 
package is now working fine. 

In summary, the Radio Shack 
package, although not as so- 
phisticated as Microstat, per- 
formed as it was supposed to 
with no errors. Microstat, on the 
other hand, had errors which 
were satisfactorily remedied. 
The Radio Shack package is cer- 
tainly a bargain for the price if 
one can live with its limitations. 
But for those users who require 
more sophisticated types of 
analysis and data handling ca- 
pability, especially if one al- 
ready owns CP/M and MBasic, 
the Microstat package is worth 
the extra money. ■ 



COLOR COMPUTER USERS 

THE POWERFUL FLEX DISK OPERATING SYSTEM WITH 
HUNDREDS OF SOFTWARE PACKAGES IS NOW AVAILABLE! 



Now you can run I LEX, OS-9 and Radio 
Shack disk software on your Color Com- 
puter, it you have a 32K Color Computer 
with the Radio Shack disk system, all you 
need to do is make a trivial modification 
to access the hidden 32K, as described m 
the Feb. issue of COLOR COMPUTER 
NEWS and the April issue of '68' Micro 
You can get FLEX from us right now. 
OS-9 will be ready by summer. Please 
note that this will only work with the 
Radio Shack disk system and 32K/64K 
memory chips thai RS calls 32K Maybe 
they put 64K's in yours, too It you dor, I 
have a copy of the article, send a legal 
size SASE (40<t stamps) and we'll send it 
to you. 

In case you dor: t understand how this 
works, I'll give you a brief explanation. 
The Coloi Computer was designed so 
that the roms in the system could be 
turned off under software control. In a 
normal Color Computer this would only 
make it go away. However, if you put a 
program in memory to do something first 
(like boot in FLEX or OS-9), when you turn 
oft the roms, you will have a full 641' RAM 
System with which to run your program. 

Now, we need the other half of the 64K 
ram e-ups to work and this seems to be 
the case most of the time, as the article 
states. Of course, you could also put 64K 
chips in. 

Some neat utilities a'e included. 

MOVEROM moves Color Basic from 
ROM to RAM. Because it's moved to RAM 

you can not only access it from FLEX 



you can run it and even change it!! You 

can load Color Computer cassette soft 
ware and save if fo FLEX disk. Single 
Drive Copy. Format and Setup com- 
mands plus an online help system are in- 
cluded 

Installing FLEX is simple. Insert fhe 

dish and type 

run -flex:' 

That's all there is to it! You are now up 
and running in the most popular disk 

operating system lor the 6809 There are 
hundreds of software packages now run- 
ning under the FLEX system. Open your 
Color Computer to a whole new world ol 
software with FLEX. 

FLEX $99.00 
INCLUDES OVER 25 UTILITIES! 
FLEX Editor $ 50.00 

FLEX Assembler $ 50 00 

FLEX Standard BASIC $ 65 00 

FLEX Extended Business BASIC $100.00 

Other languages available include; 

FORTH, Pascal, Fortran??. 'C,' A/BASIC 
Compiler, plus more. 
Application packages include; A/R, G/L, 
A/P, Inventory, Electronic Spreadsheets, 

Accounting, Database programs and 
more. SEND FOR LIST. 

TRS-80 COLOR COMPUTER COMPLETE 
WITH 64K RAM, 24K ROM, SINGLE DISK 
DRIVE AND FLEX, SET UP AND READY 
TO RUN FOR ONLY $1,275. Includes 60 
day extended warranty. If you have a 
Computer, call about RS disk controllers 
and drives. 
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DOS FEATURES 

• A 252+ pagetechnical manual with index and detailed table of contents. 

• Commands SYSTEM and PDRIVE allow the user to configure/customize 
his/her own DOS 

• Depending on installed hardware, NEWDOS/80, via the PDRIVE com- 
mand, supports within one system, mixtures of single/double density, 
single/double head. 5 or 8 inch drives with single/double volume 
diskettes of up to 7680 standard 256 byte sectors. 80 track drives can 
read 35/40 track diskettes. Parameters for 10 drives may be pre- 
specified though only a maximum of 4 are in use at anytime. ADR not 
provided 

• LNW 5/8 and Omikron mapper boards supported. 

• APPARAT.AEROCOMP.AM.LNW.andPERCOM, disk doublers supported. 

• Most CPU speed up mods may be used though not specifically supported. 

• Model l/lll data diskette mterchangeability when both computers are 
operating under NEWDOS/80 version 2.0. 

• Model I 2.3 TRSDOS compatible 

• COPY to/from Model I 2.3B and Model III TRSDOS diskettes (no other 
useage allowed) 

• Single drive COPY and Copy By File features. 

• Depending on installed hardware, the system volume may be single/ 
double density, single/double sided, 5 or 8 inch and up to 7680 sectors. 

• RUN-ONLY program mode restricts the operator to program defined 
input only 

• MINI-DOS allows the executing program to be interrupted by the 
operator to perform one or more of the 51 DOS commands executable 
under MINI DOS, and then continue the interrupted program's execution. 

• CHAIN or DO commands activate chaining whereby keyboard input 
comes from the specified disk file, allowing a predetermined set of 
commands and/or parameters to be automatically inputted. 

• Dump display to printer function 

• Enhanced DEBUG facility (14 commands) allows interrupting current 
program execution, inspecting/altering memory or disk, and resuming 
execution, continuous or single step, with/without stops. 

• DOS vectors'defmed for Assembly Language programmers. 

• DOS-CALL allows user programs and BASIC to execute DOS commands. 

• The programmer may create his own resident DOS commands. 

• Programs may enable/disable user routines driven off the timer interrupt 

• The programmer may create his/her own resident DOS commands. 

• Model I built-in lower case driver, blinking cursor, auto key repeat. 

• ROUTE mg of keyboard, display, printer and (Model III only) RS232C. 
May be routed to a user routine in memory, but not to/from disk unless via 
a user routine. 

• Except for the spooler, there are no high memory routines for DOS or 
BASIC: this includes ROUTE and CHAIN functions 

• Lower case DOS commands honored 

• Full error messages displayed instead of error codes. 

• 31 enhanced COPY parameters 

• Copy By File allows 6 criteria for file selection 

• 15 enhanced FORMAT parameters. 

• Partial diskette reFORMAT permitted 

• File PURGE by wildcard extents and/or user files 

• Dl Rectory command allows wildcard extents, user files, short or extended 
format, dump to printer 

• User may specify diskette's directory location. 

• Expanded directory provides for up to 222 file entries 



Some DOS commands may be aborted without reset. 

R command repeats last performed DOS command 

CREATE command to pre-allocate a disk file. 

ERROR command displays error message associated with error code 

HIMEM command sets/displays DOS/BASIC high memory address. 

DATE command sets/displays computer's date. 

TIME command sets/displays computer's time. 

Model III FORMS command for printer control. 

Model III SETCOM command for RS232 control. 

Enhanced LIST/PRINT commands for ASCII files with pause, abort and 

partial file listing 

Alter chaining state via theCHNON command or commands within the 

chain file. 

A program or a chaining sequence may display a message with/without 

pause. 

CLEAR command to zero memory and to purge routes, user DOS 

commands and user timer routines. 

Commands to enable/disable BREAK key. blinking cursor, lower case 

driver 

PROT command to change diskette NAME/DATE/PASSWORD 

ATTRIB command to change a file's attributes. 

CLS command to clear screen. 

AUTO specifies the command to execute automatically at reset/power-on. 

SYSTEM specifies the default system configuration values (usually 

enable or disable) which become effective on RESET/POWER UP. 

Diskette/file password checking 

RUN-ONLY mode 

Keyboard debounce (Model I) 

Screen dump to printer (JKL) 

DEBUG 123 entry 

MINI-DOS 

Break key as keyboard key 

Hardware lower case (Model I) 

Assign default drive number for DIR 

Assign default drive number for file creation 

Memory protect value 

Clear key as keyboard key 

Disk master password required for full diskette or CBF COPY 

Auto Repeat key function 

TIME/DATE question on power-up 

TIME/DATE question on reset 

Display disabled until operator/program reenables 

Manual operator chaining pause/abort 

Manual operator AUTO command override 

R = repeat last DOS command performed 

Built in lower case driver (Model I) 

Lower to upper case toggle 

Blinking cursor 

Number of physical drives on computer 

Number of disk I/O retries 

Time delay for 1 st repeat of auto repeat key 

Specify the cursor character 

Specify the write of the directory sector's address mark for Model i 

single density diskette in Model III format for easy Model I, Model III 

diskette exchangeability 
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SK BASIC FEATURES 

In one statement from DOS READY, BASIC can be brought up, the 
number ot files set, the memory size set and a program LOADed or RUN. 
RUN-ONLY prevents the operator from getting to READY or DOS 
READY, thus giving the program almost total control 
Via the CMD function, all DOS commands are executable from 
BASIC, either directly or dynamically. 
MINI-DOS is available from BASIC. 
DEBUG is available from BASIC. 
CHAINing is available from BASIC. 

Variable passing between programs via the V parameter of RUN. 
Abbreviated commands: 

(A)uto; (D)elete; (E)dit or comma; (L)ist or period 
Accidental text line deletion more difficult 
Text line scrolling foreward or backward. 
Text page scrolling foreward or backward 
Dl moves text line to new position 
DU duplicates text line to new position 

Built-in RENUMber with line number and limited syntax error check. 
A portion of text may be moved to another part of the program with all 
references to that code resolved. 

Built-in REFerence function will display/print references to all line 
numbers, integers and variables. It will display references to a single line 
number, integer, string, function code (reserved word) or a group of 
packed or unpacked characters, and then allows displaying of each 
referencing text line in turn with editing as necessary. 
A program may be loaded into reserved high memory via CMD or MINI- 
DOS and its execution address extracted from the two bytes at 1 741 1 
(4403H). 

MERGE functions with packed or ASCII text files. 
Built-in text space eliminator and/or remark deleter. 
Built-in calendar date conversion. 

Dynamic ERASE of selected variables, keeping all others. 
Dynamic KEEP selected variables, CLEARing all others. 
After clearing an array via ERASE or KEEP, the array may be redimensioned 
via DIM. 

Dynamic text line deletion. 

Dynamic text line insertion via MERGE, which with dynamic DELETE, 
allows use of overlays. 

SWAP contents of 2 variables of the same type. 
Single Stepping starting at specified text line number. 
I n-memory sort of up to 9 arrays in either ascending or descending order 
RENEW function to reinstate NEWed program. 

Full BASIC error messages, including associate DOS error message, if 
applicable 

With default start up parameters and no reserved high memory, 48K 
RAM has 38261 bytes available. 

SUPERZAP, DIRCHECK and other programs using only memory from 
5200H to 6FFFH can be executed directly from BASIC without disturb- 
ing the program text or variables (if 8K BASIC free memory available, 
exclusive of string area). 
FEATURES of NEWDOS/80 enchanced BASIC disk file I/O. 

In addition to TRSDOS sequential and random file types, NEWDOS/80 

has two new file types (Marked Item and Fixed Item) divided into five 

subtypes (MF, MU, Ml, FF and Fl) 

These five subtypes do not requireLSET, RSET, MKI$, MKSS, MKD$, 

CVI, CVSorCVD; instead, GETs and PUTs are done directly to/from the 

variables named in a list. 

The string separating character sequence ; " , " ; used with PRINT is not 

used with the new file types; instead only a comma is used as the 

separator. 



• MU files are used as an option to the older PRINT/INPUT files. 

• FF files are used as an option to the older RANDOM files. 

• Record lengths up to 4095 bytes supported. 

• Records may be all of the same length (MF and FF), of varying lengths 
(MU) or unknown length (Ml and Fl). 

• Sequential files may be accessed randomly. 

• Files may be accessed by Relative Byte Address to allow accessing of 
variable length or unkown length records. 

• Existing files may be extended. 

UTILITY PROGRAMS INCLUDED WITH NEWDOS/80 

• SUPERZAP is a disk/memory display and modification program, also 
used as the vehicle for installing patches to NEWDOS/80. 

• DISASSEM isaZ80load module (CMD) disassembler that builds cross 
reference tables for all location references including those by JR 
instructions, includes in the disassembly printable characters for all hex 
bytes to help locate character strings and sends the disassembly to the 
display, printer or a disk file. The disk file can then be edited and/or 
assembled using EDTASM, if it is not too large. 

• DIRCHECK is a program that displays directory contents and checks 
directory integrity (its primary function), displaying specific error codes 
to assist user attempts at directory trouble shooting and/or repair. 
Optionally will zero out unused (dead) file names. 

• EDTASM is Apparat's enchancement of Radio Shack's 1978 tape 
editor/assembler program to operate from disk and with disk files. 
Requires purchase of that Radio Shack program (not a newer one; as a 
pre-condition of use of Apparat's EDTASM. 

• LMOFFSET allows load module (CMD) transfer between disk and tape. 
Displays program start, end and entry addresses. Optionally allows load 
address re location (not execution relocation) and subsequent execution 
as from non-disk BASIC via SYSTEM. 

• CHAINBLD is a mini-text editor for creating/maintaining chaining files. 

• NEWDOS/80 manual chapter titles and page counts 

1. Introduction (5) 

2. DOS Library Commands (52) 

3. DOS Routines (12) 

4. DOS Features (14) 

5. DOS Modules, Data Structures, and Miscellaneous 
Information (1 2) 

6. Additional Programs Supplied on NEWDOS/80 Diskette (22) 

7. Disk BASIC, non-l/0 Enhancements (17) 

8. Disk BASIC I/O Enhancements and Differences (21) 

9. Error Codes and Messages (2) 

10. Glossary (9) 

1 1 Error Reporting, Incompatibility Handling and Patching (8! 

12. Conversion Information and Miscellaneous Comments (9) 

13. ZAPs (increasing with time) 

14. Appendix A: Marked and Fixed Item File discussion (47) 

15. Appendix B: Marked and Fixed Item File examples (18) 

16. Index (4) 

• Full time support staff 

• Information, minor enhancements and corrections to NEWDOS/80 are 
issued, at no charge, to registered owners only. 



NEWDOS/80 Version 2.0 for the model I is a separate and distinct 
product from the model III. Each is sold separately. 




!*s<6£tsj. MiB»«*£i»!Ufti 



■^■HMM 



»g Support for Microcomputers" 



■REGISTERED TRADEMARKS OF APPARAT, INC. 



master ctiaige] 



GENERAL 



What you'll need to telecommunicate. 



BBS Primer 



Steve Wright 
Route 1 Box 561 
Dayton, TX 77535 



After three years, my TRS-80 still fasci- 
nates me and now I have discovered a 
New World, where computers converse. 

The Forum-80, Computer Bulletin Board 
System (CBBS), Apple Bulletin Board Sys- 
tem (ABBS), North Star Bulletin Board Sys- 
tem (NBBS), and Pet Bulletin Board System 
(PBBS) are non-commercial telecommuni- 
cations systems. The Source, Micronet, and 
Tymnet are commercial systems. 

The difference is money. You pay a fee 
for connect time, certain services such as 



stock quotations (from the Wall Street Jour- 
nal and others) and the initial subscription, 
much like pay TV. 

These systems give the computer novice 
and the expert, with TRS-80 or the other 
brands, a common connection for com- 
munication since all types of computers 
can speak to each other. Location or equip- 
ment is unimportant as long as you can 
generate ASCII code and send it through a 
phone line. 

The Modem 

A computer is not essential for gener- 
ating ASCII. A terminal such as a Teletype 
model ASR 33 is. I use a TRS-80 with an 
LNW expansion board. Such a modem is 
the only way to get the code into the phone 
line. One way to skin the modem cat is with 
a Radio Shack Modem One. It is a direct 
connect, and operates in full duplex in 
answer or originate. 

You can generate ASCII code with a soft- 
ware program. (Did all the software ped- 
dlers' eyeballs click?) I use Lance Micklaus' 
ST80II great program. The simplest soft- 
ware converts your computer to a dumb ter- 
minal (just send and receive); the more 
advanced program adds wings to it with 



Wichita Falls, TX (817-855-3916) 

A Forum-80 system operated by the 
Micro Enthusiasts. 


Texhoma 


Memphis, TN. (901-761-4743) 
Forum-80 


Kansas City, MO (816-861-7040) 
Headquarters for Forum-80 systems. 




Falls Church, VA (703-734-1387) 

Amateur Radio Research and Development. 
A CBBS system 


Shreveport, LA (318*31-7107) 

N.W. Louisiana TRS-80 Users Group. 

Another Forurn-80. 


Table 1 


Decatur, GA (404-939-1520) 
The Microstutf Company 
A Remote Northstar system 



such features as disk storage, automatic 
functions, more control features, and 
printer output. Many programs are available 
commercially and from computer 
magazines. 

Nuts and Bolts 

First you must generate ASCII code (com- 
puter and software), serialize it into a single 
file line, send it to the modem (RS-232 de- 
vice) and get it into the phone lines 
(modem). 

The RS-232 device serializes the informa- 
tion from the computer and sends it in the 
proper configuration at the proper speed to 
the modem. 

Gaining Access 

Accurate ASCII configuration and speed 
are imperative. Here is the formula: All 
systems I have used activate with the ASCII 
word set to even parity, a seven bit word, 
and one stop bit. You set that configuration 
with hardware or software according to 
your RS-232 device. The speed of communi- 
cation is set at the RS-232 and all the sys- 
tems I have used will operate at 300 baud. 
Some will operate faster or slower. 

The modem itself converts voltages to 
sound, puts it on the telephone line and vice 
versa. The modem can answer or originate 
at full or half duplex. Since computers can 
send and receive at the same time they use 
two different tone sets. All of the systems 
want you to call on the originate tones and 
they will answer on the answer tones. Full 
duplex is fastest since machines both talk 
and listen at the same time. 

Buy some telephone company stock and 
visit some of the systems (see Table 1). For 
no fee you can leave or receive personal 
messages, get general interest messages 
and ads, and receive free public domain 
programs. You can get a full list of currently 
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S = summarize messages 
R = retrieve messages 
E = enter messages 
K = kill messages 
F = flagged msg retrieval 
M = messages in system 

= other system numbers 

1 = system info 

H = help with sys operation 
U = user log 

C = configuration changes 
L = local features list 
T = terminate connection 



Figure 1 



active systems from the systems them- 
selves using the proper command from 
their menus. 

The Menu 

A typical menu from a Forum-80 system 
is shown in Fig. 1. 

Most of the command selections take 
you to a submenu for that function, and you 
always have Help command for further 
system explanation. 

Telecommunication 
for a price: CompuServe 

. CompuServe is a commercial system. 
For a fee, you have access to a monster net- 
work of DEC mainframes that offer hun- 



. . I have discovered 

a New World, 

where computers 

converse." 



dreds of features. Imagine receiving news- 
wires and regional newspapers, sports and 
political information, stock market quotes 
and business news; or purchasing publica- 
tions and software in the comfort of your 
library on your personal keyboard. The net- 
work also allocates you memory workspace 
and disk storage area, so useful if you have 
limited memory or disk capacity. (And, what 
a hedge against the rising costs of news- 
papers and magazines, a cost effective al- 
ternative to a kilobuck capital outlay.) 
Further, many systems give the users an op- 
portunity to practice alternate languages 
such as Fortran, Pascal and others. 

The systems are high self-prompting 
and self-promoting. They offer comput- 
er users the 21st Century equivalent to 
the Boston Common. Leave me a mes- 
sage on CompuServe ID. #70265,217. Tel- 
ecommunications like this mean "Let's 
get together."H 




#26 SOFTWARE 



ULTIMATE SOFTWARE PLAN 



We'll match any advertised price on any 
item that we carry. And if you find a lower 
price on what you bought within 30 days of 
buying it. just show us the ad and we'll 
refund the difference. 
It's that simple. 



DISK WITH 
MANUAL 



ARTIFICIAL INTELLIGENCE" 
Meaical(PAS-3). • $849/540 

Dental (PAS-3) $849/$40 

ASYST DESIGN" 
Prof Time Accounting $549/$40 
General Subroutine. $269/$40 
Application Utilities . $439/$40 
COMPLETE BUS. SYSTEMS " 

•Creator $i99/$2f> 

"Reporter $129/$20 

"Both. 5299/545 

COMPUTER CONTROL' 

"Fabs(B-tree) . . S119/S20 

•UltraSortll... $119/525 

COMPUTER PATHWAYS - 

Pearl (level 1) $ 99/$25 

Pearl (level 2) $299/540 

Pearl (level 3) $549/$50 

DIGITAL RESEARCH • 
CP/M 2.2 
NorthStar . . $149/$25 

TRS-80 Model II 

(P+T) $159/$35 

Micropolis $169/$25 

PL/l-80 $459/$35 



Combine our price protection with the 
availability of full professional support and 
our automatic update service and you have 
the Ultimate Software Plan. 

It's a convenient, uncomplicated, logical 
way to get your software. 
\S (New items or new prices) 
* Special price of the month. 

CP/M users: 

specify disk systems and formats Most formats available. 
ORGANIC SOFTWARE" 



MANUAL 
ONLY 



TextWnter III ...$111/$25 

DateBookll $269/$25 

Milestone $269/$30 

OSBORNE" 

General Ledger . ... $ 59/$20 
Acct Rec/Acct Pay $ 59/$20 

Payroll w/Cost $ 59/S20 

All 3 $129/560 

All 3 • CBASlC-2 $199/$,'!, 

Enhanced Osborne . . . 5269/560 

PEACHTREE" 

General Ledger $399/$40 

Acct Receivable $399/540 



Acct Payable 

Payroll 

Inventory 

Surveyor 

Property Mgt 

CPA Client Write-up 
P5 Version 
MagiCalc 
Othe< 



5399/540 
$399/$40 
5399/540 
5399/540 
5/99/540 
$799/$40 
Add $ 1 29 
$269/$25 
less 10% 



WORD PROCESSING 

WordSearch $1 79/$50 

SpellGuard $229/525 

VTS/80 $259/566 

Magic Wand $289/545 

Magic Spell $269/525 

Spell Binder . $349/$45 

Select $495/$na 

The Word $ 66/$na 

OTHER GOODIES 

Micro Plan $4l9/$na 

Plan 80 $269/$30 

Target $189/$30 

BSTAM $149/$na 

BSTMS 5149/Sna 

Tiny'C" $ 89/550 

Tiny C Compiler $229/550 

Nevada Cobol $ 1.9/525 



BT-80 
Mac 

Sid 

Z-Sid 

Tex 

DeSpool 

CB-80 

CBasic-2 

D.M.A. 

Ascom 

Formula 
GRAHAM-DORIAN" 

General Ledger 

Acct Receivable 
Acct Payable 

Job Costing 

Payroll II 

Inventory II 

Payroll 

Inventory 
Cash Register 
Apartment Mgt 
MICRO-AP* 

S-Basic 

Selector IV 

Selector V 



$179/530 

S 85 '$ 15 
.5 65/515 
$ 90/515 
$ 90/515 
$ 50/J10 
$459/535 
S 98/5 20 

$149/$15 

S 539/5 4 5 

S 729/540 
S/29/S40 
$729/$40 
5729/540 
5729/540 
S 729/540 
5493/540 
5493/540 
5493/540 
$493/540 

S269 $25 
5295/535 
$495/550 



MICRO DATA BASE SYSTEMS' 

HOBS 5269/535 

MDBS 5795/540 

DRSorQRSorRTL. . $269/$10 
MDBSPKG. $1295/560 

MICROPRO" 

WordStar 5319/560 

Customization Notes $429/$na 

Mail-Merge $109/$25 

WordStar/ Mail-Merge $419/$85 

DataStar $249/$60 

WordMaster $119/$40 

SuperSort I $199/$40 

Spell Star $175/$40 

CalcStar . $259/$na 

MICROSOFT* 

Basic-80 $298 

Basic Compiler $329 



SOFTWARE WORKS' 

•Adapt iCDOStoCP/M).$ 49/$na 
•Ratfor $ 68/$na 

SOHO GROUP' 

•MatchMaker $ 89/$20 

'Worksheet 5159/520 

STAR COMPUTER SYSTEMS 
* G/L, A/R, A/R Pay .... $ 359 

fAJM $1129 

*s Legal Time & Billing * 849 

»■* Property Mngmt $ 849 

STRUCTURED SYSTEMS* 

Business Packages. 
Call for Price 

SOKCIM- 

SuperCalc $269/$na 

Trans 86 $116 

Act $157 

SUPERSOFT* 

Diagnostic I $ 49/$20 

Diagnostic II $ 84/$20 

Disk Doctor $ 84/520 

Forth (8080 or Z80) . $ 149/$30 

Fortran $219/530 

Fortran w/Ratfor $289/$35 

C Compiler . $174/$20 

Star Edit $189/$30 

Other less 10% 

TCS* 

GLot ARorAPorPay S 79/$?5 

All 4 $269/599 

Compiled each $ 99/$25 

Inventory $ 99/$26 



MicroStat 

Vedit 

MiniModel 

StatPak 

Micro B + 

Raid 

String/80 

String/80 (source) 
ISIS CP/M Utility 

Lynx 

Supervyz 

CP/M Power 
Main/.- Magic 



5224/S25 
$130/515 
5449/550 
$449/540 
5229/520 
5224/535 
S ;<4/ $20 
$279/$na 
5199/SS0 
$199 $20 
$ 95/$na 
$ 75/$na 



INFO UNLIMITED' 

►'EasyWriter (Prof) 

•^Datadex 

K'EasyMailer (Prof) 
Other 

MICROSOFT' 

Softcard [Z-80 CP/M). 

Fortran 

Cobol 

Tasc 

MICROPRO" 

Wordstar 

MailMerge 

Wordstar/MailMerge . 

SuperSort I 

Spellstar 



$159 
$129 
$129 
less 15% 

$^9b 

$■79 
$499 
$ 1 39 



$269 

S d9 
$549 
$ 1 59 
$129 



PERSONAL SOFTWARE/ 
VISICORP* 

x'Visicalc 3.3 $199 

•Desktop/Plan II $199 

Visiterm $ 90 

^Visidex $199 

Visiplot . . 5180 

*-Visitrend/Visiplot $259 



Fortran-80 
Cobol-80 

M-Sort 

Macrc-80 

Edit-80 

MuSimp/MuMath. 
MuLisp-80 . 
MuinPlan. 



$349 

$629 
$175 
$144 
$ 84 
$224 
$174 
Call 



Manager Series Call 



UNICORN" 

Mince 

Scribble 

Both 

WHITESMITHS" 

C Compiler 

Pascal (incl "C") . 

PASCAL 

Pascal/MT+ Pkg 

Compiler 

Sp Prog 

Pascal/Z 

Pascal/UCSD 4.0 
Pascal/M 

DATA BASE 
FMS-80 
dBASE II 
Condor II 



$149 $25 
$149 $25 
$249/$ 50 



$600/530 
$850/545 



$429/530 

$7315 
.$175 
$349. $30 

. 5670/550 
5355/520 

5649/545 
5595/550 

$899/550 



.^Visifile 

PEACHTREE' 

G/L. A/R, A/P. Payor 

Inventory (each) 

"OTHER GOODIES 

■VU *3H 

(usew/Visicalc). . , 
"Context Connector 
(usew/Visicalc) 

Micro Courier 

Super-Text II 
Data Factory 
DB Master 



5169 



$7 19 
5127 
51 34 

$ 1 64 



16-BIT SOFTWARE 



8086 SOFTWARE 

<s Supercalc . 

Call lor others 



ORDERS ONLY-CALL TOLL FREE VISA • MASTERCHARGE 

1-800-421-4003 ext. 823«Calif. 1-800-252-4092 ext. 823 

Outside Continental US -add $10 plus Air Parcel Post • Add $3.50 postage and handling per each item 
• California residents add 6% sales tax • Allow 2 weeks on checks, C.O.D. $3.00 extra • Prices subject to change 
without notice. All items subject to availability • ® — Mfgs Trademark. Blue Label $3.00 additional per item. 

THE DISCOUNT SOFTWARE GROUP 

6520 Selma Ave. Suite 309 • Los Angeles, Ca. 90028 • (213) 837-5141 

Int'l TELEX 499-0446 DISCSOFT LSA • USA TELEX 194-634 (Attn: 499-0446) , - i; • 

TWX 910-321-3597 (Attn: 499-0446) 



vSee List of Advertisers on page 386 
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WARNING! 

Electric Power Pollution. 

Spikes & Lightning 

HAZARDOUS to 

MICROCOMPUTERS!! i 

Patented ISOLATORS provide 
protection from . . . 

• Computer errors cause by 
power line interference 

• Computer errors due to system 
equipment interaction 

• Spike damage caused by 
copier/elevator/air conditioners IS0? 

• Lightning caused damage 
MONEY BACK GUARANTEE! Pa! #4 ' 259 705 

• ISOLATOR (ISO-1) 3 isolated 3-prong sockets: Spike Suppression; 
useful for small offices, laboratories, classrooms $69.95 

• ISOLATOR (ISO-2) 2 isolated 3-prong socket banks; (6 sockets 
total); Spike Suppression; useful for multiple equipment installa- 
tions $69.95 

• SUPER ISOLATOR (ISO-3) similar to ISO-1 except double isolation & 
oversize Spike Suppression; widely used for severe electrical noise 
situations such as factories or large offices $104.95 

• SUPER ISOLATOR (ISO-1 1) similar to ISO-2 except double isolated 
socket banks & Oversize Spike Suppression; for the larger system in 
severe situations $1 04.95 

• MAGNUM ISOLATOR (ISO 17) 4 Quad Isolated Sockets; Multiple 
Spike Suppressors; For ULTRA-SENSITIVE Systems in extremely 
Harsh environments S181.95 

• CIRCUIT BREAKER, any model (Add CB) Add S9.00 

• REMOTE SWITCH, any model (Add-RS) Add $16.00 

AT YOUR DEALERS MasterCard. Visa, American Express 

ORDER TOLL FREE 1-800-225-4876 (except AK, HI. PR & Canada) 

H. 



z? Electronic Specialists, Inc. 

171 South Main Street Box 389. Natick. Mass 01760 
(617)655 1532 
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NEW 
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DISK DRIVES 
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A 


with 
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* 


POWER SUPPLY & CASE 
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for 
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RADIO SHACK 


* 
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and 
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OTHER COMPUTERS 


A 
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OMNITEK Computers 


A 

* 


A 


<£> International, Inc. C/ 
v tj^ 1899 Main Street S( *$f 


A 


A 


A 
A 


* 


Tewksbury, MA 01876 


A 


A 
* 

A 
* 


(617) 851-4580 


A 
A 


Shipping extra FOB Tewksbury 


Master Card, Visa, or Bank Checks accepted 

^19 


5 A 
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£2! AUTO-WRITER 




NEW! 




YOU ALREADY OWN THE BEST DATA 
BASE MANAGER AVAILABLE . . . 



It's Your Word Processor . 



EUse your word processor to create and maintain a 
FREE-FORMAT data base. There is NO NEED TO ABBREVIATE 
because of fixed-length fields. 

Sort your data base by any field. 

Print form letters and reports, automatically selecting and 
extracting information from your data base. 

Use format codes to control the printing of form letters and 
reports. 

Create subsets of your data base with the powerful SELECT IF 
software. 

Requires 48K, 2 disk drives, and lower case Model I or III. 
Available for most Disk Operating Systems. 

NOW AT THE SPECIAL INTRODUCTORY PRICE OF $72.83 

(Manual available separately for $20.00) 

AUTO-WRITER . . IN A CLASS BY ITSELF 

WRITE OR CALL NOW FOR A FREE BROCHURE 

MIDWEST DATA SYSTEMS 

a division of Walonick Associates, Inc. 
5624 Girard Ave. So., Minneapolis, MN 55419 

[612)866 9022 - 148 



Don't miss 
the 




Double GAMES 
issue of 

LOAD 80 

in August. 



Check your local computer store! 
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TRISWATCH 

Keeps your TRS-80 Mod II 
up with the times. 

The Triswatch, formally known as the CCB-II, 
is a clock, calendar, and audio alarm rolled 
into one! 

■ ForTRSDOS users, the CCB-II eliminates 
the hassle of setting the time and date 
when you reset your Mod It. 

■ The P&T CP/M® 2 system date and time 
are synchronized to the CCB-II each time 
the system is reset. 

■ The CCB-II is directly accessible from any 
language that allows direct port input 
and output. 

■ A pacemaker battery is included, which 
provides over 8 years of continuous 
timekeeping. 

Keep up with the times and order 
i the CCB-II for $175 plus shipping. 



TRS-80 is a trademark of Tandy Corp. 

CP/M is a registered trademark of Digital Research Inc. 

PICKLES & TROUT 

1 ROU I ® P.O. BOX 1206. GOLETA. CA 931 16. (805) 685-4641 

^-290 

Warning: Installation requires opening the Model II, which "lay noid its warranty 
We suggest waiting until the warranty period has expired before installing the CCB-II. 




RPM measures the rotational speed and 
variation of your disk drives, and reveals a 
common cause of unexplained errors. 
Simple one-key operation, runs under any 
DOS. interchangeable between Models i 
and III. Shows current and average 
speeds, plus fluctuation history. Recovers 
from severe errors. Documentation ex- 
plains how to adjust drives. Use RPM 
monthly for best results. 32-48K Model 1 or 




III disk: 1 24.95 



\x 



RAM SPEEDS UP BASIC 



run times by up to 50' 



Your time is valuable, so why 
waste it on slow-running BASIC 
programs? PRO SOFT'S 

"FASTER" will analyze those 
programs while they run, then 
show you a simple change (usu- 
ally one new line) that can re- 
TRS-80 Models I and III, $29.95 



CALL NOW TOLL-FREE FOR ORDERS ONLY: 

(800) 824-7888, Oper. 422 

Calif: (800) 852-7777, Oper. 422 

Alaska/Hawaii: (800) 824-7919, Oper. 422 

For technical information, write or call us directly: 



10 



ts 91 



P.B. 839 / No. Hollywood. Co. 91603 / (213) 764-3131 



^^■■■■Bnai 



M C VISA ok. Add $2.00 lor CO! 



California, and $5.00 fc 



TRS-80" OWNER! 




in-la-n 



LOW COST ARCHIVE OR DISK 
BACK-UP TAPE STORAGE SYSTEM 



The BETA-80 is a low cost, high speed, direct access digital 
tape system which provides one megabyte of storage per 
drive. The dual drive configuration provides two megabytes 
on line. The BETA-80 has been interfaced to the Model III 
TRS-80* for use in backing up costly diskettes. It provides 
direct access at better than 100 inches per second and will 
store 10 single density 5-1/4" diskettes on a standard C60 
cassette. 

Write or phone MECA for details 

IIICCS1 (714)365-7686 

7350 Acoma Trail, Suite 3 - Yucca Valley, CA 92284 



k-304 



•Manufacturer's Registered Tradema 



^ GirCUlt Analysis. Linear and transient circuit analysis pro- 
grams. 10 to IS nodes. Built-in models for transistors, op-amps, 
transmission lines, Plots amplitude and phase. Available for 
TRS-80 Disk BASIC 48K, CP/M and H-89 computer systems. 

I.CA (Linear Circuit Analysis) S129.9S 

TCA( Transient Circuit Analysis) SI29.9S 

TI.CA (Both of the abo\e programs) _ $100. OS 

Data Base Management for the r 

DBM-l is designed to be sophisticated yet easy to use. Exr-hmvc 
screen prompts with cross reference to the documentation to 
make this program one of the best documented on the market. 
2S6bvte fields, 2% byte field names, machine language assisted 
sort, flexible report generator with field arithmetic and to 1 " 
totals. Available for TRS-80 with 48K and one or more dis 

DBM-l S09.9S 

DBM-l S19<>,00 Purchased with I.DOSS, 

TRS-80 Graphics Package, grass is 

package and macnine language overlay loader. C 
screen graphics with a few simple commands in BASIC or 
machine language. The overlay loader allows multiple ma' ' 
language programs to be called from the disk while in BAS 

CRASS S59.9S 

Manuals available/or any of the above packages for S15. 00. 

To order call (505) 255-6451 weekdays between noon and 
():()() p.m. Mountain time. Ask for a catalog. MasterCard and Visa 
accepted. Dealer inquiries invited. 



,UTEL 
'LECTROi 



MKKO COMPI TER SYSTEMS AND SI PPLIES 
146 WISCONSIN. NE • A1.B1 Ql FRQ1 E. NM 8"I08 



/'■''"J!"'" 



-See List ot Advertisers on page 386 
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UTILITY 



Finally, a disk directory for the Model III. 



Lost and Found 



Robert Athanasiou 
and William Athanasiou 
13 Lawn ridge Avenue 
Albany, NY 12208 



This disk index program is dif- 
ferent: It runs on the Model 
III with either one or two drives, 
under TRSDOS 1.3 without 
modification and nothing else to 
buy or add! 

Its most important feature is 
vertical rastering of the printer 
output. It also has an error trap, 
and an abort sequence returns 
you to the menu if you wish to 



cancel an option. The program 
uses Model III graphics 
capabilities. 

We wrote this program to 
keep track of all our disks. We 
could not locate a program 
without putting a pile of disks in 
the drive and typing DIR. 

Commercial versions of disk 
directories are available for 
$13-$25 but they are not de- 
signed for the Model III and do 
not have output in the form we 
want. This program does not re- 
quire you to load a special sort 
routine; just boot the disk and 
hit a few keys. 

Arranging printer output so 
that you can scan it vertically 
makes an enormous difference 
in its readability. Compare the 
horizontal raster output (raster 



is from a Greek word meaning 
screen) shown in the video 
dump in Fig. 1 with the vertical 
raster output in Fig. 2. You can 
locate any program, for example 
DIR73 (a directory of articles 
from 73 Magazine), much more 
easily in the alphabetized ver- 
tical raster of Fig. 2 than in Fig. 
1. The same is true of searching 
for a specific disk. 

I adapted the vertical raster 
subroutine from an article by 
Robert R. Lewis for Pet Basic 
published in the October 1981 
issue of Interface Age. 

The Programs 

Assume that A$(i) has 25 
elements; we wish to print in 
four columns. Since line printers 
can only print in rows we have to 



Disk Program 



Disk Program 



Disk Program 



Disk Program 



ooc 

uOC 

000 

000 

001 
001 

001 
100 
ox; 
100 



ANTENNA/BA 000 

DXCCLOG/8A 000 

MORSE/BAS 000 

RTTYXCVR/B 000 

BOBLOGO/ME 001 



HIPPO 
VITA2 

ATLS3 

BKRVWLTR/S 

UCFLETR/SC 



001 
001 
10-0 
100 

•oo 



ascii/bas 000 

dxccneed/b 000 

qslfile/ba ooo 

w2hkmlog/b 000 

boblogo/ps 001 
scripsit/c 

VITA3 

ATLS4/HLP 

EYE2/TXT 

VITA1 



001 

100 
100 
100 

100 



AZIMUTH/BA 

DXCONST/B 

QSTDIR/BAS 

XCVRTEST/B 

GETDISK/BA 

TYPICAUTX 

ACEP 

ATLSANN 

LLSBKRVW/S 

VITA2 



000 
000 
000 

001 
001 
001 
1i>0 
100 
100 
100 



DIR73/BAS 

FIELDDAY/B 

RPTRDIR/BA 

BLOCKS 

HEADER 

VITA1 

ATLS2 

BKRVWLLS/S 

UCFEVAL/SC 

VITA3 



Program 

AC LP 

ATLS3 

BKRVWLLS/S 

BOBLOGO/PS 

DCONTST/B 

HEADER 

QSLFILE/BA 

SCRIPSIT/C 

VITA1 

VITA3 



Disk Program 



Disk Program 



Disk Program 



100 
100 
100 

00 1 
000 
00! 
000 
001 
001 
001 



ANTENNA/BA 000 
ATLS4/HLP 100 

BKRVWLTR/S 100 

DIR73/BAS 

EYE2/TXT 

HiPPO 

QSTDIR/BAS 

TYPICAL/TX 

VITA1 

VITA3 



000 
100 
001 

ooo 

001 

100 
1 00 



ASCII/BAS 

ATLSANN 

BLOCKS 

DXCCLOG/BA 

FIELDDAY/B 

LLSBKRVW/S 

RPTRDIR/BA 

UCFEVAL/SC 

VITA2 

W2HKMLOG/B 



000 
100 
001 
000 
000 
100 
000 
100 
001 

ooo 



ATLS2 

AZIMUTH/BA 

BOBLOGO/ME 

DXCCNEED/B 

GETDISK/BA 

MORSE/BAS 

RTTYXCVR/B 

UCFLETR/SC 

VITA2 

XCVRTEST/B 



Disk 

100 
000 
001 
000 
001 
000 
000 
100 
100 

ooo 



Fig. 1. Horizontal raster output by disk and by program 



print the string in the following 
order: 

A$(1), A$(8), A$(14), A$(20) 
(skip to next line) A$(2), A$(9), 
A$(15), A$(21),.... The last item is 
A$(7). 

The formula to generate the 
sequence of index numbers 
1,8,14,20,2,9... uses modular 
arithmetic. In modular arith- 
metic, a complicated concept of 
higher mathematics, a number 
is usually expressed as one of a 
set of congruent numbers less 
than the modulous number. For 
example, 18 and 30 are con- 
gruent 6 (mod12). That is, 18 and 
30 are numbers which, when 
divided by 12, have a remainder 
of 6. 

In the example using A$(i) 
where i„„ equals N equals 25 
and the number of columns is 
equal to four, there were six 
items in each column and an ex- 
tra item in the first column. If N 
were 27 there would be six items 
in each column and extras in the 
first three columns. Lewis sug- 
gested an algorithm for cal- 
culating the index J such that 
J(l) represents the ordered set of 
numbers (1,8,14,20,2,9...) as I 
steps from one to N across C 
columns. The algorithm is: J(l) 
equals mod ((I - 1),C) times the 
integer of (N/C) plus the lesser of 



The Key Box 

Basic Level II 
Model III 
32K RAM 
TRSDOS 1.3 
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Ever wanted to do things to your 
TRS-80 that Radio Shack said couldn't be 

done 7 

How about upper/ lower case, reverse 
video, high- resolution graphics, a high- 
speed clock, audible keystrokes, an extra 
keyboard, and a real-time clock? 

Still not enough 9 

How about using an 8 -track as a mass 
storage device, making music, controlling 
a synthesiser, monitoring your data bus, 
and individual reverse characters 7 All 
these hardware modifications, plus lots 
more, are in The Custom TRS-80 and Other 
Mysteries by Dennis Baihory Kitsz ■ the 
latest book from IJG Computer Services. 



If the 
thought of using a screwdriver 
gives you the shivers then you can turn 

to tiie software section. In this you learn 



m 



1260 West 
Foothill Bl. 
Upland, CA 
91786 (714) 
946-5805 




NOW! 



how to make 
BASIC programs auto- 
execute, reset the memory size, patch 

into the interpreter, test memory with 
machine language, pack program lines 
with machine code, and generate sound 
effects. 

The Custom TRS-80 and Other Mysteries is 
more than 300 pages of practical infor- 
mation, and tested software, for $29.95. 
Order your copy now, and start turning 
your TRS-80 into a five -hundred- dollar 
supercomputer! Pick one up at your local 
IJG dealer and B. Dalton bookstores, 

TKS-80 is a Trade Mark of the Tandy Corporation 



Program 


Disk 


Program 


Disk 


Program 


Disk 


Program 


Dick 


ACEP 




100 


BLOCKS 


001 


HEADER 


001 


UCFEVAL/SCR 


100 


ANTENNA/BAS 


COO 


BOBLOGO/MF.D 


001 


HIPPO 




001 


UCFLETR/SCR 


100 


ASCII/BAS 


000 


BOBLOGO/PSY 


001 


LLSBKRVW/SCR 


100 


VITA1 


001 


A'l LS2 




100 


DIR73BAS 


000 


MORSE/BAS 


000 


VITA1 


100 


ATLS3 




100 


DXCCLOG/BAS 


000 


QSLFILE/BAS 


000 


VITA2 


001 


ATLS4/HLP 


100 


DXCCNEED/BAS 


000 


QSTDIR/BAS 


GOO 


VITA2 


100 


ATLSANN 


100 


DXCONTST/BAS 


000 


RPTRDIR/BAS 


000 


VITA3 


001 


AZIMUTH/BAS 


000 


EYE2/TXT 


100 


RTTYXCVR/BAS 


000 


VITA3 


100 


BKRVWLLS/SCR 


100 


FIELDDAY/BAS 


000 


SCRIPSIT/CMD 


001 


W2HKMLOG/BAS 


000 


BKRVWLTR/SCR 


100 


GETDISK/BAS 


001 


TYPICALTXT 


001 


XCVRTEST/BAS 


000 


Disk 


Program 




Disk 


Program 




Disk 


Program 




Disk 


Program 




000 


ANTENNA/BAS 


000 


QSTDIR/BAS 


001 


HIPPO 




100 


ATLSANN 




000 


ASCII/BAS 




000 


RPTRDIR/BAS 


001 


SCRIPSIT/CMD 


100 


BKRVWLLS/SCR 


000 


AZIMUTH/BAS 


coo 


RTTYXCVR/BAS 


001 


TYPICAL/TXT 


100 


BKRVWLTR/SCR 


000 


DIR73/BAS 




000 


W2HKMLOG/BAS 


001 


VITA1 




100 


EYE2/TXT 




000 


DXCCLOG/BAS 


000 


XCVRTEST/BAS 


001 


VITA2 




100 


LLSBKRVW/SCR 


000 


DXCCNEED/BAS 


00^ 


BLOCKS 




001 


VITA3 




100 


UCFEVAL/SCR 


000 


DXCONTST/BAS 


001 


BOBLOGO/MED 


100 


ACEP 




100 


UCFLETR/SCR 


000 


FIELDDAY/BAS 


001 


BOBLOGO/PSY 


100 


ATLS2 




100 


VITA1 




000 


MORSE/BAS 


001 


GETDISK/BAS 


100 


ATLS3 




100 


VITA2 




000 


QSLFILE/BAS 


001 


HEADER 




100 


ATLS4/HLP 




100 


VITA3 






Fig. 2. 


Vertical raster output by program and by disk 





mod(l-1,C) or mod(N,C) plus 
the integer of ((l-1)/C) plus 1 
where mod(N,C) is the re- 
mainder function N minus C 
times int(N/C). 

The general vertical raster 
subroutine is shown in Program 
Listing 1. It differs somewhat 
from the subroutine used in Dl- 
RECTORY/BAS (see Program 
Listing 2) because the line 
length in the program was cal- 
culated to fill 80 columns of 



print and did not require the ex- 
tra Print statement or the cal- 
culation of IEC (Index End Col- 
umn) found in line 230 of the 
subroutine listing. 

You must substitute LPRINT 
for Print statements when using 
your printer. Use DEF FN to 
make the algorithm easier to 
handle and apply it in different 
ways in your programs. 

Vertical rastering is more 
useful on a line printer than it is 



1— Build a new file 

2— Add a new disk to an existing file 

3— Update a disk already on file 

4— Delete a disk from file 

5— Sort and list by program name or disk number 

6— Search for a specific program or list a disk 

7— Save file 'DSKINDEX' 

8— Quit and return to Basic 

Fig. 3. DIRECTORY/BAS Menu 



on the video screen if your lists 
are long. On the video screen, 
each column may contain only 
about 15 elements before one is 
lost at the bottom or the list 
scrolls out of sight. For short 
lists using four or more col- 
umns, vertical raster is really 
nice. 

Lines 50-90 speed up pro- 
gram execution. The DIM state- 
ment assigns a memory loca- 
tion to each variable, with the 
most used variable at the head 
of the list. I produced the DIM 
statement with Prosoft's Faster 
utility program (which can 
speed a program by more than 
50 percent). 

Line 50 is set to run on 
machines with at least 32K 
RAM. If you have 48K, set it to 
Clear 19000. Increasing the 
amount of string space avail- 



able during a string manipula- 
tion program provides more 
"scratch paper" for the machine 
and improves program speed by 
about 30 percent. 

Deleting the REM lines and 
compacting the program with 
the TRSDOS CMD"C" function 
will speed operation somewhat 
and require less space on your 
disk. 

The video display routines are 
quite simple. The top two lines 
are scroll protected and then 12 
lines (48 names) of program 
listings are printed, followed by 
a prompt to continue scrolling 
when you are ready. 

The update option is a com- 
bination of menu options 4 and 2 
(see Fig. 3). The program first 
displays the file's contents and 
then erases it (if you wish) and 
writes the new disk directory in- 
to the fiie. When adding a new 
disk, the program checks to 
make sure you have not used 
the three character identifica- 
tion number before. When 
choosing an ID remember that 
blanks are sorted before 
everything else and that 
numbers are sorted before let- 
ters. Thus, disk 100 will be put 
before disk 10A. 

Option 8, patterned after 

some Kitchen Table Software 
ideas, tries to keep you from ex- 
iting the program without saving 
your updated file. Lines 290, 
1000, 4180, and 6270 are part of 
the plot. 

Line 130, a toggle switch, 
turns on the special graphics 
characters for the Model III. If 
you run the program twice 
without rebooting, the toggle 
will be off on the second run and 




Let us know 8 weeks in advance so that you won't miss a sin- 
gle issue of BOmicro 

Attach old label where indicated and print new address 
in space provided. Also include your mailing label 
whenever you write concerning your subscription. It 

helps us serve you promptly 



If you have no label handy, print OLD address here. 



n 



^Name 



^Address 
tCity 



Name 



State 



Zip 



print NEW address here: 



U Payment enclosed 

(1 extra BONUS issue] 
U Bill me later 



Address 
City 



State 



Zip 



D Address change only 
U Extend subscription 
D Enter new subscription 

LI 1 year $24.97 Canadian $27.97 US funds, Foreign surface $44.97 US funds, DRAWN ON US BANK ONLY Foreign air mail please inquire. 
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TURN YOUR COMPUTER INTO 
A GMFHICS MACHINE 
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GRAPHIC SYSTEMH 



MIKEEGRAPHIC is a hardware/software 
system designed for the TRS-80 model I & 
III computers. When installed, your 80 will 
come alive with graphic ability!! 

If you've been waiting for a graphic 
system with the best dots/dollars ratio, 
take a look at our MIKEEGRAPHIC.™ 

HAlBWaRE 

• TOTAL SCREEN INVERSE VIDEO 

• TWO MODES OF DENSITY: 

384 x 192 or 191 x 192 for Model I 
512 x 192 or 256 x 192 for Model III 

• EVERY DOT CAN BE SET, RESET or TESTED 

• 12288 BYTES OF FAST 200 ns MEMORY 

• FUNCTIONS SELECTED BY OUTPUT PORT #254. 

• MEMORY MAPPED FOR SPEED 

• OCCUPIES LAST 16K BLOCK OF MEMORY 

• CAN BE USED AS NORMAL MEMORY 

(if you have 32K or more of memory) 

• COLOR COORDINATED ENCLOSURE 

• DOES NOT CONFLICT WITH DISK OR CASSETTE I/O 

• SELF SWITCHING POWER SUPPLY 

(Powers up with Computer) 

• COMES WITH IT'S OWN WALL TRANSFORMER 

• NOT A CHARACTER GENERATOR! ! 

• EASY INSTALLATION 

(Requires only 18 solder connections and 
one trace/pin cut) 

*1 MIKEEGRAPHIC is a trademark for Mikee Electronics Corp 

'2 TRS-80 is a trademark (or the Tandy Corp. 

"3 Opening your TRS-80 will void the limited warranty. 

"4 90 day warranty, full refund or replacement. 

• Formerly named MIKEEANGELO 










SOFTW&RE 



• COMES WITH SAMPLE AND DRIVER SOFTWARE 

• USABLE THROUGH BASIC OR MACHINE LANGUAGE 

• EXCELLENT INSTALLATION/ 
OPERATION MANUAL 

TOOL KITS AVAILABLE FOR JUST $15.00 

MANUAL AVAILABLE SEPARATELY FOR $15.00 
Full price of manual will be deducted from the 
Purchase Price of MIKEEGRAPHIC TM when ordered. 
PREPAID, COD, MASTERCHARGE, VISA, or MASTER- 
CARD ORDERS ACCEPTED. FOB: Bellevue, Wa. 

U.S. Currency ONLY. Stock to 30 days delivery. 
DEALERS INQUIRIES INVITED. 

ORDER NOW FOR ONLY$340. 

Complete with power supply, case software and manual. 

WRITE for FREE BROCHURE or call for 
more information. 



MIKEE ELECTRONICS CORPORATION 



P.O. Box 3813 Bellevue, Washington 98009 
Telephone 206/451-0574 
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IF YOU DON* "T MftV 

time: to create 
your own color 
computer g«mes, 

"THEN "TRY. . . 
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CREATAVA 

FEATURES SEVFN 
PREDESIC3NED TRRGETS 
INCLUDING: 

Communist flags 

Television set 

Whales 

Killer tomat 

Smiley faces 
and 

9 cetTs: '•••.: 

# OR 

9 Design your 

• * invader — 1 i k 
targets with 
£ a few stroke 
•the keyboard 

• Get even witi 
t n i ngs wh i ch 

W you. the most 

• blasting march 
rows of then 
g} CRLRTflVHDER. 



SSEegrtSS?- OR HER softer! 



Hi TEL.413-683-9648 



It GATOR ZONE 



»*SOFTWRRE OUTHORS WELCOMED 



Electronic 

Circuit 

Analysis 



• Detailed analog circuit analysis 

• DC and AC analysis 

• Very fast, machine language 

• Infinite circuits on multiple passes 

• Worst case analysis 

• Dynamic modification 

• 64 Nodes 

" Compare circuits 

• Log or linear sweep 

• Full file handling 

• Frequency response, magnitude and 
phase 

• Complete manual with examples 

• A truly professional program with 
features previously available only on 
large systems 

• TRS-80 model I or model III, disk 
$75.00 

• Also available: "The Mini-Circuit" 
$19.95 cassette for Hobbyists and 
students 

Tatum Labs 
P.O. Box 722 
Hawleyville, CT 06440 
(203) 426-2184 

TRS-80 is a trademark of Tandy Corp. 
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you will get no special charac- 
ters. Hit Break and then type run 
to get them back. POKE 16420,1 
locks the toggle switch "on." 

I have tried to make the pro- 
gram as goof-proof as possible 
by using Enter when you have to 
think about a choice and IN- 
KEY$ when you do not. Almost 
every input from the keyboard is 
checked to see if it is the right 



length or in the right range of 
values. Pressing or entering M 
at almost any input point will 
cancel an option and send you 
back to the menu. ■ 

Robert Athanasiou PhD, MD, 
practices Emergency Medicine 
at Samaritan Hospital in Troy, 
NY. William is a junior at Albany 
High School. 



10 REM J = STRING INDEX FOR THE l-TH ELEMENT OF A$ 

20 REM C= NUMBER OF COLUMNS DESIRED 

30 REM N = NUMBER OF ELEMENTS IN A$ 

40 REM IEC = COLUMN NUMBER IN WHICH J-TH ELEMENT IS PRINTED 

50 REM I = INDEX FOR LOOP STEPPING FROM 1 TO N 

100 INPUT'ENTER THE NUMBER OF COLUMNS DESIRED ";C 

110 REM BE SURE THAT NUMBER OF COLUMNS TIMES NUMBER OF SPACES 

PER COLUMN DOES NOT EXCEED PRINTER WIDTH 
200 FOR I = 1 TO N 
210GOSUB 1000 
220 PRINT A$(J); 
230 IF IEC = CTHEN PRINT '*"* MOVES TO NEXT LINE WHEN END 

COLUMN IS REACHED 
240 NEXT I 

1000 REM ALGORITHM TO CALCULATE J AND IEC 
1010 IIC = INT((I-1)/C) 

1020 MIC = I - C • IIC - 1 '*" MOD(l-1,C) 

1030 INC = INT (NIC) 

1040 MNC = N - C * INC "*' MOD(N.C) 

1050 IF MIC < MNC THEN LESS = MIC ELSE LESS = MNC 
1060 J = LESS + MIC* INC + IIC + 1 
1070 IEC = MIC + 1 '••• COLUMN NUMBER IN WHICH ITEM WILL BE 

PRINTED 
1080 RETURN 

Program Listing 1 



Program Listing 2 



PRINT'BY ROBER 
PRINT"JANUARY 



10 REM *** A DISK DIRECTORY PROGRAM *** 

20 REM *** "DIRECTRY/BAS" 

30 REM *** WILL HOLD A MAX OF DISKS*PROGRAMS = 900 

40 REM *** RUNS 'AS IS 1 ON TRSDOS 1.3 

50 CLEAR 10000 '*** CLEAR AS MUCH STRING SPACE AS 

POSSIBLE. PROGRAM RUNS FASTER 
60 DEFINT X,V,C,J,I,K,L,N,M,A,Q 
70 DEFSTR P,D,R,E,H,B 

80 DIM X,P1$,VL,DN$,XX,C1,JJ,I,R$,E$,K,H$,A,CX,L,N,J,BS 
90 DIM DPS(900) ,DN$(900) ,PNS(900) ,P1S(50) 
100 REM *** THE TWO PREVIOUS LINES HELP THE PROGRAM RUN FASTER 

BY ASSIGNING MEMEORY LOCATIONS TO FREQUENTLY 

USED VARIABLES *** 
110 ON ERROR GOTO 11000 
120 R$="DRIVE :" 

130 POKE 16420,1 '*** LOCKS ON SPECIAL CHARACTERS 

140 H$= CHR$(244)+CHR$(245)+CHR$(246)+CHR$(32) ■*** GIVES YOU 

A HAND ! 
150 CLS:INPUT"IF YOU HAVE ONLY 1 DISK DRIVE ENTER (1) 
IF YOU HAVE 2 OR MORE DRIVES ENTER (2) ";Q 
160 IF Q<1 OR Q>2 GOTO150 

170 CLS:PRINTHS;" A PROGRAM TO INDEX DISK FILES 
T AND WILLIAM ATHANASIOU" : PRINT" ALBANY, NEW YORK 
1982":PRINT 

179 REM ********** MENU ************* 

180 PRINT, "1--BUILD A NEW PILE" 

190 PRINT, "2 — ADD A NEW DISK TO AN EXISTING FILE" 
200 PRINT, "3 — UPDATE A DISK ALREADY ON FILE" 

210 PRINT, "4 DELETE A DISK FROM FILE" 

220 PRINT, "5 — SORT AND LIST BY PROGRAM NAME OR DISK NUMBER" 

230 PRINT, "6 — SEARCH FOR A SPECIFIC PROGRAM OR LIST A DISK" 

240 PRINT, "7 — SAVE FILE 

'DSKINDEX' " 

250 PRINT, "8 — QUIT AND RETURN TO BASIC" 

26 PRINT"PRESS OR ENTER (M) TO RETURN TO MENU AND CANCEL OPTION 

270 PRINT: PRINTHS; :INPUT"ENTER OPTION NUMBER ..." ;K 

280 IF K<1 OR K>8 THEN 170 

290 IF K<5 AND K>0 THEN A=l ELSE A=0 

300 ON K GOTO 6010 ,2000 ,8000 ,8000 ,3000 ,5000 ,7000 ,1000 

999 REM ********* OPTION 8 ************** 

1000 CLS:IF A=l PRINT" YOU MADE CHANGES TO THE 
ELSE 1040 

1010 E$="": PRINT" YOU MAY WISH TO SAVE THESE CHANGES 
INPUT"ENTER <S> TO SAVE THE PILE 
ENTER <M> TO RETURN TO MENU 

ENTER <Q> TO QUIT WITHOUT SAVING THE FILE ";E$ 
1020 IF E$="Q" GOTO 1040 
1030 IF E$="S" GOTO 7030 ELSE 170 



DSKINDEX' FILE.' 



Program Listing 2 Continues 
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.re Dispatcher combines the 
; challenge ot a realistic 
'lation with the ease of. operation 
>ssary to allow you to concentrate all 
your energy and imagination on the job 

-"pi hand. - ^:-;.v- ; >,.#- : V 

You are the forester in charge of a 
district in southeastern Kentucky. Your 
objective is to save the maximum 
possible acreage from fire at the least 
possible cost. Situation variables include 
the number of fires presently burning, 
acres already burned, acres threatened, 
fire spread rate, terrain difficulty, weather 
conditions, the number of men assigned 
to each fire, and the previous experience of your crew leader. 

T80-SG2 Forest Fire Dispatcher is available on cassette and disk. Both versions 
contain a 50 minute game. The disk version also includes a longer lasting pure simulation. 
Your situation can be saved to disk at any time. This allows you to build a history of yourself 
as a dispatcher and improve your performance record over the course of several 
fire seasons. 
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T80-SG2 Forest Fire Dispatcher ... a naturally deep strategy game designed to 



>rovide you with years of pleasurable interaction. 
If you've never been into strategy games b< 



liSi 



24.95 on cassette (16K required) 
29.95 on disk (32K required) 
ipecify Model I (Level 2 BASIC) oi 

~ *e your dealer, 

irect order please specify whether v 
(I III (the media are different) and >.. 
>r cassette. Include $1 .50 and indie 



iMiMm^S^Wmm^m, WBB6 
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mmunications Cor. 

3 Edgebrook Drive 
campaign, IL 
217) 359-841 

Hex: 20699 






INNOVATION / QUALITY / SUPPORT 
AT A REASONABLE PRICE 

PIONFER SOPTWARF 

1746 NORTH WEST 55TH. AVE. #204 

LAUDERHILL, FLORIDA 33313 

PHONE 1- (305) -739-2071 
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URAPHTRAX' [ TAI I CS-UNDERL I NE-DOIIBI F EMP • J 1 1ST j f V TEXT. 

ENTER/EXIT SCRIPSIT AT WILL WITHOUT LOSING TEXT BUF. 

OUTPUT ANY CODE' <S> (0-2S5). DIRECT FROM THE TEXT. 

LETTFR COMMANDS CONTROL <ALL > MX-80 TYPE FONTS FROM 

THE [EX 7 PLUS VAR-l INESPACING, F URMS , TABB I NG + MORE 
4). WRITE FORM LETTERS AND INPUT DATA INTO REPORT FORMS 

BY SPECIFYING AREAS TO INSERT TO DURING PRINTOUT. 
5). DISPLAY ONI Y MODE. HELPS SHOW WHFRF PAGES START/END. 
6). EDIT MODE FOR ERRORS , CHANGES. GRAPHICS OR PAUSING. 
7). PRINT OUT ANY PAGE OR PAGFS IN THE TEXT BUFFER WITH 

HEADFRS. FOOTERS AND PAGE NUMBERS IN PLACE. 
8). PRINT OUT FULL SCREEN PICTURE FILES MADE BY CRAYON ' • 
9). 6 SAMP1 F TEACHING PROGRAMS TO GET YUU STARTED. 
10). 72 PAGE MANUAl . BOUND, INDEXED. PHOTO OFFSET PRINTED. 
11). 2 VERSIONS INCLUDED WORK WITH ANY PARALLEL PRINTER. 
NEW! MICROLINE-82A UNDERL I N I NG-EMPHAS 1 ZED-ALL TYPE FONTS. 
NEW' DAISY WHEFl 2 VER. ALLOWS SUB/SUPER SCRIPTING 10", 12" 
NEW' ♦ PROPORTIONAL , UNDERl INI NG, 1 1/2 LINE SPAC ING . SL ASH 
NEW' ZERO'S, EMPHASIZED PRINTING, KB. ECHO, OVERSTR IK ING. 

MX-80 VER. WORKS WITH/WITHOUT GRAPHTRAX -MOVE UP ANY TIME' 
DISK SCRIPTR MOD 1/3 = «40.00 MOD III. VERSION WORKS WITH 
MODEL I. SCRIPSIT/LC - NO USER PATCHING REO. FOR MOD 1/3 
CASSETTE SCRIPTR MOD 1/3 « *40.00 WORKS WITH REG. SCRIPS. 
1.0 FOR MOD 1/3 REQ. 32k. + LC/MOD SCRIPTR IS A 5.5k. PROG. 
BUY SCRIPTR DURING .TUNE AND GET *5.00 OFF THE REGULAR ** 
SCRIPTR IS WELL DOCUMENTED AND BUG FREE' CUSTOMER SUPPORT 
SATURDAYS + EVENINGS FOR YOUR CONVENT ENCE , FREE BROCHURE 1 ' 



<<<< PLEASE INCLUDF THIS INFORMATION WHEN ORDERING >>>> 
NAME B»BB_.__| MODEL 1 OR 3 _ I CASSETTE/DISK 
ADDRESS ___._.! TYPE PRINTER _ I SCRIPSIT VER #. 
CITY/STATE/ZIP/PHONF | MEMORY CONE I G . _ I PAYMENT METHOD 
CHECKS MONEY ORDERS PREFERRED - COD - S ALSO ACCEPTED 



ERR 



ON 



......----...........>_-.-_--- 



BUY CRAYON AND SAVE BIG ON PRINTING COSTS ' ' ' 

YOU'VE SEEN THE ADS FOR OTHER DRAWING PROGRAMS. SOME 

CHARGE AS MUCH AS *150.00 FOR THE ABU ITY TO ADD GRAPHICS 
TO YOUR PRINTOUTS. CRAYON ISN'T A CONVFRTFD TFXT PROCESSOR 
CRAYON WAS DESIGNED FROM THE GROUND UP TO GIVE YOU THE 
VERY FINEST GRAPHIC'S EDITOR POSSIBLE. COMPLEX GRAPHICS 

REQUIRE ROUTINES TO MOVE AND MANIPUIATF GRAPHICS THAT NO 
TFXT PROCFSSOR CONTAINS. ALSO CRAYON PRODUCES SUPER HIGH 

SPEED GRAPHICS. NO OTHER PROGRAM CAN DO AS MUCH FOR AS 

SMAI 1 AN INVESTMENT. IF YOU ALSO BUY SCRIPTR YOU CAN 

LOAD CRAYON FILES DIRECTLY INTO SCRIPSIT DURING A PRINT- 
OUT. BEFORE YOU WASTE YOUR MONEY ON HALF A PROGRAM CHECK 
OUT CRAYON'S MANY FEATURES. CRAYON DOES IT ALL • • ' 

II. TYPESET LOGO'S - LETTERHEADS - ENVELOPES - BUSINESS 
CARDS AND OTHER OFFICE FORMS. THIS AD WAS TYPESET 

FROM AN MX-80 PRINTOUT THEN SHRUNK. COST - »4.50 

IF AD WAS TYPESET AT A PRINTSHOP THE COST = *200 + 
2). CREATE AND RUN REAL CARTOONS WITH CRAYON AND THEN 
RUN YOUR CARTOONS FROM BASIC AT ASSEMBLY LANGUAGE 
SPEEDS. SPEEDS OF 35 FRAMES/SECOND POSSIBLE. USE IT 
TO DESIGN DISPLAYS FOR USF IN BASIC S. ASSEMBLY PRUG'S 
3). MANAGE DISKETTE DIRECTORIES, PRINT THEM, SEARCH THEM, 
COMMENT THEM. MOD 3 DIR. WORKS ON A TRSDOS SYS. ONLY. 
4). DRAW ANYTHING YOU DESIRE ONTO THE SCREEN AND PRINT IT 

OUT OR SAVE IT TO DISK/TAPE - UP TO 30 SCREENS/FILE. 
->) . MANAGE AN APPOINTMENT SCHEDULE , KEEP RECORDS , L I STS OR 

MENU'S. SAVE /RECALL INFORMATION QUICK AND EASY. 

b) . PERFORM ALL VIDEO WORKSHEET FUNCTIONS RIGHT ON SCREEN 



2! 



-- U , IP" L»t A t U 

BE 



USER FRIENDLY / 42 PAGE DOC'S. OFFSET PR I NTED, I NDEXED 

NINE CHARACTER USER DEFINED CURSOR. > ■■[ ■ ■ 

3). 16 LETTER COMMANDS FOR GRAPHICS ENTRY. | % I TYPE 

4). COPY CHARACTERS IN ANY DIRECTION FAST. 
5). UPPER/LOWER CASE SUPPORT WITHOUT DRIVERS. 
6). DO ALL OF THE FOLLOWING ON VARIABLE LENGTH L INES- > 
COPY-FILL- DELETE -EXCHANGE -MOVE-PULL-UC/LC- INVERT 
GRAPHICS-PRINT-JUSTIFY TEXT-BUFFER/RESTORE TO SCREEN. 
7). UTILITIES INCLUDE — > MASK - AUTOMATIC PRINTS NUMBERS 
CURSOR LOCATION AND VALUE-3 SELECTIVE CI S ' S-PATTERN- 
EXTRA BUFFERS-SCREEN OVERWRITE-HEXDUMP-5EARCHES. MORE 
8). FULL DISK / CASS I/O DI R-WR I TE-LOAD-APPEND-COPY-K I L.L 
SCREENPRINT- OUTPUTS CODES TO DRIVE ANY PARALLEL PRINTER 
PROFESSIONALLY WRITTEN S< SUPPORTED-NO BUGS -2 YRS.IN DESIGN 
OVER 90 COMMANDS -> FAST / EASY / FUN <- ALL MACHINE LANG. 
CASS MOD 1+3-435.00 / DISK MOD 1 OR 3»«45.00 10K PROGRAM 
WORKS IN 16K. OR MORE AND ADJUSTS TO MEMORY SIZF CHANGES. 
ESPECIALLY FOR MX-80, MICROLINE80 AND OTHER BLOCK GRAPHIC 
PRINTERS. PRINTER NOT REQ. FOR FILE HANDLING + CARTOONS. 
^, CALL / WRITE FDR OUR FREE (8) PAGE BROCHURE 

ff ■ ■■ ■ ■ ■■■■■■ ■ ■■■■■ ■ m 



Program Listing 2 Continued 

1040 CLS:INPUT*IF YOU'RE SURE YOU WANT TO QUIT THEN ENTER (QUIT) 

ANY OTHER WORD WILL RETURN YOU TO THE MENU";R1S 
1(150 IF R1$="QUIT" THEN END ELSE 170 

1999 KEM ********* OPTION 2 ************** 

2000 IF L=0 THEN GOSUB 7140 '*** INPUT FILE, CHECK FOR DUPLICA 
TE ID *OPTION 2* 

2010 GOSUB10010 '*** DISK ID ENTRY SUBROUTINE 

2020 FOR X=l TO XX: IF DNS=DNS(X) THEN GOTO 2040 

2030 NEXT : GOTO 6020 '*** GOES TO VIDEO READ ROUTINE 

2040 PRINTHS;" THE ID ";DN$;" HAS ALREADY BEEN USED FOR A DISK T 

HAT IS ON FILE. USE ANOTHER ID OR OPTION 3." 

2050 ES="" :PRINTH$; : INPUT" ENTER (M) FOR MENU OR (A) TO ENTER ANO 

THER ID";ES 

2060 IF E$="A" THEN 2010 ELSE 170 



INPUT FILE, SORT AND THEN PRINT 
(P)" 



2999 REM ********* OPTION 5 

3000 IF I. = THEN GOSUB 7140 
DATA 

3010 PRINT'LISTING MAY BE BY DISK (D) OR BY PROGRAM 
3020 E$="": INPUT" ENTER YOUR CHOICE, .. (D/P) ";E$ 
J.iJB IF ES="M" GOTO 170 
3040 PRINT: INPUT"ENTER (P) FOR PRINTOUT OR (V) FOR VIDEO ONLY... 
";B$:CLS 

3 050 IF BS="M" GOTC 17 

3060 IF ES="D" GOTO 3080 

3070 IF Eo = '?" GOTO 3290 ELSK 170 

3080 FOR X=l TO XX:DP$(X)=DNS(X)+PN$(X) :NEXT '** PUT DISK* FIRS 



m, DP$(l):POKE 16916,2 '** 

'; :NEXT 



SORT: SCROLL PROT 



3090 N%=XX:CMD"0" 

ECT TOP 2 LINES 

3100 FORI=l TO 4:PRINT"DSK PROGRAM 

3110 PRINTSTRINGS(64,"-") :C1=0 

3120 FOR X=l TO XX 

3130 PRINT LEFTS(DP$(X) ,3) ;" " ;MID${DP?(X) , 4 ,10) , 

3140 C1=C1+1: IF Cl<>48 THEN 3180 '**FILL SCREEN THEN WAIT FOR 

ROMPT 

3150 PRINTHS; "PRESS ANY KEY TO CONTINUE DISPLAY" 

3160 I? :NKEY$="" THEN 3160 

3170 Cl-0 

3180 NEXT : PRINTHS; "PRESS ANY KEY TO CONTINUE ": POKE 16916,0 

'*** RESET SCROLL PROTECT TO ZERO LINES 

3190 IF r.NKEY$ = "" THEN 3190 
3200 IF INKEY$="M" THEN 170 



3210 IF B$<>"P" G 

UESTED 

3220 FOR 1=1 TO 4 

3230 LPRINT'DISK 
3240 C=4: N=XX 



RETURN TO MENU IF NO PRINTOUT REQ 



PROGRAM 



,45) 



" ; : NEXT : LPRINTSTRINGS ( f 
C= NUMBER OF COLUMNS 
N= NUMBER OF ELEMENTS IN STRING 

3250 FOR 1=] TO N 

3260 GOSUB 9010 '*** VERTICAL RASTER SUBROUTINE 

3270 LPRINT" ";LEFT$(DP$(J) ,3) ;" " ; RIGHTS (DP S ( J ) , I 2 ) ; " 

3280 NEXT :LPRINTCHRS(10) : I.PRINTCHRS ( 1 ) :GOTO170 

'*** CHR$(10) = LINE FEED FOR MY PRINTER 

3290 FOR X=l TO XX ' *** PUT PROGRAM NAME FIRST IN STRING 

3300 DP$(X)=PNS(X)+DNS(X) :NEXT 

3310 N%=XX:CMD"0", N% , DPS(l) 

3320 CLS:P0KE 16916,2 ■*** SCROLL PROTECT 2 LINES 

3330 FOR 1=1 TO 4: PRINT" PROGRAM DSK " ; : NEXT: PRINTSTRINGS (6 4 , 

45) :C1=0 

3340 FOR X=l TO XX 

3350 PRINT LEFT$(DPS(X) ,10) ;" "; RIGHTS (DPS (X) , 3) , 

3360 C1=C1+1: IF Cl<>48 THEN 3400 

3370 PRINTHS; "PRESS ANY KEY TO CONTINUE THE DISPLAY" 

3380 IF INKEY$="" THEN 3380 

3390 C1=0 

3400 NEXT :PRINTHS;" PRESS ANY KEY TO CONTINUE" : POKE 16916,0 

3410 IF INKEYS="" THEN 3410 

3420 IF B$<>"P" GOTO 170 

3430 FOR 1=1 TO 4 : LPRINT "PROGRAM DISK " ; : NEXT: LPRINTSTRIN 

GS(80,45) 

3440 C=4: N=XX •*** C= NUMBER OF COLUMNS 

N= NUMBER OF ELEMENTS IN STRING 

3450 FOR 1=1 TO XX 

3460 GOSUB 9010 '*** VERTICAL RASTER SUBROUTINE 

3470 LPRINT LEFTS (DPS ( J) , 12 ) ; " " ; RIGHTS (DPS ( J) , 3 ) ,- " 

3480 NEXT :LPRINTCHR$(10) ;CHRS(10) : GOTO 170 



****** OPTION 4 (PART 2) ************** 
BEGINS ROUT. TO BLANK OUT PROGRAMS 



3999 REM * 

4000 CX=0 ■» 
4010 FOR X = 1 TO XX 
4020 IFDN$(X)ODN$ GOTO 4040 

4030 DN$(X)="ZZZ":PN$(X)="ZZZ":CX=CX+1 '*** BLANK OUT DATA TO 

BE DELETED WITH -Z- SO SORTING WILL PLACE THEM AT END OF STRING 
4040 NEXT X 

4050 IF CX=0 THEN PRINT'DISK ";DN$;" WAS NOT FOUND. "ELSE GOTO 40 

60 

4060 E$="":PRINTH$;s INPUT'ENTER (M) TO RETURN TO MENU OR (D) TO 

DELETE ANOTHER DISK";E$ 
4070 IF E$-"D" THEN 8010 ELSE 170 
4080 FOR X=1T0XX:DP$(X)=DN$(X)+PN$(X) :NEXT 
4090 N%=XX: CMD"0", N% , DP${1) '*** SORT SO DATA TO BE DELETED 

IS AT THE END OF STRING 
4100 XX=XX-CX ■*** SHORTEN THE FILE LENGTH INDEX NUMBER 
4110 FOR >:-: TO XX:DNS(X) ^LEFTS (DPS (X ) , 3) : PNS (X) =RIGHTS (DPS (X) , 1 

2! ; r;EXT 

4120 PRINT" DATA PERTAINING TO DISK "jDNSl" HAVE BEEN DELETED." 
4130 PRINTCXj" PROGRAM NAMES HAVE BEEN ERASED AND THE FILE" 
4140 PRINT" NOW CONTAINS ";XX;" PROGRAM NAMES." 

4150 IF K=3 THEN PRINTHS;" NOW GOING TO UPDATE FILE": FOR I-1TO20 
00:NEXT:I=0: GOTO 6020 '***TRANSFER FOR UPDATE OPTION*** 

4160 E$=": PRINTHS;: INPUT'ENTER (D) TO DELETE ANOTHER DISK 

ENTER (S) TO SAVE FILE ";ES 
417 IF E$="D" GOTO 8010 

4180 IF E$="M" GOTO 170 ELSE 7030 '*** ANYTHING BUT D OR M SAV 
ES !■ II.E 



4999 REM ********* OPTION 6 

5000 IF L=0 THEN GOSUB7140 

R PROGRAM 



OPTION 6 SEARCH FOB DISK 

Program Listing 2 Continues 
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Program Listing 2 Continued 

5010 E$="iPRINT:INPUT"ENTER (D) TO LIST A DISK, 
ENTER (P) TO SEARCH FOR A PROGRAM" ;E$ 
5020 IF E$»"D" GOTO 8010 ■ 

5030 IF E$="P" CLS ELSE 170 

5040 PRINT "TO SEARCH FOR A PROGRAM, 

ENTER THE FIRST 5 LETTERS OF THE PROGRAM NAME. 

INCLUDE TRAILING BLANKS IF THE NAME IS SHORT." 

5050 PRINT: PRINT"ALI. PROGRAMS BEGINNING WITH THE SAME 5 LETTERS 

WILL BE DISPLAYED." 

5060 PRINT SPRINTH$; "PRESS ANY KEY TO CONTINUE" ! PRINT 

5070 IF INKEY$="" THEN 5070 

5080 IF INKEYS="M" THEN 170 

5090 IF L-0 THEN GOSUB 7140 

5100 P1$»"":CLS:INPUT"ENTER FIRST 5 LETTERS OF THE PROGRAM NAME. 

..";P1? 

5110 IF P1$-"M" GOTO 170 

5120 IF LEN(P1$)<5 THEN PRINT: PRINTCHRS ( 236) ;CHR$ ( 236) ; " READ T 

HE DIRECTIONS AGAIN DUMMY ! " ; CHR$ ( 23 6 ) ; CHR$ ( 236 ) : PRINT: GOTO 504 



5130 PIS-LEFTS (PI $,5) :J=0 

5140 FOR X=l TO XX '*** SEARCH FOR NAME, PLACE IN JTH POSITION 

5150 IF P1S=LEFTS(PNS(X) ,5) THEN GOTO 5160 ELSE 5170 

5160 J=J+1: P1S(J)=PNS(X)+DNS(X) 

5170 NEXT X 

5180 IF JOB GOTO 5200 

5190 PRTNT" PROGRAM " ; PI $ ; " WAS NOT FOUND": GOTO 5220 

5200 CLS:PRINTTAB(5); "PROGRAM"; :PRINTTAB( 20) ; "DISK" : PRINTSTRINGS 

(60,45) SPRINT 

5210 F0RI=1T0J:PRINTTAB(5)»LEFT$(P1S(I) ,12) :" ", -RIGHTS (PIS ( I 

),3)sNEXT 

5220 £$■="" :PRINTjPRINTH$;:INPUT"ENTER (a) TO SEARCH FOR ANOTHER 

PROGRAM OR 

(M) TO RETURN TO THE MENU."jE$ 
5230 IF ES-"A" THEN GOTO 5100 ELSE GOTO 170 

5999 REM ********* OPTION 1 ************** 

6000 REM *** ROUTINE TO READ DATA FROM VIDEO DISPLAY 
6010 COSUB10010 

6020 VL-15360: XX=XX+1 '*** START OF VIDEO DISPLAY IN R 

AM 

6030 CLS: IF 0=1 PRINT"REMOVE DISK FROM DRIVE (0) AND INSERT DISK 

";DNS:GOTO6050 

6040 PRINT: PRINT" INSERT DISK ";DNS;" IN DRIVE 1" 

6050 PRINT: PRINTHS; "PRESS ANY KEY WHEN READY TO CONTINUE." 

6060 IF INKEY$="" THEN 6060 

6070 IF INKEYS="M" THEN 170> 

6080 P1S=" 

6090 IF Q=l THEN CMD"D:0" 

6100 CMD"D:1" '*** DISK BASIC COMMAND TO DISPLAY DIRECTORY 

6110 PRINT@530, "WORKING... PLEASE WAIT" 

6120 FOR 1=1 TO 4:FOR X=0 TO 11 '*** ACCUMULATE PROGRAM NAME 

6130 PIS =P1$+CHRS(PEEK(VL+X)):NEXT 

6140 IF R$=LEFT$(P1S,7)THEN 6150 ELSE 6160 '*** SKIP (DRIVE :) 

6150 XX=XX-1:GOTO6190 

6160 IF P1S=" " THEN 6170 ELSE 6180 '*** ??? LAST 

VIDEO LISTING 
6170 XX=XX-1 :GOTO6240 
6180 PNS(XX)=P1S: DN$(XX)=DN$ 
6190 P1S="" 

6200 XX=XX+1:VL=VL+15 '*** INCREMENT TO NEXT VIDEO LISTING 

6210 NEXT I 

6220 VL=VL+4 '*** INCREMENT TO NEXT VIDEO ROW 

6 23 GOTO6120 '*** RETURN TO READ NEXT ROW 

6240 L=l '*** L FLAG SHOWS INDEX DATA IS IN RAM 

6250 CLS:ES-""lINPUT"ENTER (D) TO INDEX ANOTHER DISK, 

ENTER (M) TO RETURN TO MENU, 

ENTER (S) TO SAVE FILE THEN RETURN TO MENU"jE$ 
6260 IF ES-"D" GOTO 6010 
6270 IF E$="M" GOTO 170 ELSE 7030 

6999 REM ********* OPTION 7 ************** 



7000 IF L=l GOTO 7030 

7010 PRINT'SORRY, THERE IS NO FILE NOW IN RAM TO BE SAVED"; 

HS; "PRESS ANY KEY TO RETURN TO MENU" 
7020 IF INKEYS="" THEN 7020 ELSE GOTO 170 

7030 CLS: PRINT: IF Q=l PRINT"BE SURE THAT THE PROGRAM DISK 

IS IN DRIVE (0) IN ORDER TO SAVE THE 'DSKINDEX' FILE." ELSE 7060 

7040 E$="" :PRINT:PRINTHS; : INPUT'ENTER <C> WHEN READY TO CONTINUE 

";ES 
7050 
7060 
7070 
7080 
7090 
7100 



WRITE TO DISK ROUTINE 



7110 
7120 
7130 
7140 
7150 
7160 



IF ES="C" GOTO 7060 ELSE 176 

OPEN"0",l, "DSKINDEX" " 

PRINT#1,XX 

FOR X=l TO XX 

PRINT#1,DN$(X) ;",";PNS(X) : NEXT: CLOSE : I,=0 

REM *** QUOTED COMMA ALLOWS RETRIEVAL OF DATA AS 2 STRINGS 

L FLAG MEANS DATA ARE SAVED ON DISK AND MUST BE 

REREAD BEFORE ANY MANIPULATIONS. 
PRINT'FILE SAVED AS 'DSKINDEX' WITH " ; XX ; " RECORDS." 
PRINTHS; "PRESS ANY KEY TO RETURN TO MENU." 
IF INKEYS="" THEN 7130 ELSE 170 

OPEN"I",l, "DSKINDEX" '*** SUBROUTINE TO READ FROM DISK 
INPUTtl,XX 
FOR X=l TO XX:INPUT#1,DNS(X) ,PN$(X) : NEXT: CLOSE : L=l : RETURN 



7999 REM ********* OPTION 3 ************** 

8000 IF L=0 GOSUB 7140 
8010 GOSUB 10010 

8020 JJ=0 '*** CHECKS AND LISTS PROGRAMS ALREADY IN FILE 

8030 FOR X=l TO XX 

8040 IF DNSODNS(X) THEN GOTO 8060 

8050 JJ=JJ+1: P1S(JJ)=PNS(X) 

8060 NEXT 

8070 IF JJ=0 THEN PRINT : PRINT'DISK ";DN$;" WAS NOT FOUND" : PRINT: 

GOTO8130 

8080 CLS: PRINT:PRINT"THESE PROGRAMS ARE ON DISK "; DNS; ":": PRINT 

8090 FOR 1=1 TO JJ:PRINT PIS ( I ),: NEXT: PRINT 

8100 IF K<5 AND K>2 THEN PRINT'ENTER <C> TO CONTINUE... <M> TO R 

ETURN TO MENU" ELSE 8130 

8110 E$="": INPUT ES: IF ES="C" THEN GOTO 4000 ELSE 170 

8120 PRINT:PRINT"DISK ";DNS;" WAS NOT FOUND." 

8130 PRINTHS; :INPUT"ENTER <M> FOR MENU OR <D> TO ENTER ANOTHER D 

ISK ID";E$ 

8140 IF ES="D" THEN 8010 ELSE 170 

8150 IF INKEYS="M"THEN 170 ELSE RETURN 

9000 REM *********** VERTICAL RASTER SUBROUTINE ************** 

C= NUMBER OF COLUMNS DESIRED 

J= STRING INDEX FOR EACH STRING ELEMENT ACCORDING 
TO COLUMN ASSIGNMENT 

N= NUMBER OF ELEMNTS IN STRING 
9010 IIC = 1NT( (I-D/C) 
9020 MIC=I-C*IIC-1 '*** MOD(I-l,C) 
9030 INC=INT(N/C) 

9040 MNC=N-C*INC "** MOD(N,C) 

9050 IF MIC<MNC THEN LESS=MIC ELSE LESS=MNC 
9060 J= LESS+MIC'INC+IIC+1 
9070 RETURN 



***.**.*****.* DISK ID SUBROUTINE *************** 
:PRINT:PRINTH$;:INPUT"ENTER THE 3 CHARACTER DISK ID 



10000 REM 

10010 DNS= 

";DNS 

10020 IF DNS="M" GOTO 170 

10030 IF LEN(DNS)<>3 PRINT: PRINT'WRONG LENGTH ID... TRY AGAIN 

GOTO10010 

10040 RETURN 

10999 REM ************** ERROR TRAP ************ 

11000 CMD"E" 

11010 PRINT'PRESS ANY KEY TO RESUME" 
11020 IF INKEYS="" THEN 11020ELSE 170 



DISCOU 



%J 



100% RS Components • No Foreign Drives or Memory 

FULL WARRANTY 

$815 LINE PRINTER VI $975 

$1998 LINE PRINTER VII $ 299 

$3120 LINE PRINTER VIII $ 599 

$4930 DAISY WHEEL II $1599 

$ 210 per 100 MEMOREX 8" Dbl. Density $ 270 per 100 

$ 220 per 100 ALL RS SOFTWARE 20% Off 

ALL OTHER ITEMS CARRY SIMILAR PRICING. CALL FOR PRICES. 
Cashiers Check or Money Order must accompany all orders. 
Shipped Freight Collect 

(214)271-2955 
NOCONA ELECTRONICS DLR#F-731 BOX 2063 GARLAND. TX 75041 



16KMODIII 

48K MOD III 2 Dr. RS232 

64KMODII 1 Dr 
128KMOD16 2Dr 
VERBATIM 5 V* Datalife 
VERBATIM 5 1 /4 Plastic Box 



^See List o! Advertisers on page 386 
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GENERAL 



CP/M printer-driver and Model II TRSDOS. 



Hood 




ing TRSDOS 



Linda Anderson 

1188 Olive Branch Lane 

San Jose, CA 95120 



My husband and I pur- 
chased a Model II with a 
Diablo 1.650 printer. However, 
this configuration prohibited 
listing output from TRSDOS. I 
PEEKed and POKEd into both 
TRSDOS and CP/M to see what 
caused the problem. 

In TRSDOS, I found a lengthy 
routine with lots of bit checking 
and bit setting of error conditions 
(I followed SVC 63: BTX, which 
resulted, ultimately, in JMP 
F1BDH). In CP/M I found a rou- 
tine that waits for a printer ready 
status and then sends the char- 
acter to the printer (via Port B). 
This means there is no error re- 
covery, but we were doing fine in 
CP/M. The reason TRSDOS failed 
to work was the pins from our 
Diablo were different than those 



expected by TRSDOS. The solu- 
tion as I saw it, was to trans- 
plant the CP/M print routine to 
TRSDOS. 

Performing the Transplant 

I wrote an Assembly language 
program (Fig. 1) to move the 
CP/M print routine over the ex- 



isting TRSDOS routine. I used 

the Debug monitor to enter the 

code into memory (Fig. 2). Then, 

back in TRSDOS, I dumped the 

code onto disk as an executable 

program which can then be 

executed with: >SPRNTR/CMD 
in TRSDOS. 

Then I created a TRSDOS com- 



mand file, Starter, with the Build 
command (Fig. 3). I made Starter 
an Automatic Command File. 
Now every time I boot, Port B is 
initialized and the CP/M print 
routine moves over the TRSDOS 
routine. I solved the problem by 
tinkering with memory, not the 
System disk. ■ 



7000 


01 


11 


00 




LXI 


B,17 


;MOVE 17 BYTES 


7003 


11 


CO 


Fl 




LXI 


D,0F1BDH ; DESTINATION 


7006 


21 


oc 


70 




LXI 


H , PROUT 


; PRINT ROUTINE 


7009 


ED 


B0 






LDIR 




; BLOCK MOVE 


700B 
700C 


C9 
C5 








RET 






PROUT 


PUSH 


B 




700D 


D5 








PUSH 


D 




700E 


E5 








PUSH 


H 




700F 


DB 


F7 




LOOP 


IN 


A,(F7) 


; CHECK PRINTER READY 


7011 


E6 


04 






AN I 


04 




7013 


28 


FA 






JR 


Z,LOOP 


;WAIT FOR PRINTER READY 


7015 


78 








MOV 


A,B 


;CHAR TO PRINT 


7016 


D3 


F5 






OUT 


(F5),A 


;SEND TO PORT B 


7018 


AF 








XOR 


A 


;SET STATUS FLAG 


7019 


El 








POP 


H 




701A 


Dl 








POP 


D 




701B 


C 1 








POP 


8 




701C 


C9 








RET 
















Fig. 1. SPRNTR/CMD 





>DEBUG ON 


turn on debug monitor 


>DEBUG 


enter debug monitor 


?M A = 


7000 change memory at 7000H 


(F1) 


move cursor to 7000H 


—■enter code shown in fig. 1 


(F2) 


effect change 


?s 


return to system 


>DEBUGOFF 


turn off debug monitor 


>DUMP SPRNTR/CMD START = 7000, END = 7000 




Figure 2 



>BUILD STARTER 


create auto command file 


SETCOM B = (300, 7, E 


1) initialize port B 


SPRNTR/CMD 


execute SPRNTR/CMD 


FORMS S 


set serial printer 


>AUTO DO STARTER 


TRSDOS will automatically execute 




the STARTER command file 




Figure 3 
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BUILD THIS DIGITAL PLOTTER 
AT HOME FOR UNDER *20QQ° 




F0R S I9.95 YOU GET PRO QUALITY BLUE- 
PRINTS, SCHEMATIC, PARTS LIST, ASSY. 

INSTRUCTIONS AND NECESSARY SOFT- 
WARE FOR MODEL I OR HI . 
ACCOMMODATES PAPER UP TO 18 X 24. 
ADD '9.95 FOR 10 PROGRAMS INCLUDES 
PLOTTING GRAPHS, RADII NUMBERS A 
3-D CUBE AND MORE. /TO 

SENO CHECK OR MONEY ORDER TO- 

R M.W. 7741 ALABAMA AVE. tt8 
C A NOG A PARK, CA, 91304 



PORTFOLIO ANALYSIS 

Track and Analyze youi stock portfolio with 
these programs lor the TRS-80' Mod 1 & 3. 

the Stock Analysis Package consists of tour programs 
which allow Database creation & maintenance; Graphing of 
prices, moving avg & volume, and Generation of a Portfolio 
Analysis Report to evaluate your market position 

Programs are written in BASIC and are MENU driven with 
Error Trapping for ease ol use 

TRS-80* Mod 1 or 3. 48K & one disk drive required. 
Printer required loi Portfolio Analysis report Price foi the 
entire package is $74 95. To order or to receive more infor- 
mation. fill out coupon below or call (214) 86?-5S5!i VISA & 
MC are accepted 



P.Tree Enterprises Suite 269 

2701-C West 15th Street Piano, Texas 75075 

1 1 Payment enclosed or charge my f"1 VISA l~l MC. 

Please send more information. 

name ... 



Address. 

City. 

Account # Exp Date 

"TRS-80 is a trademark of the Tandy Corp ^ 383 



for POCKET COMPUTERS 

Game Pac 1: OLD FAVORITES 

Five proven games, updated with exciting new fea- 
tures. Fun for all 1 PLANET-Land on any planet. ZILCH- 
Bagles, 1-9 digit numbers. HILO-Nifty version of Stars. 
COINS-Computer "learns" to win. WINNER-You Lose! 
Includes complete notes and listings $9. 

with cassette $14. 
BEGINNERS GUIDE TO PROGRAMMING 
the Sharp/Radio Shack Pocket Computer 
It's fast, fun and easy You'll understand every word 
and be amazed how eas:!v you progress No other 
method brings positive results so quickly $19. 

YOU AND YOUR DOLLARS: ALL ABOUT INTEREST 

99 basic questions answered was 1 7 dynamite pro- 
grams. Includes variable and fixed rate home loans 
Also annuities, present and future value, notes and 
contracts, case flow analysis sod much more. $19 
with cassette $33. 

(Remit in US tunds Add $2 tor first class delivery Add $3 il outside 
U S. Calif add 6°« sales tax.) 

AND WE HAVE OTHERS! For a copy of our catalog, 

circle our number on your bingo card or write directly 

HANCO Software (formerly XCEL) 
P.O. Box 4772H, Sylmar. CA 91342 
(213)367-4366 ^ 370 



TRS-80™ 
BUSINESS SOLUTION 

Tired of switching printer cables between 
printer # 1 and printer #2"? Here is the solution. 
The Model SW17-A Printer Switcher is your 
answer. The SW1 7-A Switcher is a solid-state 
(no relays) printer switcher designed with 
your office efficiency in mind— simple to op- 
erate, with the single remote switch, yet posi- 
tive in operation, Absolutely no data dropout. 
Available for TRS-80'" Model I, II, III, cables, 
remote switch, and power supply are in- 
cluded. 1 year limited warranty. 

$249.95 

Rease specify computei and printer models, 
sorry, no C.O.D. 

Wizard Electronics, Inc. 

P.O.B. 47842 • Doraville, GA 30362 

404 261-2653 



PRINFLR#1 



SW17-A 
I ' 



PRINTER #2 



TRS-80" 



T-fRS] 



^381 



TRS-80'" is a registered trademark of Tandy Corporation 



EFFECTIVE 
IMMEDIATELY: 



Canadian subscriptions, $27.97 
1 year only, U.S. funds 
Foreign surface, $44.97 
1 year only, U.S. funds 

Foreign air mail, please inquire. 



[All previous subscription 

offers void as of 

February 1, 1982.] 





lafc I 




COLOR COMPUTER SOFTWARE 



EDITOR ASSEMBLER 
DEBUGGER 



$ 6 



95 



CCEAD: This 8K Basic Program supports cassette files, has full cursor control, line in- 
sertion/deletion, and much more. Two pass assembler supports full 6809 instruction set 
& addressing modes, lists to screen or printer Debugger allows memory examine/ mo- 
dify, program execution. If not delighted return within 2 weeks for a full refund You get 

fully commented Basic source & complete instructions. Requires Ext. Basic & 16K 

CASSETTE $6 95 

DELUXE TERMINAL PROGRAM 

COLORCOM/E: This terminal program has everything! PLUS it's in a convenient plug- 
in cartridge. LOOK at these features. 

• Complete upload & download support • Automatic or manual capture 

• Selectable baud rate & parity • Selectable Capture characters 

• Full or half duplex • Exchange Basic programs 

• Write to any printer or cassette • Word mode means no split words 

• Supports ANY serial printer • And much, much more 

Use with CompuServe, The Source, etc. Talk to other Color Computers, Works with any 
model Color Computer & full duplex RS232 modem CARTRIOGE $49.95 

STRIPPER: 1 he Stripper takes off all that excess fat in your Basic Programs Three valu- 
able commands: ( 1 ) Delete Remarks; (2) Pack Lines; (3) Delete Spaces Fully automatic, 
is not fooled by GOTO's, GOSUB's, etc. Your programs will run faster and take up much 
'ess memory CASSETTE $7,95 

BOOTSTRAP: This Cartridge automatically loads and executes Basic programs from 
cassette at power-up. Can't fail. Ignores data files, Machine Language files, or Basic files 
that have errors. For those programs that have to run! CARTRIDGE $34 40 

RS232 EXPANSION CABLE: With this cable you can connect 2 devices at the same 

time to the RS232 part of your Color Computer. Great tor printer & modem 

RS232 Cable $20 00 

CUSTOM CARTRIDGES: Put YOUR Basic program into a convenient ROM Cartridge. 
It'seasy! Runs instantly at power-up. frees up memory. Use for Ad displays, schools, etc. 
Call or write for info FROM $41 .65 



Send check, money order, 

or Visa/MC Number, 

Include $1 for postage and 

handling; Visa/MC: Phone 

for fast service. 




P.O.Box 10234 
Austin. Texas 78766 
(512)837-4665 

^154 



sSee : isl ol Advertisers on page 386 
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TECHNIQUE 



Use STRINGS to pack those strings. 




NG$'s the 




%^J 



Tim Knight 

10 Fieldbrook Place 

Moraga, CA 94556 



Data statements are impor- 
tant in Basic programming, 
with applications ranging from 
business to games. Liberal use 
of the statements can make a 
program more efficient, especi- 
ally if it contains much data for 
strings. Using Data statements 
saves time and memory. There 
is even a way to use the data 



The Key Box 

Basic Level II 
Model I and III 
16K RAM 



itself more efficiently. This 
technique saves memory, a 
large amount of the program- 
mer's time, and reduces a pro- 
gram's running time. 

The Read command retrieves 
Data statements from within a 
program. For example, the word 
computer may follow a Data 
statement, and may be retrieved 
by the command READ A$ else- 
where in the program. You may 
form strings using Data state- 
ments. A very popular way of 
forming strings is to read num- 
bers from a Data statement, and 
gradually build up each string 
(see Program Listing 1). This is 
inefficient since every time you 
run the program, it must form 
the string. 

String packing is far more effi- 
cient since the Read statement 



10 


1 Program 


#1 - 


Reads 


DATA 


statements and 


forms a 


string 


that 


says "HI" 




















20 


CLEAR 500 




















33 


DEflNT A-Z 


















40 


CLS 




















50 


READ A 




















60 


IF A-999 THEN 


'RINT 


AS: END 












70 


A$=AS+CHRS(A) 


















80 


GOTO 50 




















90 


DATA 191, 


191, 


176, 


176, 


17 6, 


191, 191 










100 DATA 128 


131 


, 131, 


191 , 


191 


, 131, 131, 


26 








110 DATA 24, 


24, 


24, 2' 


, 24, 


24, 


24, 24, 24 


I 24, 


?4, 


24, 2' 


, 24 


120 DATA 191 


191 


, 131, 


131, 


lit 


, 191, 191, 


128, 


176 


, 176 




130 DATA 191 


191 


, 176, 


176, 


9 9 9 


















Program Listing 1 











reads Data statement numbers 
that were automatically POKEd 
into the string (see Program List- 
ing 2). Following this POKEing 
process, in which the string is 
formed within the program line, 
you can delete the Data and 
Read statements. The string is 
created much faster since the 
string itself is within the pro- 
gram and does not have to be 
formed every time you run the 
program. This saves time and 
memory. 

Each time I read an article on 
string packing, I noticed all the 
Data statements were very long. 
When typing them in, I easily 
made mistakes. The Data state- 
ments might be similar to those 
in Listing 2, in which some 
graphic character numbers 
(ranging from 128 to 191) are 
repeated over and over. Is there 
a better way to do it? 

Yes! You can use the STRINGS 
statement. This statement is 
in the format A$ = STRINGS 



(aaa.nnn) where nnn is the 
graphics character code, and 
aaa is the number of characters 
in the string. For example, the 
statement A$ = STRINGS (10, 
191) sets AS equal to a 10-char- 
acter string of solid blocks, 
forming a thick white line. The 
STRINGS statement is the key to 
efficient data statements that 
save time and memory. 

How can I use this informa- 
tion to make my Data state- 
ments more efficient? Program 
Listing 3 produces the same re- 
sult as Listing 2 but instead of 
using only graphic character 
numbers, I put the number of 
characters I wanted and the 
type of character I desired with- 
in the Data statements. The 
computer reads the number of 
characters first, followed by the 
graphics character. The pro- 
gram POKEs the graphic char- 
acter into the string the speci- 
fied number of times. This pro- 
cess continues until the Read 



ASCII code 


Result 


24 


Backspace cursor 


26 


Move cursor down 


32 


Advance cursor 


128 


(BLANK): Advance cursor 




Figure 1 
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statement encounters the num- 
ber 999 which directs the pro- 
gram to end there, or if I want, go 
on to the main program. 

After all Data statements 
have been read and the string is 
formed, you may delete the Data 



statements and the lines with 
the Read instructions. The line 
with the string itself must re- 
main. This way the same string 
is formed almost instantly. 

What if you want to form long 
strings with many different char- 



10 ' Program #2 - Reads DATA 

says "HI" 


statements and forms a string that 


20 CLEAR 500 






30 DEFINT A-Z 






40 CLS 






50 A$»" 




" 


60 V=VARPTR(A$) 






70 V=PEEK(V+l)+PEEK(V+2)*256 






80 FOR I»0 TO LEN(A$)-1 






90 READ A 






100 IF A=999 THEN END 






110 POKE V+I, A 






120 NEXT:PRINTA$ 






130 DATA 191, 191, 176, 176, 


176 


191, 191 


140 DATA 128, 131, 131, 191, 


191 


131, 131, 26 


150 DATA 24, 24, 24, 24, 24, 


2 4 , 


24, 24, 24, 24, 24, 24, 24, 24 


160 DATA 191, 191, 131, 131, 


131 


191, 191, 128, 176, 176 


170 DATA 191 , .191, 176, 176, 


999 




10 ' Program »3 - Getting better 


but not perfectl 


' 20 CLS 






30 CLEAR 500 






40 DEtiNT A-Z 






50 A$«" 




" 


60 V=VARPTR(A$) 






70 V=PEEK(V+l)+PEEK(V+2)*256 






80 READ A 






90 IF A=999 THEN PRINTA$:END 






100 READ B 






110 FOR C=V TO V+A-l 






120 POKE C, B 






130 NEXT 






140 V-V+A 






150 GOTO 80 






160 DATA 2, 191, 3, 176, 2, 


191, 


1, 128 


170 DATA 2, 131, 2, 191, 2, 


131, 


1, 26 


180 DATA 14, 24, 2, 191, 3, 


131, 


2, 191 


190 DATA 1, 128, 2, 176, 2, 


191, 


2, 176, 999 


Program Listing 2 



acters? Often you may want long 
strings of the same graphic block 
intertwined with single charac- 
ters (see Program Listing 3). 
Because of this problem you 
don't save much time or memory. 
This process may take more time 
and memory than the normal 
string packing method. How can 
you solve this problem? 

The length of a STRINGS is 
rarely over 25 characters. I de- 
vised a way to add up to 128 
characters to the string at a 
time, and still resolve this prob- 
lem. I put an instruction within 
the Read statement telling the 
computer that if the number it 
reads is less than 128, then it 
should read the next character. 
If it is greater than 128, then it 
adds that particular graphic 
block number. This way I can 
add single characters and 
strings of characters to the Data 
statements. (DATA 10, 191, 150, 
10, 191 forms a string consisting 
of 10 solid blocks, one CHR$ 
(150), and 10 solid blocks.) The 
process looks complicated in a 
listing, but it is very simple. Un- 



fortunately, there is still one bug 
in my technique. 

When I form graphics strings, 
I sometimes have two or three- 
line strings (strings which do not 
fit on one line). When I first 
started programming, I used 
space compression codes 
which consisted of the charac- 
ter strings from 192 to 255. This 
caused problems, so I instead 
used the cursor motion com- 
mands (see Fig. 1). By using 
these commands, I could easily 
form almost any string. The 
problem is that the character 
string numbers for some of 
these cursor motion commands 
are below the number 128, and 
will mess up my entire tech- 
nique. I resolved this problem by 
modifying my Read line. I in- 
structed the computer to watch 
for the numbers 24 (backspace 
cursor) and 26 (down cursor) and 
32 (space) since I use these 
numbers all the time. If the com- 
puter encounters any of these 
numbers, it considers them as 
single characters (see Program 
Listing 4). ■ 



10 ' Program »3 - Getting better 




20 CLS 






3 CLEAR 500 






40 DEi-iNT A-Z 






50 AS=" 




« 


6 V=VARPTR(A$) 






70 V=PEEK(V+l)+PEEK(V+2)*256 






80 READ A 






90 IF A=999 THEN PRINTAS:END 






100 READ B 






110 FOR C=V TO V+A-l 






120 POKE C, B 






130 NEXT 






140 V=V+A 






150 GOTO 80 






160 DATA 2, 191, 3, 176, 2, 191, 


; , 


128 


170 DATA 2, 131, 2, 191, 2, 131, 


i , 


26 


180 DATA 14, 24, 2, 191, 3, 131, 


2, 


191 


190 DATA 1, 128, 2, 176, 2, 191, 


2, 


176, 999 


Program Listing 3 





10 ' Program #4 - Eureka 1 STRING PACKS "80-MICRO" efficientlyl 

20 CLS 

30 CLEAR500 

40 DEFINTA-Z 

50 AS=" (180 SPACES) 



V=VARPTR(AS) 

V=PEEK(V+l)+PEEK(V+2)*256 

READA 

IFA=99 9THENPRINTAS:END 
IFA<128ANDA032ANDA<>24ANDA026THENREADB: FORC=VTOV+A-1 : POKEC 
:NEXT:V=V+A:GOTO80 
POKEV,A 

V«V+1 » 

GOTO 80 

3 DATA3, 191, 2, 143, 3, 191, 128, 7, 191, 5, 128, 5, 191 
DATA26, 25, 24, 24, 8, 191, 128, 2, 191, 3, 128, 2, 191, 128 
DATA3, 140, 128, 191, 131, 191, 131, 191, 128, 176, 128 
DATA4, 17 6, 128, 3, 17 6, 128, 4, 17 6, 26, 42, 24 
DATA3, 191, 2, 188, 3, 191, 128, 7, 191, 5, 128 
DATA1 91, 3, 128, 191, 128, 191, 128, 191, 3, 17 9 
DATA128,191,3,128,191,2,176,191,999 



Program Listing 4 



ATTENTION UNIVERSITIES AND 
MEDICAL RESEARCH FACILITIES 

DO YOU NEED DETAILED 
STATISTICAL ANALYSIS? 

StatPac is a new 3-part program written and designed for 
research, survey and questionnaire processing, data entry, 
statistical analysis, management and market analysis. 
StatPac can be easily tailored to fit your needs because 
you create the data file format. All phases of research 
analysis can be processed, including: 

•frequency analysis 
•crosstabs & chi-square 
•correlation and linear regression 
•multiple linear regression 



•descriptive statistics 

•t-test 

•analysis of variance 

•management reports 



StatPac eliminates the need for expensive programming 
or renting time on large mainframe computers because it 
is the SPSS for the TRS-80's. 

Total Package, including an extensive step-by-step user's 
manual is $285.00. Manual may be purchased separately 
for $30.00 (may be applied to the purchase price of the 
disks). MasterCard and Visa accepted. 

Write or call for a FREE 16 page brochure (612) 866-9022. 



■ StatPac X 



Walonick Associates, Inc. 
5624 Girard Ave. So. 
Minneapolis, MN 55419 



"Absolutely the best statistical analysis package I've seen 
for a microcomputer. ..." Eugene Allred, President of 
Consolidated Data Services, Minneapolis, MN. 



*-See List of Advertisers on page 386 
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GENERAL 



dMD 



LOAD 80 



Keep track of those air miles and carriers. 



Portal to Portal Report 



J. M. Keneipp 

2201 Lincolnwood Drive 

Evanston, IL 60201 



Last spring several major air- 
alines announced incentive 
programs for the frequent air 
traveller. American Airlines, 
United Airlines, Braniff Airlines 
and Transworld Airlines have 
awards for 20,000, 30,000, 40,000 
or 50,000 miles accumulated be- 
tween spring 1981 and 12 or 18 
months later. 

It is hard to decide how to 
play the game to your best ad- 
vantage. I needed some specific 
facts to guide my strategy. I 
wrote a program and, as one 
thing led to another, I added 
features to determine not only 
how far I have flown on each 
airline, but also average speed 
and how long I was airborne 
eacn month. 

The only information I need to 
record during the month is the 
names of the cities flown be- 
tween, the name of the airline 
and the times of liftoff and 
touchdown. 



The Key Box 

Basic Level il 
Model I 
16K RAM 
TRSDOS 2.3 
Line Printer II 



The program produces a table 
listing for each pair of cities, air 
traffic control airport identifiers, 
airlines flown, distances be- 
tween cities, flying time and 
speed. A summary line provides 
total distance, total flying time 
and average speed for the 
month. A second summary 
breaks the mileage down be- 
tween the four airlines with in- 
centives and other airlines. (See 
the Program Listing). 

In June, 1981 (Example 1) I flew 
a total of 8,632 miles. My in- 
centive mileage included 1,046 
miles on American and 2,528 on 



United. The remaining 5,058 
miles was, unfortunately, on 
other airlines. 

Computation Theory 

To produce a table summariz- 
ing flying distances, times and 
speeds, it is necessary to deter- 
mine distances between air- 
ports. Distances listed in a road 
atlas are not satisfactory. The 
program calculates the great 
circle distances between air- 
ports from latitude and longi- 
tude readings. 

The algorithm used to cal- 
culate the great circle distance 



involves three steps: Calcula- 
tion of the great circle angle in 
radians; conversion of the angle 
from radians to degrees; and 
conversion of the angle from 
degrees to statute miles. 

The computer performs trig- 
onometry in radians, whereas 
latitudes and longitudes are 
usually measured in degrees. A 
conversion factor, 0.0174533, is 
used to change degrees to ra- 
dians in the first step. Another 
factor, 57.29578, converts the 
angle into degrees to be multi- 
plied by the number of statute 
miles per degree. 



AIR TRAVEL SUMMARY FOR JUNE 


1981 








FROM 


to 




LINE 


MILES 


HRS 


& MIN 


MPH 


ORD 


BWI 




UA 


625 


1 


2 


469 


BWI , 


ORD 




UA 


625 


1 


36 


391 


ORD 


MIA 




0T 


1,200 


2 


25 


497 


MIA 


ORD 




T 


1,200 


'7 


41 


447 


ORD 


SPI 




01 


174 





33 


316 


SPI 


STL 




OT 


84 





3 6 


140 


STL 


OKC 




AA 


461 


1. 


10 


395 


OKC 


ORD 




UA 


693 


1 . 


27 


478 


ORD 


TUL 




A A 


585 


1 


2 1 


433 


TUL 


ORD 




UA 


585 


1 


45 


334 


ORD 


MIA 




OT 


1,200 


2 


33 


471 


MIA ORD 

total: 




OT 


1*200 

8,632 


2 


33 


471 
432 


2 





TOTAL DISTANCES BY AIRLINE: 










AMERICAN: 1» 


046 


MILES 










BRANIFF 


: 





MILES 










twa: 







MILES 










united: 


2* 


528 


MILES 










others: 


xJ t 


058 


MILES 
















Example 1 
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Considering expanding your TRS-80 
Model I or III? Then you should know 
that only one kind of peripheral can 
give you all these extra capabilities 
... in a single unit: 

• Computer-to-computer data 
communications, for better 
personal or business manage- 
ment. 

• Access to free "bulletin board" 
resources. 

• Access to Source, Compu- 
Serve and other time-sharing 
systems. 

• Services like electronic mail, 
instant news and financial re- 
ports. 

• An almost limitless supply of 
new games and other enthusi- 
ast activities. 

Of course, we're talking about a 
modem. A far more sensible first 
step in expanding than, say, joy- 
sticks, or a voice box, or a printer. 
And, therefore, your best peripheral 
buy. 

A modem opens up a whole new 
world to you. A world of thousands 
of computers and computer people 
just like you, in homes and busi- 
nesses around the block and across 
the country. A world you tap through 
your telephone. 

But don't simply settle for any mo- 
dem. For the most modem satisfac- 
tion, you need to make the best mo- 
dem buy. 

And that's LYNX. 




Lynx lor 

Model I III 



The new LYNX for TRS-80 Model I and Model 
III. It's the latest innovation from the people who 
are making data communications affordable. It's 
the best first step you can take in expanding. It 
makes your microcomputer a whole new animal. 




OLYfSfX.© 



123 LOCUST STREET LANCASTER, PENNSYLVANIA 17602 
Phone 717/291-1116 

TRS-80 is a trademark of the Radio Shack Division of Tandy Corporation. 
FCC Registration Number: A909KE-68171-DM-N 



re- 



in- 



The new LYNX is the ideal modem 
for your Model I or III. That's because 
it's the key element of a total direct- 
connect telephone communica- 
tions package. 

This package includes all serial 
and computer bus interfaces, cables 
and terminal software . . . and comes 
to you with these remarkable fea- 
tures: 

• SINGLE PRICE: $299.95! 

• Compatible with both Model I 
j and III. 

• No separate purchases 
quired. 

• One-year warranty. 

• Auto dial/auto answer. 

• Works with any software, 
eluding ST-80 by Micklus. 

• Active clear, break, and "con- 
trol" keys. 

• Half or full duplex, variable word 
length, parity and stop bits. 

• Dial from phone, keyboard, or 
memory. 

• Works with or without Model I 
expansion interface. 

• Works with or without Model III 
RS-232 card. 

• Can be placed on either side of 
Model III. 

• No tools needed to install. 

No other modem gives you so much 
in a single package. And when you 
compare the LYNX price with the to- 
tal cost of bringing any other modem 
on line, it could save you OVER $100! 



Consult your local microcomputer retailer, or call one of these LYNX handlers today. 



THE BOTTOM LINE 
Milford, NH 
800/343-0726 



B. T. ENTERPRISES 
Centereach, NY 
516/981-8568 



BREEZE QSD 
Dallas, TX 
214/484-2976 



COMPUTER PLUS 
Littleton, MA 
800/343-8124 



THE PROGRAM STORE 
Washington, DC 
800/424-2738 

^See List ol Advertisers on page 386 



STEVENS RADIO SHACK 
Phoenixville, PA 
800/345-6279 



SIMUTEK PROGRAMS UNLIMITED 

Tucson, AZ Jericho, NY 

800/528-1149 800/645-6038 
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The conversion of a great cir- 
cle angle into a distance derives 
from the circumference of the 
earth and the number of degrees 
in a complete circle. A great cir- 
cle angle measuring one degree 
represents 1/360th of the cir- 
cumference of the earth. But 
what is the circumference of the 
earth? According to the current 
World Almanac, the circum- 
ference of the earth at the 
equator is 24,901.55 miles. It 
measures 24,859.82 miles over 
the poles. I used the average 
24,880.685 statute miles, mak- 
ing the length of one degree of a 
great circle arc 69.113 miles. 

Latitudes and Longitudes 

The best source for latitudes 
and longitudes of every airport in 
the continental USA is the Air- 
port/Facility Directory (pub- 
lished in seven volumes by the 
U.S. Department of Commerce, 
National Oceanic and Atmos- 
pheric Administration, Rock- 
ville, MD 20852). A set costs 
$17.50, or $2.50 per volume. 



The Data statements in my 
program include the geographic 
location of 72 airports, ex- 
pressed in decimal degrees of 
latitude and longitude. To con- 
vert degrees, minutes and sec- 
onds to decimal degrees divide 
the minutes by 60 and the sec- 
onds by 3,600. The latitude of 
Chicago O'Hare Airport (41 de- 
grees 58' 57 ") becomes 41 plus 
58/60 plus 57/3600 and equals 
41.9825 degrees. 

The Program 

The program is started by en- 
tering Run. This is followed by a 
short delay while airport data 
loads into storage arrays. You 
will be asked how many trips 
there will be in the summary. 
Next, you will be asked to enter 
origin city name, destination city 
name, flying time between cities 
— hours, minutes and air carrier 
as AA, BN, TW, UA or other— OT?. 

If you misspell a city name or 
enter one not in the data, an error 
message appears. A similar error 
message occurs for not entering 



the proper option for the airline. 
When you enter the flying time, 
hours and minutes should be 
separated by a comma. Do not in- 
clude commas in the table title. 

After entering the last trip you 
will be asked to enter the period 
covered by the summary, such as 
July 1981. 

After you enter the table title, 
the complete table as shown in 
Example 1 will be printed. If you 
modify the program for video dis- 
play, the table will be printed line 
by line. If your table contains more 
lines than screen capacity, the 
scrolling subroutine holds lines 
until you hit Enter to continue. A 
similar Hit Enter message delays 
the final tabulation of distances 
by airline in the video version. 
After the entire table has been 
printed or video displayed, you 
will be asked if you want to 
prepare another summary. 

Variations 

For the video version, follow the 
changes noted in lines 220-260. 
As written, the program pre- 



pares a table printing the three- 
letter ATC airport code of the two 
cities, a two-letter airline desig- 
nation, the distances in statute 
miles, flying time in hours and 
minutes and the speed in statute 
MPH. If you prefer the name of 
the cities instead of the air traffic 
control identifiers (and if your 
printer has enough columns), 
change the M$ references to N$ 
in line 940. With this change 
ORD, for example, becomes 
Chicago. 

Distances in nautical miles 
and speed in knots can be ob- 
tained by substituting line 870 
(blocked with a REM) for line 860. 
Related changes include lines 
800 and 1270, in which MPH be- 
come knots. 

Accomplish metrification of 
the table by substituting line 880 
for line 860 and changing miles 
to kilometer and KM/HOUR in 
lines 800 and 1270. ■ 

Mr. Keneipp is a transporta- 
tion planning engineer with a 
national consulting firm. 



ESTATE PLANNING MODEL *wmmmmmmm^mm 

SAVE TIME AND MONEY 

by using your TRS-80* Model II, 64 K computer 
for professional estate analysis. 

1? Marital Deduction Formula Analysis Reports 

analyze six formula bequests for both husband 
and wife for both orders of death. 

•A- Estate Tax Return Report computerizes estate 
tax planning for decedents' estates. 

-iz Client-Ready Reports printed. 

i? State (Ohio) and Federal Taxes computed. 

t-? Free Updates to reflect legislative changes 
for one year. 

& Sold and maintained by author: an attorney 
and estate planning professional. 

tV ALREADY REVISED to comply with 1981 
TAX REDUCTION ACT. 

YES, please send me more information on the 
Estate Planning Model. 

Name 

Name of Firm 

Street 

City 



State 



Zip 



Mail to: Beard Software Development Co. 
59 Skyline Avenue 
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80 is a trademark of Tandy Radio Shack. 




Check 

our book pages 

for 

the 

latest books 

about 

microcomputers. 



SOFTWARE THAT FITS 

•PROPERTY 
MANAGEMENT 

•INVENTORY 
MANAGEMENT 

•PATIENT DATA 
MANAGEMENT 



AIICRO- 

©MPUTER 

SALES 



^246 






MICRO-COMPUTER SALES CORPORATION 
OF FAYETTEVILLE, NC 

Phone 919 483 2003 
Post Ollice Box 53376 • Fayetteville. NC 28305 



Program Listing 



18 

20 

3 

40 

50 

6 

7b 

80 

90 

1 

110 

1 2 3 
130 
140 
150 
Jfcg 
17 
180 
190 
200 
210 
220 
230 

24a 

2 51} 
260 
27 
2b0 
290 
300 
310 
320 
330 
340 
350 
360 
370 

3 6 

3 90 
400 
410 
420 
430 
440 

4 60 
46 
470 
4 60 

4 90 
600 
510 
520 

53 

54 

5 50 
560 
37 
{>!!« 

5 90 
500 
610 

6 20 
630 
640 
650 
660 
67 
6 68 

6 98 
700 
710 
720 
73 

7 40 
7 30 
768 
7 70 



7 60 
7 90 



8a 3 
628 
83 
3 40 



6 3 8 
86 

87? 



910 

928 
93 8 
9 48 



9^0 
960 
678 



1006 
1016 
1026 



'THIS PROGRAM SUMMARIZES YOUR AIR TRAVEL OVER A PERIOD 
•OF TIME THAT YOU SELECT—ONE OR SEVERAL MONTHS. 
'EACH TRIP SHOWS THE ORIGIN AND DESTINATION AIRPORT 
'IN THE ATC IDENTIFIER CODE; THE AIRLINE CODE; THE 
■DISTANCE IN STATUTE MILES; THE TRIP TIME IN HOURS 
'AND MINUTES ANO THE AVERAGE SPEED IN MILES PER HOUR. 

'EACH TABLE SHOWS THE TOTAL DISTANCE; TRIP TIMES AND 
'OVERALL AVERAGE SPEED FOR YOUR SELECTED PERIOD. A 
'SECOND TOTAL AT THE BOTTOM OF THE TABLE SUMS THE 
'MILEAGE BY AIRLINE 

'TO RON THE PROGRAM: 

1 1, ENTER THE NUMBER OF TRIPS THAT ARE TO BE 

SHOWN IN THE TABLE — CAN BE UP TO 5 
2. TYPE IN THE NAME OF THE ORIGIN CITY 
' 3. TYPE IN THE NAME OF THE DESTINATION CITY 

4. TYPE IN THE FLYING TIME IN HOURS , MINUTES 

(SEPARATED BY A COMMA) 

5. TYPE IN THE ABBREVIATION OF THE AIRLINE AS: 
AA,'BN, TW, UA OR OT (FOR OTHER) 

'AS WRITTEN THE PROGRAM PRODUCES HARD COPY FROM YOUR 
'PRINTER. IF YOU WANT A VIDEO TABLE THEN DELETE THE 
L FROM LPRINT IN LINES: 780; 7 90; 80 0; 810; 94 0; 107 
'1080; 1090; 1100; 1110; 1120; 1130; 1140; AND 1150 
'AND REMOVE THE REMS (') FROM LINE 830; LINE 1105 AND 
'LINES 1240 THROUGH 1290 

CLS: PRINT'FLIGHT LOG PROGRAM BY J. M. KENEIPP 7/25/81 

PRINT: PRINT" ARRAYS ARE BEING LOADED FROM DATA" 

'PROGRAM "P" — "PRINTLOG/BAS" — LEVEL II BASIC 
CLEAR 5 08 
DIM N1(100),N$(100),MS(100),L(100),G(110),P(50,9),KS(6) 

FOR Y= 1 TO 5 
READ N1(Y) , K$(Y) 

NEXT 
LET C = 7 2 

FOR X = 1 TO C 
READ N1(X) ,N$(X) ,M$(X) ,L(X) ,G(X) 
NEXT X 
CLS:INPUT"HOW MANY TRIPS WILL THERE BE IN THE SUMMARY";T 
N = 

INPUT'ENTER ORIGIN CITY NAME"; AS 

FOR X = 1 TO C 
IF NSiX) -AS THEN 480 ELSE 460 

NEXT X 
IF N$(X) <> A$ THEN 510 ELSE 480 
N=N + 1 

P(N,1)=X: P(N,2)=L(X): P(N,3)=G(X) 
GOTO 540 

PRINT'CITY NOT FOUND IN DATA — TRY AGAIN" 

GOTO 430 

INPUT'ENTER DESTINATION CITY NAME";B$ 

FOR X ■= 1 TO C 
IF NS(X)=BS THEN 590 ELSE 570 

NEXT X 
IF N$(X) <> BS THEN 610 ELSE 590 
P(N,4)=X: P(N,5)=L(X): P(N,6)=G(X) 
GOTO 6 40 

PRINT'CITY NOT FOUND IN DATA— TRY AGAIN" 
GOTO 5 40 

INPUT'ENTER FLYING TIME BETWEEN CITIES — HRS,MIN" ; H ,M 
P(N,7)=H: P(N,8)=M 

INPUT'ENTER AIR CARRIER AS AA,BN,TW,UA OR OTHER — OT";CS 

FOR Y=l TO 5 
IF K$(Y! =CS THEN 720 ELSE 700 

NEXT Y 
IF KS(Y) <> C$ THEN 740 ELSE 720 

P(N,9)*Y 
GOTO 7 60 

PRINT-AIR CARRIER NOT FOUND— TRY AGAIN" 
GOTO 670 

IP N - T THEN 770 ELSE 430 
CLS: INPUT'ENTER PERIOD COVERED BY THE SUMMARY — USE NO 



';A1S 



COMMAS", -Al S 
CLS:LPRINT"AIR TRAVEL SUMMARY FOR 

LPRINT" 

LPRINT"FROM"TAB(10) "TO"TAB(20) "LINE'TAB ( 29) " MILES" 
TAB(39)"HRS & MIN"TAB ( 53) "MPH" 

LPRINT" 

FOR N = 1 TO T: FOR J = 1 TO 1 
GOSUB 1240 'SCROLLING SUBROUTINE FOR VIDEO TABLES 

D - (SIN(P(N,2)*.0174533)*SIN(P(N,5)*.0174533)+COS 

(P(N,2) -.0174333; -COS(P(N,5) *.01 74533) "COS; (P(N,3) 
-P(N, 6))*. 0174533)) 
A=(-ATN(D/SQR(-D*D+1) ) +1 . 5707 96) *57 . 2957 8 



'STATUTE MILES 
NAUTICAL MILES 
KILOMETERS 

'DECIMAL HOOKS 
'SPEED 



D1=A*6 9.113 

' D1=A*60.0576 
' D1=A*111.203 
Dl=INT(Dl+.5) 
El-P(N,7)+P(N,8)/60 
V1=D1/E1 
Vl=INT(Vl+.5) 
S$ = "#J,#M" 
LPRINT M$(P(N,1))TAB(10)M$(P(N,4) ) ; TAB { 20 ) K$ ( P ( N, 9) ) 

" ";:LPRINT USING S$ ; Dl ;: LPRINT TAB ( 40 ) P ( N, 7) ; 

P(N,8> TAB(52)V1 
IF P(N,9)=1 THEN TA=TA+D1 
I 1 ' P(N,9) -2 THEN TB=TB+D1 
IF P(N,9)=3 THEN TT=TT+D1 
IF P(N,9)=4 THEN TU-TU+Dl 
IF P(N,9)=5 THEN 00=00+Dl 

D9=D9+D1 'CUMULATIVE DISTANCE 

E7-E7+E1 'CUMULATIVE DECIMAL HOURS 

E8=INT(E7) 



Program continues 



ANNOUNCING 

FORTHWRITE 

AN OUTSTANDING WORD 

PROCESSOR FOR YOUR 

TRS-80 MODEL I OR III OR IBM 

PERSONAL COMPUTER! 

If you need to type any of the following sorts o' documents' 
Business or personal letters, form letters, proposals and 
estimates term papers and theses, newspaper and 
magazine articles, books, stage scripts — then FORTH- 
WRITE is the tool you wan! Designed for easy and effective 
use by computer novices, unusual power and flexibility for 
the advanced user's most complex tasks, all with instant 
response time 

FORTHWRITE combines the power of MMSFORTH with the 
best features ol SCRIPSIT (trademark of Tandy Corp] anc 
WORDSTAR (trademark of MicroPro). Learning becomes 
easy thanks to on-line Help screens excellent keyboard 
mnemonics and screen prompts, a good manual and sample 
documents. "Include" feature permits internal chaining of 
documents, text blocks (and address files), custom 
keyboard entries, etc. Outdenting, multiple-line odd and 
even headers and 'ooters. screen windowing to 255 
dolumns MORE 

Standard serial and parallel printer drivers with in-line 
printer control codes are provided, plus TRUE PROPOR- 
TIONAL drivers with tabbing for the NEC Spinwriter and 
TRS-80 Daisy Wheel II printers subscript, superscript and 
boldprint on the above and Epson/IBM printers, a printer 
spooler and MUCH more 

Print capacity is limited only by disk space (multiple 
documents can be chained at printout and up to 8 disk 
drives can provide contiguous data space), while editing 
takes advantage of the exceptional speed of in-memory 
operation. A print-to-disk option permits examination of for- 
matted output without hardcopy. 

FORTHWRITE V10 (requires MMSFORTH V2 0/2 1. 2 drives 
&48KRAM) 5175.00' 




THE PROFESSIONAL FORTH 

SYSTEM FOR TRS-80 

AND IBM PC 

(Thousands of systems in use) 

MMSFORTH Disk System V2.0 (requires 1 drive, 32 K RAM): 

For Radio Shack TRS-80 Model 1 or hi $129.95* 

For IBM Personal Computer (80-col. screen) $249.95* 

AND MMS GIVES IT 
PROFESSIONAL SUPPORT 

Source code provided 

MMSFORTH Newsletter 
Many demo programs eboard 
MMSFORTH User Groups 
Inexpensive upgrades to latest version 
Programming staff can provde advice, modifications and 
custom programs, to fit YOUR needs 

OTHER MMSFORTH PRODUCTS: 

Ihe DATAHANDLER database management sys $59.95* 

FORTHCOM communications program. $39.95* 

MMSFORTH UTILITIES Diskette $39.95* 

MMSFORTH GAMES Diskette $39.95" 

MMSFORTH GENERAL LEDGER $350.00* 

TRADESHOW Commodities Exchange 

smart terminal $995.00" 

FORTH BOOKS AVAILABLE 

mmsforth users manual • without Appendices, for non- 
owners $17.50* 



starting forth 



best companion to our manual 
'. $15.95* 



THREADED INTERPRETIVE LANGUAGES advanced, ex- 
cellent analysis of MMSFORTH-like language 
. . , $18.95* 

PROGRAM OESIGN & CONSTRUCTION - intro. to structured 
programming, good for Forth . : $13.95* 

FORTH -79 STANDARD MANUAL • official reference to 

79STANDARD word set, etc $13.95* 

c OH"H SPECIAL ISSUE BYTE Magazine (Aug 1980) -we 
stock this collector's item for Forth users and beginners 
$4.00* 

* - ORDERING INFORMATION: Software prices include 
manuals and require signing of a non-transferrable single 
system, single-user license. Describe your Hardware. Add 
$2.00 S'H plus $3.00 per MMSFORTH and $1.00 per addi- 
tional booK. Mass. orders add 5% tax. Foreign orders add 
20%. UPS COD, VISA & M'C accepted, no unpaid purchase 
orders, please. 

Seng SASE lor tree MMSFORTH information. 
Good dealers sought. 

Get MMSFORTH products from your 
computer dealer or 

MILLER MICROCOMPUTER 
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SERVICES (M6) 

61 Lake Shore Road, Natick, MA 01760 

(617)653-6136 
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Smith-Corona TP-1 

Daisy 

Wheel 

Printer 




*659 M DELIVERED 



~ 1 20 words per minute 

: "- Parallel or RS-232C interfacins (specify) 

:: 10 or 12 characters per inch (specify) 

□ Full letter quality print 

u 13" carraiage with 10.5" print line 

u Friction feed handles 4-part forms 

Okidata Printers 

Microline 82A *469" 

Microline 83A *729 M 

Microline 84 (Parallel) *1059" 

Microline 84 (RS-232C) *1194" 



NEC Printers 


NECPC-8023A-C 


.. »499" 


IDS Printers 


IDS Prism 1 32 (4-color) 

IDS Prism 80 


♦1699" 
. «989" 


Epson Printers 



MX-80 w/Graftrax »474" 

MX-80/F-T »569" 

MX-80/F-T w/Graftrax <619 M 

MX-100 *729" 



Centronics Printers 



Centronics 739 (Parallel) . 
Centronics 739 (RS-232-C) 



*539 M 
»644" 



C.Itoh Printers 



C.Itoh Pro WRrrER (parallel & RS-232C) 

w/3K buffer, 120 cps «639 M 

C.Itoh F-10 Star Writer Daisy Wheel 
(parallel or RS-232C) 40cps . . . *1489 M 

Cables and interfaces available for the Apple, 
Atari, CBM/Pet, IBM, Osborne, andTRS-80. 

Orders & Information: 
CALL (603)-673-8857 

Orders Onty: CALL (800 )-3 43-0 726 

We accept CODs— No surcharge for credit cards 
No charge for UPS shipping— Stock shipments 
next day— All equipment shipped factory 
fresh with the manufacturer's warranty 

Pnces subject to change 

HIGH TECHNOLOGY AT AFFORDABLE PRICES 
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Program continued 



1030 
1040 
1050 
1060 
1070 
1080 

1090 
1100 
1105 
1110 
1120 
1130 
1140 
1150 
1160 
1170 
1180 



1190 
1200 
1210 
1220 
1230 
1240 
1250 
1260 
1270 
1280 
1290 
1300 
1310 
1320 
1330 
1340 
1350 
1360 
1370 
1380 

1390 
1400 
1410 
1420 
1430 
1440 
1450 
1460 
1470 
1480 
1490 
1500 
1510 
1520 
1530 
1540 
1550 
1560 
1570 
1580 
1590 
1600 
1610 
1620 
1630 
1640 
1650 
1660 
1670 
1680 
1690 
1700 
1710 
1720 
1730 
1740 
1750 
1760 
1770 
1780 
1790 
1800 
1810 



r820 
1830 
1840 
1850 
1860 
1870 
1880 
1890 
1900 
1910 
1920 
1930 
1940 
1950 
1960 
1970 
1980 
1990 
2000 
2010 
2020 
2030 
2040 
2050 
2060 
2070 
2080 
2090 
2100 



'AVERAGE SPEED OF ALL TRIPS 



E9=1NT(60*(E7-E8) \ 

Z=D9/E7 

Z=INT(Z+.5) 

NEXT J: NEXT N 

LPRINT TAB(31) " "TAB(41) " "TAB(52) " " 

LPRINT" TOTAL: ";: LPRINT USING SS; 

D9 ; : LPRINT TAB ( 39) E8 ; TAB ( 43 ) E9 ; TAB ( 52) Z 

LPRINT" 

LPRINT'TOTAL DISTANCES BY AIRLINE:" 
INPUT'HIT ENTER TO SEE TOTALS BY AIRLINE" ;V$ 



LPRINT" 
LPRINT" 
LPRINT" 
LPRINT" 
LPRINT" 
LPRINT" 



AMERICAN:";: LPRINT USING S$) TA;:LPRINT" MILES" 

BRANIFF: ";:LPRINT USING SS; TB; : LPRINT " MILES" 

TWA: ";:LPRINT USING SS; TT; : LPRINT " MILES" 

UNITED: ";:LPRINT USING SS; TU;: LPRINT" MILES" 

OTHERS: ";:LPRINT USING S$; 00;:LPRINT" MILES" 



LPRINT" 

INPUT'TO PREPARE ANOTHER SUMMARY ENTER 
IF Q$-"Y" THEN 1190 ELSE 1220 



'Y' — IF NOT ENTER'N'";QS 



3: A1=0: TA=0: TB=0: TT=0: TU-0: 00-0 
FOR J=l TO 8: P(N,J)»0i NEXT Ji NEXT N 



D9=0: E7=0: 1 

FOR N-l TO 2f 

GOTO 400 

END 

'SCROLLING SUBROUTINE 

Al - Al + 1 

IF Al < 10 THEN 1290 ELSE 1260 

INPUT'HIT ENTER TO CONTINUE" ;R$: PRINT § 832," 

PRINT"FR0M"TAB(14) "TO"TAB(30) "MILES"TAB(39) "HRS & MIN"TAB(53) "MPH" 

Al = 

RETURN 

'AIR CARRIERS 
DATA 1, AA 
DATA 2, BN 
DATA 3, TW 
DATA 4, UA 
DATA 5, OT 

'AIRPORT DATA: NUMBER; CITY; ATC CODE; LATITUDE; 

AND LONGITUDE 
DATA 1, ATLANTA, ATL, 33. 6381, 84. 427 8 
DATA 2, BALTIMORE, BWI, 39. 017 5, 76. 67 
DATA 3,BINGHAMTON,BGM,42.207 5,75.97 94 
DATA 4, BOSTON, BOS, 4 2. 3 642, 71. 00 56 
DATA 5, BUFFALO, BUF, 42. 9406 ,78.7325 
DATA 6, CEDAR RAPIDS ,CID , 41 . 8844 , 91 . 7086 
DATA 7, CHAMPAIGN, CMI, 40. 03 97 ,8 8. 27 81 
DATA 8, CHARLESTON SC, CHS, 32 . 8986 , 80 . 0400 
DATA 9, CHARLESTON WV, CRW, 38 . 3731 , 81 . 5933 
DATA 10, CHARLOTTE, CLT, 3 5. 2147, 80. 9 3 83 
DATA 11, CHICAGO, ORD, 41. 9825, 87. 906 9 
DATA 12, CINCINNATI, CVG, 3 9. 047 8, 84. 6667 
DATA 13, CLARKSBURG, CKB, 3 9. 2956, 80. 2289 
DATA 14, CLEVELAND, CLE, 41. 41 03, 81. 84 89 
DATA 15,COLUMBUS,CMH,3 9.9947,82.8856 
DATA 16 , DALLAS ,DFW, 3 2.8967,97.0336 
DATA 17, DAYTON, DAY, 39. 9011, 84. 2200 
DATA 18, DECATUR, DEC, 3 9. 83 4 2, 88. 86 81 
DATA 19, DENVER, DEN, 3 9. 7 7 42, 104. 87 8 
DATA 20, DETROIT, DTW, 42. 2153 ,83.3486 
DATA 21,ELMIRA,ELM,42.1595,7 6.8925 
DATA 22, GREENVILLE, GSP, 34. 896 4, 82. 21 86 
DATA 23, HARTFORD, HFD, 41. 7 36 1,7 2. 6 5 06 
DATA 24,HOUSTON,IAH,29.9828,95.3458 
DATA 2 5, HUNTINGTON, HTS, 3 8. 3 667, 82. 5 5 81 
DATA 26, INDIANAPOLIS, IND, 3 9. 7244, 86. 2833 
DATA 27, ITHACA, ITH, 42. 4903, 76. 4578 
DATA 2 8, JACKSONVILLE, JAX, 3 0.4 925, 81. 6 90 
DATA 29, KANSAS CITY , MCI ,39 . 2992 , 94 . 7178 
DATA 30, LAS VEGAS , LAS, 36 . 0800 ,115 . 1522 
DATA 31, LEXINGTON, LEX, 3 8. 0367, 84. 6 058 
DATA 32, LITTLE ROCK , LIT, 34 .7303 , 92 . 2331 
DATA 33, LOS ANGELES, LAX , 33 . 9419 ,118 . 406 
DATA 34, LOUISVILLE, SDF, 3 8. 177 8, 85. 7 364 
DATA 35,MADISON,MSN,43.1389,89.3375 
DATA 36, MEMPHIS, MEM, 35. 5, 89. 97 89 
DATA 37, MIAMI, MIA, 25. 7944, 80. 2881 
DATA 3 8, MILWAUKEE, MKE, 42. 9480, 87. 896 4 
DATA 39, MINNEAPOLIS, MSP, 44. 8842, 93. 215 
DATA 40,MOLINE,MLI,41.4486,90.5081 
DATA 41, NASHVILLE, BNA, 3 6. 126 7, 86. 6 819 
DATA 42, NEW ORLEANS, MSY, 29. 9928,90 .2564 
DATA 43, NEW YORK JFK, JFK, 40 . 6403 , 73 .7783 



DATA 44, NEW YORK LGA,LGA, 40 .7772 ,73 . 8742 
DATA 45, NEWARK, EWR, 40. 6931, 74. 1686 
DATA 46, NORFOLK, ORF, 36. 8953, 76. 2008 
DATA 47, OKLAHOMA CITY ,OKC , 35 . 3936 , 97 . 5997 
DATA 4 8, OMAHA, OMA, 41. 3011, 95. 8850 
DATA 4 9, ORLANDO, MCD, 2 8. 43 17, 81. 3 2 47 
DATA 50,PEORIA,PIA,40.6642,89.6 90 8 
DATA 51, PHILADELPHIA, PHL, 3 9. 87 03, 75. 2453 
DATA 52, PHOENIX, PHX , 33. 43 6 1,11 2. 009 
DATA 53, PITTSBURGH, PIT, 40. 4 93 6, 80. 23 17 
DATA 54 , PORTLAND , PDX ,45.5892,122.5925 
DATA 55, RENO, RNO, 39. 497 8, 119. 767 8 
DATA 56, ROCHESTER, ROC, 43. 1189, 77. 6728 
DATA 57, ROCKFORD,RFD,42.1994,89.0922 
DATA 58, SALT LAKE ,SLC, 40 .7 842 ,111 . 967 
DATA 59, SAN ANTONIO, SAT, 29 . 5333 , 98 . 46 97 
DATA 60, SAN DIEGO, SAN, 32 .7336 , 117 . 1867 
DATA 61, SAN FRANCISCO , SFO, 37 . 6194 , 122 . 374 
DATA 62, SAN JOSE ,SJC, 37 . 3614 , 121 . 927 
DATA 63, SAN JUAN, SJU ,18 . 4414 , 66 . 0022 
DATA 6 4, SEATTLE, SEA, 47. 4492, 122. 3 081 
DATA 65, SPRINGFIELD, SPI, 39. 843 3, 89. 667 8 
DATA 66, ST LOUIS , STL, 38 .7481 , 90 . 3622 
DATA 67, SYRACUSE, SYR, 43. 1122, 76. 1089 
DATA 68, TAMPA, TPA, 27. 9739, 82. 5328 
DATA 6 9, TULSA, TUL , 3 6. 19 86, 95. 887 8 
DATA 70, WASHINGTON D, IAD , 38 . 9436 , 77 . 4544 
DATA 71 (WASHINGTON N,DCA , 38. 8522 ,77 . 0375 
DATA 7 2, WICHITA, ICT, 3 7. 6 51 7, 97. 43 08 



No-Nonsense Money-Back 
-day Trial Offer 



9.. 



ir 



Buy and try the Micro Accounting System General Ledger for $99. Then within 30 days 
purchase the total MAS 80 accounting package for $390, a saving of $77 over the regular price 
of $566. If not satisfied return the package and receive a full refund. 

MAS 80 Accounting is a flexible, versatile user formatted business system, designed for the first time computer 
user. MAS 80 programs run stand alone or coordinating without modifications, they are menu driven with cursor 
control and full screen instructions, 
plus two types of file maintenance. 
Regular maintenance— provides main- 
tenance on transactions and account 
files. Special maintenance is auto- 
matic at the end of posting to insure 
that posting is correct. Any errors de- 
tected are printed, eliminating error 
searching. Provisionsfor Single entry or 
Double entry bookkeeping, with valid 
account editing and an out-of-bal- 




GENERAL LEDGER $159.00 

• Standard layman format, with screen in- 
structions. Multiple linking MENUS, provide 
easy operation. 

• Post to any of 200 G/L Accounts, you setup 
yourself (Not Preset Accounts). 

• Process transactions in BATCHES of up 200 
debit and credit entries, with each batch 
editing for out-tor-balances, then when 
correct and recorded, answer "Yes" to con- 
tinue with each batch of transactions. 

• Transaction UPDATE provides for unlimited 
transactions. Easy file maintenance. 

• Accounts Receivable and Payable co- 
ordinating or Stand Alone. 

ACCOUNTS RECEIVABLE . . . $159.00 

Designed with machine language routines to 
reduce set-up time, without sacrificing flexibility 
or requiring professional knowledge of com- 
puterized accounting. MAS 80 saves for more 
efficient management, by providing: 

• Balance Forward Systems w/true ageing 
and multi-function programs. G/L coordi- 
nating for Auto-Posting or Stand Alone. 

• Post to an unlimited number of General 
Ledger Accounts with valid G/L and Custo- 
mer Account # editing per Invoice. 

• Process charge entries with detail break 
down as you choose. Maintenance before 
and after posting. 

• Open/Closed or Over Due listings by num- 
ber of days that you specify. 

• Two different formats for Billing Statements 
plus Invoice Printing. 




The Micro Accounting System 



The MAS 80 is flexible, 
easy to set up and use. 
Call or write for sample 
reports and full description. 



ance error detection. 

MAS 80 Accounting programs will 
operate on Mod 1 and Mod III, with 2 
or 3 drive versions. MAS 80 also has 
versions operating on Corvus and Mi- 
cro Systems hard drives. Requires the 
use of NEWDOS, NEWDOS/80 or DOS- 
PLUS disk operating systems. 

MAS offers the best user support for 
the novice as well as the professional. 



ACCOUNTS PAYABLE $159.00 

Features reduce time for more efficient man- 
agement, by providing: 

• Balance Forward Systems w/true ageing 
and multi function programs. G/L coordi- 
nating for Auto-Posting or Stand Alone. 

• Post to an unlimited number of General 
Ledger Accounts with valid G/L and Ven- 
dor Account #p editing per Invoice. 

• Process charge entries with detail break 
down as you choose. Maintenance Pefore 
and after posting. 

• Detailed, Aged, Manage/Report to analyze 
Liabilities, volume, of purchases, payment 
choice and discounting. 

• Will handle 700 Vendor and 1600 Unpaid 
charge entries. 

• Check Writing format is standard Moore or 
Nobs, forms. 

CHECK REGISTER $89.00 

Here is a Check Register Program that will 
operate by itself or linked with MAS 80 Accounts 
Payable and/or General Ledger. This will compile 
all checks written, allow choice of 26 expense 
codes for later look up and listing of different 
categories for tax time. Record deposits and 
reconcile your check register with your bank 
statement. 

• Will handle 600 checks per month. Record 
deposits. 

• Record/Print checks from Accounts Payable 
up'/; ^and written checks. 

• Print check register, expense codes carries 
Y-T-D totals, 

• File Maintenance - checks - deposits - mis- 
cellaneous. 

• Account Status-balance, account #, etc. 

• Reconciliation-prints a similar form and 
compare with Bank balance. 



J* 



Data Resources 

304 Elati Street 
Denver, Colorado 80223 
(303)698-1263 
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GENERAL 



Access Profile files with this Basic program. 



Play a Trick on Profile 



Bryan Scott 

3135 Jamaica Drive 

Corpus Christi, TX 78418 



Radio Shack's data manage- 
ment program Profile is an 
easy data filing program to use, 
as well as fairly inexpensive. It 
enables you to design an ele- 
gant screen format and it util- 
izes an interesting method of 
placing the data on disk, which 
you can access as either a se- 
quential or a random access file. 
Sequential access is easy. 
Using LINEINPUT#1, A$, read 
the file one record at a time. 
Then use the MID$ function to 
get the portion of A$ you want. I 
have used this procedure to set 
up membership files for several 
organizations, with much more 
information than a regular mail- 
ing list program. 

Direct Access 

The method for direct access 
shown in the Profile manual, re- 
quiring that the sum of the 
lengths of the data fields be an 
even fraction of 256, is restric- 
tive and clumsy. You can access 
Profile using the TRS-80 Model 
I's unpublicized ability to handle 



The Key Box 

Disk Basic 
Model I 
32K RAM 
TRSDOS 
One disk drive 
Profile 



record lengths other than the 
256 bytes that the disk manual 
insists is required. 

Answer the Basic question 
"How Many Files?" with 3V to 
enter a whole new world of data 
handling. You are no longer 
restricted to the 256-byte record 
length, with its wasteful use of 
disk space. For instance, if your 
record length happens to be 129 
bytes, open your file with OPEN 
"R",1,"FN",129, and you will get 
almost twice as many records 
on a disk as you can with the 
256-byte restriction. There is one 
problem with the variable record 
length function, however. Due to 
a deficiency in TRSDOS, the 
LOF function does not work 
properly; you can not tell how 
many records are in the file. 
Also, the buffer has to be filled 
before Profile will write the last 
record to the file. 

If you add or delete a record in 
Profile, it keeps count in a 
special file called INFOFILE, 
which contains information 
about the number of records, 
the maximum allowed, max- 
imum drive number, number of 
fields, and the highest record 
number stored on each disk. It 
also contains data about the 
fields, including their length, the 
first 13 characters of the field 
name, and the screen memory 
position of the start of each 
field. A file called FORMFILE 
contains the exact picture of 
your screen display. List it in 
DOS: it is interesting. 

When you run Profile accord- 
ing to the book, there is no trou- 
ble setting up your screen dis- 
play and your fields. Make sure 
that you have all the fields you 



need, and that there is enough 
room in each field for the maxi- 
mum amount of data. Once you 
accept the screen display you 
are locked in, and can not 
change it without starting over. 
If you are going to sort names 
alphabetically, enter the last 
name first, or use a separate 
field with the name as it should 
be sorted alphabetically. This is 
the best way with company 
names. 

Setting up the display and 
entering data are the easy parts. 
Finding a record, sorting, and 
printing any more than a simple 
listing are slow and clumsy with 
Profile. Since Profile reads the 
data files sequentially, finding a 
record near the end of the file 
can take several minutes. The 
sort routine involves moving 
records on the disk, and can 
take hours if the file contains 
several hundred records. 

The Program 

I wrote PRORAN (see the Pro- 
gram Listing) to enable you to 
access and edit records easily. 
If you intend to sort or print rec- 
ords or make labels, you must 
make some modifications. 

Line 40 asks if you have set 
the file number to 3V. If you have 
not, it puts you back into the 
Basic entry routine so you can 
start out right; if it does this, you 
will have to load the program 
again. 

Starting with line 70 is the 
routine for reading INFOFILE, 
as shown in the Profile manual. 
If you wish to see this informa- 
tion, answer Y in line 160. Lines 
190-340 contain the routine for 
listing the file information. 



One interesting addition to 
the random file procedure 
shows up in lines 80 and 90. The 
TRSDOS manual says you can 
file an integer in two characters, 
a single precision number in 
four, and a double precision 
number in eight characters. 
Here is a way to store small 
numbers (no larger than 255) in 
one character! Put it into the 
buffer with LSET A$ = CHR$(N), 
and restore it to numeric with 
N = ASC(A$). 

Line 350 starts the random ac- 
cess file routine, and will work 
for a one or two drive system. 
Line 370 sets the starting point 
for each of the fields in the 
FIELD statement, based on in- 
formation read from INFOFILE. 
Line 380 fields the buffer. The 
TRSDOS manual says you can 
field the buffer more than one 
way, but does not explain that 
many different fielding arrange- 
ments can be in effect at the 
same time. In this case, the buf- 
fer is fielded separately for each 
data field, up to the 32 fields 
allowed. 

Line 400 sends the program to 
a subroutine which reads the 
sorted field, in this case field 1. 
If your sorted field (you may only 
sort by one field) is not field 1, 
then change the subscripts for 
D1$0 and D2$(). This information 
is placed into array SS$0 and is 
sorted in ascending sequence. 
This array is used with the bi- 
nary search routine at line 600 to 
locate any record quickly. 

Line 410 tells you how many 
records are in the file, and asks 
which one you wish to access. 
You must enter the data exactly 
as it was originally entered, or 
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the program will not find it. If it 
does, it displays the data for all 
the fields in the record. You may 
change any or all of them, one 
field at a time, and when you 
enter A to accept, the revised 
record is written to the disk. 

To use PRORAN, load it in Ba- 
sic, then put the Profile disks in 
your drives (use backups), then 
type RUN. 



To delete a record, use the 
standard Profile procedure, so 
INFOFILE can be kept up-to- 
date. ■ 



Mr. Scott has been retired for 
three years after 44 years with 
an electric utility company. His 
hobbies include photography, 
bird-watching, and swimming. 



10 'PRORAN RANDOM ACCESS TO PROFILE FILES 

20 'BY BRYAN SCOTT 3135 JAMAICA DR. CORPUS CHRISTI TX 78418 

30 CLEAR2000:DEFINTA-Z:DIM D( 4) ,NMS (32) ,CU(32) ,LN (32) ,SF (32) 

39 ' CHECK FOR VARIABLE LENGTH FILE CAPABILITY 

40 CLS:PRINT"DID YOU ANSWER ' 3V TO THE QUESTION 'HOW MANY FILES 
'(Y/N)" 

50 QQS=INKE*S:IFQQS=""THEN50 ELSE IF QQS="N"THENCMD"I ", "BASIC" 

60 IF QQSO"Y"THEN40 

69 ' OPEN AND READ 'INFOFILE' 

7 OPEN"R",l, "INFOFILE: 0" jGETl,l:D( 0) =0 

80 FIELD1 , 2ASNRS , 2ASMXS , 1ASMDS , 2ASDRS , 1 ASRLS , 1ASNF S , 2ASD5 ( 1 ) , 2 AS 

DS(2) ,2ASDS(3) ,2ASDS(4) 

90 NR=CVI(NRS) :MX=CVI(MXS) :MD=ASC(MD$) :DR=CVI(DR$) 

100 RL=ASC(RL$) :NF=ASC(NF$) : F0RI=1T04 :D ( I ) =CVI (DS ( I ) ) :NEXTI 

110 DIM DlS (NF+1) ,D2S(NF+1) ,D3S(NF) ,SSS (NR) 

120 GET1,2:J=0:FORI=0TONF-1:IF 1=16 THEN GETl,3:J=0 

130 FIELD 1,(J*16)AS DUMMY$,13AS N$,2AS CUS.1AS L$ 

140 NM$(I+1)=N$:CU(I+1)-CVI(CU$) : LN ( 1+1) =ASC ( L$) 

150 J-J+l:NEXTI:CLOSE 

159 ' LIST INFO ABOUT PROFILE FILE 

160 CLS:PRINT-DO YOU WISH FILE INFORMATION (Y/N)" 

170 YN$=INKEY$:IFYN$=""THEN170 ELSE IF YNS="N"THEN350 

180 IFYN$O"Y"THEN160 

190 CLS: PRINT" PROFILE CONTROL FILE INFORMATION 

200 PRINT: PRINT "NUMBER OF RECORDS:";NR 

210 PRINT" AVAILABLE UNUSED: " ;HX-NR 

220 PRINT'MAXIMUM ALLOWED :"; MX 

230 PRINT'MAXIMUM DRIVE USED:";MD 

240 PRINT'DELETED RECORDS: " ; DR 

250 PRINT'RECORD LENGTH :"; RL 

260 PRINT'NUMBER OF FIELDS: " ; NF 

270 PRINT'HIGHEST RECORD NUMBER EACH DRIVE:";:FOR I=0TOMD : PRINTI 

;D(I+l)+l;","j:NEXT 

280 PRINT: INPUT-PRESS <ENTER> FOR FIELD DATA" ; ZS: CLS 

290 PRINT'FIELD NAME START LENGTH" 

300 ZZ$ = "% % fM *##" 

310 K=l 

320 FOR I = 1T0NF:K=K + LN(I-1) : PRINTUSINGZ Z$ ,-NM$ ( I ) ;K;LN(I) 

330 IFI=12INPUT"PRESS <ENTER> FOR MORE";ZS 

340 NEXT 

349 ' OPEN PRODAT FILES, FIELD BUFFERS 

350 OPEN "R" ,1 , "PRODAT" ,RL 

360 IF MD=1 THEN OPEN "R" , 2 , "PRODAT: 1" ,RL 

370 FOR 1=2 TO NF : SF ( I ) =SF ( 1-1) +LN ( 1-1) : NEXTI 

380 FORI=l TO NF:FIELD1,SF(I) AS XX$,LN(I) AS DlS(I):NEXTI 

390 IF MD=1 THEN FOR 1=1 TO NF : FIELD2 , SF ( I ) AS XX$,LN(I) AS D2$( 

I) :NEXTI 

399 ' READ SORTED FIELD, PLACE IN ARRAY 

400 GOSUB540 

410 PRINT'THERE ARE" ;NR; "RECORDS IN THIS FILE. WHICH TO ACCESS? 

ENTER TO END FILE ACCESS" ;: INPUTKS : IF K$="0"THENCLOSE : END ELSE 

GOSUB600 

420 QQS=" RECORD NUMBER"+STR$ (QQ) 

430 IF QQ<-(D(1)+1) THEN FL=1 : GET 1 , QQ : G0TO4 5 

440 GET 2,QQ-D(1)-1:FL=2:GOTO460 

450 CLS:PRINTQQ$:FORI=l TO NF STEP2 : PRINTI ;D1 $ ( I) j TAB(30) 1+1 ;D1$ 

(1+1) : NEXTI :GOTO470 

460 CLS :PRINTQQ$: FORI =1 TO NF STEP2: PRINTI;D2$(I) jTAB(30) I+1;D2S 

(1+1) :NBXTI 

470 PRINT: PRINT'ENTER (A) TO ACCEPT, (C) TO CHANGE, (R) TO READ 

ANOTHER RECORD"; :INPUTCHS 

480 IF CH$="A"THENIFFL=1THENPUT1,QQ:GOTO410 ELSEPUT2 ,QQ-D ( 1 ) -1 : 

GOTO410 

490 IF CH$="R"THEN410 

500 IF CH$<>"C"THEN470 

510 INPUT'PLEASE INDICATE THE FIELD TO CHANGE", -CH 

520 INPUT'PLEASE ENTER CORRECT DATA", -DAS 

530 IFFL=1THENLSETD1$(CH)=DAS:GOTO450 ELSE LSETD2S (CH) =DA$ :GOTO 

460 

539 ' ROUTINE TO READ SORTED PIELD INTO ARRAY 

540 CLS: PRINT"WAIT WHILE I READ THE FILE":FOR I = 1T0NR:IF K-D(l) 
+1 THEN GET1,I:SS$(I)=D1S(1) :GOTO560 

550 GET2,I-D(1)-1:SS$(I)-D2S(1) 

560 PRINTg40,SSS(I) :NEXTI 

570 RETURN 

580 QQ=0:FOR 1=1 TO NR: IF K$=SS$(I) THEN QQ=I:RETURN 

590 NEXTI: RETURN 

599 ' ROUTINE TO CONDUCT BINARY SEARCH 

600 N=NR:L=1 
610 U=N+1 

620 I-INT( (L+UJ/2) 

630 IF SSS(I) =K$THEN QQ=I:RETURN 

640 IF SSS(D<KS THEN 

IF L=I THEN PRINT K$;" NOT FOUND" : GOTO410 
ELSE L=I:GOTO 620 
ELSE 
IF U=I THEN PRINT K$;" NOT FOUND" : GOTO410 
ELSE U=I:GOTO 620 



Program Listing 



r Model II & Model 16 users: 

ANNOUNCING 



i 




You've been ignored long enough! The time 
has come for a magazine tailored to your 
special needs as a Model U user. Advent of the 
Model 16 will increase demand for coverage of 
matters specific to our very versatile micros. 
two/sixteen will discuss topics of interest to all 
LT/16 owners, from the casual to the advanced 
user. Articles will be slanted toward the 
business, professional, and scientific com- 
munity (but we'll lapse into games and other 
diversions from time to time). You will see 
features about networking, CP/M vs. TRSDOS, 
deciding on hard disk, patching an Epson's 
power into WordStar, multi-user processing on 
the 16, and adding the Model 16 enhancement 
to your Model II. As a non-dealer subscriber, 
you can place low-cost classified ads. 
two/sixteen is not affiliated with Tandy Cor- 
poration. 

Charter subscriptions are now available starting with 
the May-June, 1982 issue. $30 annually in the U.S. 
Foreign subscribers inquire for rates. Phone orders 
accepted at (717) 393-1917 (VISA and MasterCard). 
Send mail orders to two/sixteen magazine , 216 1/2 
West James St., Lancaster, PA 17603. 



Design Line Micro Work Stations 




• A complete range of work stations designed specifi- 
cally to house all micro-computers. 

• Delivered heavily packed, in self-assembly form need- 
ing only a Phillips screwdriver and a few minutes of 
your time to assemble. 

• Manufactured from 1" all wood particle board surfaced 
with hard-wearing mel amine veneer, in Oak or Walnut. 

• Storage stand shown is an additional option. 

• Dealer and Distribution prices on request. 

• For more information on our full range of workstations 
write or call 301-223-8900. 

ATLANTIC CABINET CORPORATION 

P. O. Box 100, Williamsport, Maryland 21795 -53t 



**See List of Advertisers on page 386 
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TECHNIQUE 



PEEK and POKE for the Model II. 



The 




„,/ A. 



Career 



C. David Wilson 
P.O. Box 272 
Madawaska, ME 04756 



When did you last read an 
article and head for your 
Model II to key in the accom- 
panying program— only to real- 
ize that you cannot PEEK or 
POKE with Model II Basic? 

The experience, as in my case, 
may already have made a ma- 
chine language programmer out 
of you. Among a large majority of 
programs published in Level II 
Basic the only stumbling block 
for adaptation to Model II Basic 
is its inability to PEEK and POKE. 

The solution is straightfor- 
ward and assumes you know lit- 
tle about TRSDOS. 

First choose a System disk for 
such conversions. Proceed as 
follows: 



TRSDOS READY 

DEBUG ON <ENTER> 

DEBUG <ENTER> 

M = 6000 

<F1> 

5E235636002B1A77C95E2356EB5E23562 

32323237E12C9 
<F2> 
S 



DEBUG OFF <ENTER> 

DUMP PEEKPOKE/CIM START = 6000,END 
= 6016,RELO = (see Table 1),RORT=R 
<ENTER> 



The RELO address you use in 
the Dump command depends on 
your system. Use an address 
from Table 1. This reloads the 
small subroutine to the top of 
RAM for your system. 

Your disk should now show 
PEEKPOKE/CIM in its directory. 
Now let's consider your Basic 
program— only three PEEKS and 
a POKE away from reality. First 
you must incorporate several 
statements early in the program 
(see Table 2). 

With these preliminaries out 
of the way, your program can 
now PEEK at an address with 
the function call USRO(address). 
The address within the paren- 
theses must be an integer con- 
stant, an integer variable or an 
integer expression. 

Print USRO{29000), for example, 
displays (in decimal) the current 
value of the byte at address 29000: 

l% = &HF0OO 

A = USR0(l%+6) 



This sets A to the value of the 
byte at address X'F006'. 

Since Basic decimal integers 
fall in the range -32768, 
+ 32767 how can we PEEK at a 
decimal address beyond 32767? 
I% =40000-25612 produces 
the integer -25536 which is 
interpreted internally as decimal 
address 40000. Then USR0(l%) 
does the job. Model II Basic also 
permits USR0(&H9C40) if you 
like hexadecimal notation. 

USR1 is the key to POKEing; 
two values must be passed to 
the subroutine— the address to 
be POKEd and the byte value to 
be placed there. USR1 expects 
to find these two integer vari- 
ables side-by-side in RAM. This 
expectation is met only if you 
define them consecutively in 
your program: 

120 1% = &HE123 

130 J% = 249 

140 Z = USR1(VARPTR(I%» 

Lines 120 and 130 set up the 
address and byte value con- 
secutively in RAM and 140 ex- 
ecutes the POKE. Z is an unused 
dummy variable. The address 
and the byte value need not im- 



mediately precede the USR1 
statement as long as they are 
created consecutively as in- 
teger variables— address first, 
byte value second. 

120DEFINTA,B 

130 FOR ADDR = &HE000 to &HE00A 

140 READ BYTE 

150 Z = USR1(VARPTR(ADDR)) 

160 NEXT ADDR 

170 STOP 

1 80 DATA 255,255,255,0,0,0,0,0,0,0,255 

Assuming the proper prelim- 
inaries, the above routine places 
the data values consecutively in 
the RAM block 57344 through 
57354 (X'EOOO", X'EOOA'). 

Run the Program Listing, 
choosing the proper addresses 
for your system, to display the 
first 101 bytes of the TRSDOS 
system! ■ 



10'64K, TRSDOS 1.2 
20 CLEAR 100,&HF2E8 
30DEFUSR0 = &HF2E9:DEFINT A 
40 SYSTEM "LOAD PEEKPOKE/CIM" 
50 FOR ADDR = TO 100 
60 PRINT ADDR; HEX$(USR0(ADDR)), 
70 NEXT ADDR 
80 END 

Program Listing 





TRSDOS 1.2 


TRSDOS 2.0 




32 K 


64K 


32K 


64 K 


RELO address 


72E9 


F2E9 


6FE9 


EFE9 


Protect address 


&H72E8 


&HF2E8 


&H6FE8 


&HEFE8 


PEEK entry address 


&H72E9 


&HF2E9 


&H6FE9 


&HEFE9 


POKE entry address 


&H72F2 


&HF2F2 


&H6FF2 


&HEFF2 



7a,b/e 1. System Addresses 



10 CLEAR 100, address 

20 DEFUSR0 = address 

30 DEFUSR1 = address 

40 SYSTEM "LOAD PEEKPOKE/CIM" 



'Choose Protect address from Table 1 . 
'Choose PEEK entry from Table 1. 
'Choose POKE entry from Table 1. 
'Fetch subroutine 



Table 2. Program Statements 
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CALL FREE FOR 

ERBATIM 

rLfc.AsiJLt 

SKS! 



Toil-Free 1-800-835-1129 

Exceptional prices, quick delivery 

Visa/Master Cord/ Checks /COD. 

Ash about our other TRS accessory 

and equipment buys 



DATA 




S 1U 



DATA SERVICES INC 
Compuief services since 1970 
O Dox 1157 Wichita, Kansos 67201 1 1 57 
(In Kansas coll 1 -31 6-838-9021 ) 



COLOR COMPUTER 
16K Extended BASIC 



GRAPHICS CHARACTER SET 

• Upper'Lower Case 

• Machine Language Subroutine 

• Use in 8 Graphics Modes 

• Uses BASIC String Variables 

• Design your own Characters 

FULL FEATURE MONITOR 
FORTH (32K + Cassette! 



$12 



S 6 

SI 5 



KIDS CORNER - Kid Tested!! 



FLASH CARDS (Over 1000 Words) S12 

NAME THAT TUNE 1 2 Player S 6 

KID STUFF 1 (Ages 4 and up) S 6 

KID STUFF 2 (Ages 5 and up) S 6 
Send for details 



FORTHRIGHT SOFTWARE o 
278 Connecticut Ave. 
Newington/Ct. 06111^412 



SEND AND RECEIVE 

MORSE CODE 

•SEND UP TO 40 WPM 
•COPY OVER 100 WPM 

Your Model I or III becomes a pro- 
grammable keyboard keyer that can 
send morse from the keyboard or 
from stored messages. Keying Is done 
either by the relay or by the audio 
output. Received morse is decoded, 
displayed, stored and printed. The 
cassette earphone plug connects to 
the receiver speaker to copy off the 
air. No hardware except patch cords 
Is required for many setups. 

satisfaction guaranteed 

Cassette with instruction booklet 
only $19.95 postpaid. Model I or III, 

LEVEL II, with at least 16k required. 

ROGO Computer Products 

4752 DeBeers Drive 

El Paso, Texas 79924 ^343 



n 



"nicro 

Back Issues 




January 1980 $5.00 

February to June 1980 3.00 

Single back issue 
July 1980 on 3.50 

Single back issue 

Add $1.00 per magazine for shipping. 

10 or more back issues 

add $7.50 per order lor shipping. 

Back Issues • Attn. Pauline Johnstone 
80 Pine St. • Peterborough, NH 03458 



PRACTICAL • ORIGINAL • SINGULAR • SUPERB • UNUSUAL 

- REFWARE THESAURUS c 
fc INNOVATIVE INSTANT WORD-FINDER jjj 

9 How nan, times have you racked your brain lor just the fight word *" 

U when writing an important letter, report, or article? How many times have ^ 

J your ideas been misunderstood because the wo.'ds you used didn't express v 

^ you! thoughts clearly anr! accurately'' m 
Now by using the remarkaole new REFWARE THESAURUS p-ograms. > 

£ your computer can speedily find those words that are on the tip of your S 

~ tongue but that you can't quite remnmbor at the momont And it tells you 2- 

_j how to spell them! ™. 

3 Just Slip a REFWARE THESAURUS disk .nto your disk drive. Then type c 

Jj m your sentences or paragraphs. The computer will quickly offer a variety r " 

j of alternatives, reiyptng your sentences or paragraphs with substitute .1 

£ possibilities chosen from its multi-thousand word vocabulary. M displays X 

*> the revised sentences on your monitor or types them on your printer as you 5 

* . choose, so that you can mull (hem over and choose the one that most ac- § 

t curacy expresses what yuL HEAL LY mean to say h 

= in addition to the specific programs capable of substituting suggested £ 

U alternate words tor nouns and adiectives, REFWARE THESAURUS Bulldtr ^ 

J- enables engineers, physicians, lawyers, educators, businessmen, authors. • 

jj and other professionals and specialists to develop their own ■ndmdually </> 

1 tailored vocabularies of hafd-to-reme-mber technical words. O 

£ REFWARE THESAURUS Adjective. 1.0 S39.95 — 

- 6.200 adjectives assist you in choosing the most accurate modifiers ^ 
£ in you- ads letters, reports, and speeches j> 

t REFWARE THESAURUS Nouns 1.0 $39.95 '1 { 

JJ 6,200 nouns suggest alternates for the names of persons, places, things. • 

- and ideas that you use in your writing and speaking 5 

£ REFWARE THESAURUS Builder 1.0 $149.95 J 

# Series ot eight utility programs enables the user to develop specialized < 
C computer thesaurus disk programs of hard-to-remember technical words £D 
U and their alternates tor personal use Functions independently of Adjec- O 
!; tives and Nouns programs C 
« Cft 
n MINIMUM System Required TRS 80* Mod I or Mod III 48K w<th two d>sk dnves • 

" A Trademark of Tandy Corporation £2 

X REFWARE' Reference software div-.sion David C Whitney Associates, Inc Jll 

?- ° Box451.Chappaqua. NY 10514 - 

- "A trademark of David C Wr-.tney Associates Inc -..^ j£ 

AHldOM3SIVUd • 3iaVXHVW3« • indnws • aigvmvANi 



AMWAY 



PRODUCT DISTRIBUTOR PROGRAMS 

• TRS-80 MODEL I III 16K CASSETTE-BASED 

• DISKS NOT REOD • SPECIFY MODEL I OR III 

• BASIC LISTINGS AVAILABLE FOR OTHER 
COMPUTERS 

• WRITTEN BY EMERALD DIRECT FOR HIS OWN USE 



14 PROGRAMS ON 3 C ASSETTES! 

<»*'< PBODUCT DISTRIBUTOR PAf. S50 
7 PROGRAMS. mcluOinq 0'<H-' Venf.e tLon <4fKl P'l.ci.iiis 
m * m O'>M O'SinbulO' Mecoios G<oss Piotn Booi.K'-eping 
P'.nier Options 

MONTHLY BONUS RECORD PROGRAM S2C 

SMALL HOME-BUSINESS PAK J49 95 

6 PROGRAMS. .ncluO'fXJ Aorfl. Precise' le'Jg*'' Mailing li 
Telephone Diaie< l.me' S""o*e invo.te Printer reqimeo 
AMBIZ PAK' Ail airo.e S 100 isa.es S 19 9Si 

16-sheet INFO-PAK Send $2 (credit on order) 
An pnces postpaid USA Canaoa Fokkjp and $2 Ca add 6»- 

BLECHMAN ENTERPRISES 
■w: 7217 Bernadine Ave. mm 

^ Canoga Park, CA 91307 

Phone: (213) 346-7024 




SERVE 

micro 



BINDERS 
&FILE 
CASES 




Keep your issues of 80 Micro together, handy and 

protected in handsome and durable library files or 

binders. Both styles bound in dark green leatherette 

with the magazine log stamped in gold. 

Fllesi Eoch file holds 6 issues, spines visible for eosy ref- 
erence, $5.95 eoch. 3 for $17.00. 6 for $30.00 

Binders. Eoch binder holds 6 issues ond opens flot for 
eosy reoding. $7.50 eoch. 3 for $21.75, 6 for $42.00 

(Postoge paid in USA. Foreign orders include $2.50 per 

item) 

Please state years. 1960 to 1963 

Send check or money order td 

JESSE JONES BOX CORP. 

P.O. Box 5120 

Philadelphia, PA 19141 

Allow 4 to 6 weeks for delivery 




bash 



When it comes to 

Flexible Disks, nobody 

does it better than 

Wabash. 

MasterCard. Visa Accepted. 
Call Free: (800)235-4137 



PACIFIC 
EXCHANGES 

100 Foothill Bivd 
San Luis Obispo CA 
93401 (InCal. call 
(805)543-1037) 




TRS-80 MODEL I & II USERS! 




Now you can have 2 printers on-line at all times. Our 

MODEL 80 LINE PRINTER SWITCH is designed 
specifically for the TRS-80 computer to allow the user 
to easily select between two printers by means of a 
conveniently located switch without changing cables. 
Our compact module connects to the printer port of 
your TRS-80 Model I or Model III through any reason- 
able length printer port extension cable and provides 

an edge connector for each of your two printers. 
Gold plated contacts ensure excellent connection relia- 
bility and ends the problem of constantly plugging and 
unplugging printer cables. And, it works with any type 
of printer that could normally be connected to a 
TRS-80 printer port. Our Model 80 switch comes 
assembled, tested, and ready to use A printer port 
extension cable is available from your local dealer or 
may be purchased separately from us at $ 1 2. 50 for an 
18" extension. See your local dealer or call or write 
now for more information. „ 

J \j\j\j\rhf signalling inc. — - — 

Administrative and Engineering Offices-P.O. Box 17510 
Kansas City. MO 64130 - phone: (B16) 931-4448 



^ See List ol Advertisers on page 386 
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HARDWARE 



Interface eight joysticks with your 80! 




Board 



David Haan 
4361 S. Estes St. 
Littleton, CO 80123 



In my article "Interrupt Mode 
IVi" (Encyclopedia for the 
TRS-80, Vol. 5, January 1982) I 
described construction of an in- 
terrupt handling board which 
can distinguish 126 different pri- 
ority levels of interrupts and 
pass that information on to the 
Model I to allow proper interrupt 
service routine execution. I also 
listed software examples for 
demonstration purposes. 

I built a 16-channel analog- 
digital (A/D) board which utilizes 
that interrupt handling board. If 
you have not yet built the inter- 
rupt handling board or do not 
plan to, you can still use this A/D 
board in a poled mode by not us- 
ing the interrupt generating 



The Key Box 

Basic Level II 
Model I 
16K RAM 



subcircuit. Some commercially 
available A/D boards are un- 
desirable because of their cost 
or the limited number of chan- 
nels available. I will show you 
how to build a powerful A/D 
board at a reduced cost. I built 
my A/D board around the CMOS 
National Semiconductor ADC 
0817. The chip's best features 
are its low power consumption 
(3 ma max), high speed conver- 
sion, repeatable accuracy and 
autozeroing (no adjustments are 
needed to get to zero). 

Figure 1 is a schematic of the 
A/D board as it would appear 
when you use it in conjunction 
with the interrupt handling 
board. It uses a single port for 
both read and write functions, 
and has a selectable interrupt 
priority level. 

Operation 

Throughout this example and 
those to follow, I will use 239 
(OEFH) as the port number and 
Line 6 as the analog input line. 
Also, I will use an interrupt prior- 
ity level of 96 (60H). I chose 
these values arbitrarily. 

When an output instruction is 
generated either by a Basic pro- 
gram as OUT 239,6 or by an As- 
sembly language program as 
OUT (OEFH), A (where the A reg- 
ister contains the line number), 
a value of six is placed on data 



line D0-D3. These lines are con- 
nected to Pins 36-33 respective- 
ly of U4 which represent the 
analog line address decoded in- 
puts. Next, the port number 
OEFH is placed on the address 
lines A0-A7 and is shortly 
followed by an OUT strobe. 

U1 and U2 decode address 
lines A0-A7 and allow U3 to 
pass on the OUT strobe. This 
OUT strobe is passed to Pins 16 
and 32 of U4. It will latch in the 
data appearing on the analog in- 
put line select pins, allowing U4 
to select analog input Line 6 and 
start the analog-to-digital con- 
version process. As I stated ear- 
lier, the conversion process will 
generate a ratio between the an- 
alog value on Line 6 and the ref- 
erence voltage on Pin 19. This 
ratio is extremely accurate 
across the range of 0-255. If the 
analog input voltage is equal to 
the reference voltage, the con- 
verter generates a value of 255. 
If the analog input is zero volts, 
it generates a zero or if 1/2 the 
reference voltage, it generates a 
value of 127. 

The A/D board consists of 
three subcircuits. The first is the 
read/write port (made up of U1, 
U2 and U3). The second is the 
A/D itself (made up of U4, U5 and 
U6), while the third subcircuit 
(the interrupt subcircuit) is made 
up of U7, U8, RP-1 and DS-1. Ig- 



nore the third subcircuit if you 
are not using the interrupt 
handling board. 

The A/D board takes a posi- 
tive unipolar analog input volt- 
age (which can appear on any 
one of the 16 analog inputs of 
U4) and converts it to an un- 
signed eight-bit value. This 
eight-bit value represents a ratio 
of the input voltage to the 
reference voltage which is ap- 
plied to Pin 19 of U4. As shown 
in the circuit, the reference 
voltage comes from the same 
power supply as the Vcc voltage 
on Pin 17. The reference voltage 
and the Vcc sources need not be 
the same; I did it here for sim- 
plicity. The analog input volt- 
ages, however, must not exceed 
the reference voltage, or dam- 
age to the A/D may occur. The 
reference voltage cannot be 
greater than the power supply 
voltage. The A/D board will also 
generate an interrupt to the in- 
terrupt handling board signaling 
the computer that the A/D has 
processed an analog value and 
the data is ready to be fetched. 

The time required to complete 
the conversion depends on the 
clock frequency on Pin 22 of U4. 
At a 1-MHz clock frequency, as 
is the case in Fig. 1, the conver- 
sion takes about 50 microsec- 
onds. Once the conversion pro- 
cess is complete, the data is 
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available on Pins 24-31 of U4, 

with data Line DO being Pin 24. 
Also, at this time, an end of con- 
version (EOC) signal is available 
at Pin 13 of U4. You can use this 
signal from Pin 13 to cause an 
interrupt to the CPU via the inter- 
rupt handling board; however, I 
have not used it here. 

The OUT signal that starts the 
conversion process initiates the 
interrupt. Since the A/D conver- 
sion process takes about 50 
microseconds and the software 
to process an interrupt takes 
about 80 microseconds, the A/D 
converter will be ready with the 
data before the computer can 
access the data. However, 
under two conditions this will 
not be true. One is if the comput- 
er has a CPU speed-up kit and 
operates faster than the normal 
1.78 MHz clock frequency, and 
the second is if the A/D's clock 
frequency is significantly less 
than 1 MHz. In these cases the 
computer will access the data 
before the A/D has completed 
the conversion. This will result 
in erroneous data since the data 
bits are in a tri-state mode as the 
conversion progresses. If, due 
to your configuration, the CPU 
will beat the A/D, then you must 
use the end of conversion signal 
from Pin 13 of U4. To use it, re- 
move the wire between Pin 10 of 
U2 and Pin 2 of U7 and add a 
wire between Pin 13 of U4 and 
Pin 2 of U7. This option, shown 
in Fig. 1, results in a total time 
between the start of the conver- 
sion to the access of data to be 
the total time of the software in- 
terrupt service routine plus the 
A/D's conversion time. No mat- 
ter which hardware method you 
use, U7 will receive a signal to in- 
itiate an interrupt. 

U7, a one-shot, enables U8 for 
approximately 1.2 microsec- 
onds. U8 takes whatever inter- 
rupt priority level is on its input 
pins, as determined by DP-land 
transmits it to the interrupt han- 
dling board via the VI B (Vector 
Interrupt Bus). The dip switch as 
shown provides an interrupt pri- 
ority level of 60H (96 decimal). I 
hardwired Bit on the dip switch 
to ground. This allows correct 
offsetting into a table of 16-bit 
addresses. Refer to my article 
"Interrupt Mode IV2" for a more 
detailed explanation of the inter- 

^See List ol Advertisers on page 386 



rupt service routine's operation. 
Once the interrupt handling 
board processes the interrupt 
and the interrupt service routine 
is executed, control will pass to 
your application software to 
fetch the data. 

Program Listings 1-4 illus- 
trate various software methods 
you can use to start the A/D and 
fetch the data. I will discuss 
these later, but for illustration 
let's assume you use an As- 
sembly language instruction IN 
A,0EFH. This accesses the data 
of U4 by having U1 and U2 
decode address lines A0-A7, 
and allows the IN strobe to 

enable U5 to put the data on 

data lines D0-D7. Although U4 
has a built-in tri-state output, I 
used U5 because of its higher 
drive capability. At this point, 
the data is in the A register and 
you can process it as needed. 
As the last instruction of your 
A/D access and application 
routine, RET returns operation 
to the software which the A/D in- 
terrupted. The data will remain 
available at the A/D until the 
next conversion process starts. 
If you need more detailed infor- 
mation on the A/D chip, you 
should obtain data sheets from 
National Semiconductor. 

Software 

Each example to follow re- 
quires the loading and running 
of the Basic software of Listing 
1. This loads in the machine 
language routine listed in List- 
ing 4 sections 1, 2 and 3. The 
software shown in Listing 4 sec- 
tion 3 is the interrupt service 
routine, the same as that listed 
in "Interrupt Mode 1 Vz." It deter- 
mines which routine to execute 
as directed by the priority level 
of the interrupt it receives. It 
does this by offsetting into a ta- 
ble of addresses by the value of 
the interrupt priority and execut- 
ing the routine at the address 
the entry in the table points to. 
Section 1 sets up the lookup ta- 
ble that the software of section 
3 will use and section 2 sets up a 
jump to the interrupt processor 
in section 3 when the CPU is in- 
terrupted. 

The first software example, 
shown in Listing 2, is a program 
that uses only Basic to initiate 



MONEY MAGIC! 

y douqfVIo 

DOUGHFLO. The Most Useful Program a Home or 
Business Manager Can Have! .--,■..; 




Designed For The Decision Maker, Doughflo is an interacting system of 
programs for cash flow analysis, budget planning, and bookkeeping. 
In The Home, Doughflo becomes a key tool in solving the puzzle of balancing ex- 
penses vs. income. Doughflo shows you where the money goes. 
Fire Your Bookkeeper! You, the new bookkeeper, will have easy access to 
all expense records Rapidly find and display any number of entries by description, 
type, amount, date, or number. 

Simple To Use, Doughflo is quick and efficient, carefully guiding you from data 
entry to report generation 

900 Entries In Memory at one time with 48K machines No time consuming 
disk access 

Sort 900 Entries In Only 2 Seconds! Sort by check number, description. 

date, or month 

User Friendly! Detailed instructions. Input screens and single keystroke com- 
mands allow quick and easy data entry and computer interaction. 
Amazingly Versatile! Indispensable in home or business for: 

• Budget Planning • Bookkeeping 

• Tax Praparation • Financial Analyaia 
Reports! Compare expenses and income vs. budget, total expenses, percent 
of total expenses, etc. Up to 24 months can be compared at once. 

Gain Valuable Insight. Doughflo is ready to save you time and money. 
Requires 32K and one or more disk drives, specify Model I or III. $44.95 postpaid 
to continental North America For more information check reader service 
number 



"A 

PERFECT 
CLOAD 
EVERY 
TIME" * 




tope cliqitizer , 

'From ■ raviaw in Saptambar-Octobar 1910 Elamantary Electronics. Raprint* availabla - 



At last there is a cure for TRS-80 tape cloading blues! For over 
three years, Alphanetics has been selling the TRS-80 Tape Digitizer, a proven 
hardware solution for your software problems. No longer need you |uggle the 
recorder's volume control endlessly, trying for a perfect cload of a pre-recorded 
program. Just pop the tape into the cassette recorder, process the signal 
through our digitizer, and you're ready to RUN a perfect load! 
Just check out the Tape Digitizer's features . . 

• Makes tapa program loading virtually independent of volume 
control setting. 

• Allow* copying system and normal tapes without using 
computer. 

• Makes a perfect digital copy of any tapa without using com- 
puter, removing hum, noise, and curaa minor dropouts. 

• Cassette switch allows manual control of cassette recorder, 
independent of computer control. 

• "GOOD DATA" indicator aaaily enables setting proper 
volume . . . doubles as a tape monitor. 

• A.C. powered — no batteries to replace. 

• Housed in a sturdy, attractive metal case. 

• Completely compatible with Level I & II, also LOW spaed (500 
baud) Model III. 

Feed your cassette to the Alphanetics Tape Digitizer and feed your computer the 
exact digital waveform the TRS-80 gave your tape Get nd of your tape Lugs 
today — $64.95 postpaid to continental North America, or return within 10 
days for a full refund! 



(olph onetics) 



Box 597 Forestville. Ca. 35-436 
24 hr. phone (707] 837 7237 "SF 
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Fig. 1 




SUPPORTB «l_l_ MX — BO PRINT STYLES 
WDRDPROCESB I NB TEXT CONTROL MODE 
MENU MODE FOR C3ENERAL- P»RRl_ I C«T I ON 
TRUE PRDPORT I ONAL. J LIST I F" I C«T I ON 



* yNDERLINES ANYWHERE * CENTERS TITLES 
» gugSCRIPTS » 8UPER SCRIPT8 

* DYNAMIC CONTROL OF LINE BPACINQ IN 1/72 IN. INCREMENTS 

* DYNAMIC CONTROL OF MARGINS 
* WORKS WITH M08T PROORAM8 INCLUDINO BCRIP8IT T " 



jordlnary user on 



ited printer driver utility 
proqram which allows you to select any MX-80 print style or 
function such as underlining on a character by character basis 
within word processing text. Maxprint also features proportional 
right margin justification within a block Of standard text to 
give your printout a truly professional appearance. 

Maxprint consists entirely of Z-BO machine language for fastest 
possible printing performance. Minimum system requirements are a 
32K Model I or Model III with one disk drive. 

Unleash the true potential of your MX-80. Maxprint l* supplied 
on disk with an extensive 40 page manual and shipping for onlyi 



TO ORDERa 



Call <408> 737-2233 Visa / Masti 
Bend check or money order toi 
Reecjcjyfcr-oni c=e» f 

381 First Street, Suite 3147 
Los Altos, California 94022 

isidenu add 61 sales ta« /.' Scnpsit TM of Tandy Corp. 
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the A/D conversion and access 
the resultant data. Line 50 
POKEs a RET instruction into 
the memory location that is the 
entry point of the A/D service 
routine. When this instruction is 
executed, it will result in a return 
to Basic. Line 60 initiates the 
conversion process in the A/D. 
The interrupt will occur at this 
point. Upon return, line 70 will be 
executed, and the data put into 
the variable A. The remainder of 
the program displays the value 
on the screen. The potentio- 
meter shown in Fig. 1 is shown 
connected between five volts 
and ground with the wiper con- 
nected to input 6. This enables 
you to vary the input voltage be- 
tween zero and five volts. 

The second software exam- 
ple, shown in Listing 3, initiates 
a conversion as in Listing 2, but 
processes the data in Assembly 
language rather than through 
Basic. The Assembly language 
program, which is loaded into 
memory by the Basic program, 
is shown in Listing 4 section 4. 
Once the computer enters this 
routine due to an interrupt from 
the A/D, the routine fetches the 



data from the A/D and pro- 
cesses it to display the voltage it 
has read. 

You can also do the same 
thing from a machine language 
program with no interface to 
Basic. No matter which method 
you use, the end result is the 
same. The machine language 
routine provides you with an 
edge because it executes faster. 

Applications 

There are many possible ap- 
plications for an A/D. You could 
interface up to eight joysticks to 
the computer, or measure the 
temperatures or humidity in 16 
rooms. You have 16 channels 
available for a variety of uses. 

Construction 

I built this circuit on the same 
wire-wrap board as the interrupt 
handling board, using the same 
five-volt power supply. If you do 
not use the interrupt handling 
board, you must provide a five- 
volt, one-amp power supply, ap- 
propriate connectors, and rib- 
bon cable to connect to the 
TRS-80 bus. You might want to 
use a four-bit latch to latch in 
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M let iliK 




invented magnetic recording 
tape, the forerunner of today' 
wide range of magnetic medi; 
back in 1934, and was the firs 
independent manufacturer of 
jatible floppy disks 



Cross-linked oxide coating- for 
low head wear and long trouble- 
free media life. 





Tough Tyvek sleeve — no pape: 
dust, no static electricity. 



Special self-cleaning jacket and 
liner help eliminate data errors 
and media wear and tear. 





Center hole diameter punched to 
more accurate standards than 
ndustry specifications, for top 
performance. 



Bi-axially oriented polyester 
substrate— for uniform and reli- 
able performance year after year. 



Total capability— one of two man- 
ufacturers in the world that 
makes both 8" and 5.25" models, 
; has tape and disk experience, and 
manufactures floppy disk drives. 



Double lubrication -lubricants 
both in the formula and on the 
disk surface, to minimize media 
wear due to head friction. 



r Packaging to suit your 100% certification - every single For the name of your nearest 

requirements - standard flip-top disk is tested at thresholds 2-3 supplier, write BASF Systems, 

box, Kassette 10® storage case, times higher than system require- Crosby Drive, Bedford, 

or bulk pack. ments, to be 100% error-free. MA; 01730, -or call 617-271-4030. 




B 






Floppy Disks Mag Cards Cassettes Computer Tapes Disk Packs Computer Peripherals ^532 
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*MODEL III 48K With 
Dual Tandon Disk Drives 



1,995 



'MODEL III UPGRADE 

Includes One 40 track Tandon Disk Drive, MDX-3 
and Installation kit 



679 



95 



MDX-3 (Completed) 

fully assembled Disk Controller board, RS232 and 
built-in Phone Modem 



s 324 s 



* MDX-3 ( Bar e board with Manual) 



74 J 



* INSTALLATION KIT * 1 1 9- 

Includes Disk Mounting hardware and Power Supply and Cables 



Island Computer Services Model 111 TRS 80 

system and Model III Upgrade come complete 

with Micro-Designs MDX-3 Disk controller board 

including a built-in 300 Baud direct connect phone 

Modem with answer and originate modes, and serial 

interface with both RS232 and 20Mk loop ports. 




ISLAND 

COMPUTER SERVICES 

PHONE: 206-675-3632 

DATA: 206-675-9786 

P.O. BOX 804, Oak Harbor, 

Wash. 98277 

Mastercard of Visa accepted 





m 
11 



t y A 1 3 



NOW AVAILABLE!!! The MDX-5 

MODEL III INSTALLABLE 300 BAUD DIRECT CONNECT PHONE MODEM WITH ANSWER 
AND ORIGINATE MODES AND RS232 SERIAL INTERFACE. USABLE ON MOST MODEL III 
^__^__^^_^ SYSTEMS. 



THE SOFTCORE 
SOFTWARE CO. 




"TOO MUCH" 

FOR 
RADIO SHACK! 

Radio Shack REFUSED to 
include MISADVENTURE 
#1 in their SOURCEBOOK 
due to our description of 



Southmoor Circle. Kettering, OH 45429 ll the game! 



#0201 Misadventure #1 [Madam Rosa's Massage Parlor] 

#0202 Misadventure #2 [Wet T-Shirt Contest] 
*#0203 Misadventure #3 [Sewers of Moscow] 
*#0204 Misadventure #4 [Casino of Pleasure] 

#0301 Donne' Bugg [Adventure-decoder] 
*#0401 Mystery Of The Keys [COLOR computer only] 

•With Sound 

Our MISADVENTURE SERIES consist of CHALLENGING and FUN 
"adventure-type" programs that may occasionally be a bit naughty! 

MYSTERY OF THE KEYS for the color computer is a graphic puzzle as 
addicting as "The Cube" and similar to "The Link". 4k and up. 

IN MISADVENTURE #1 the player has to make his way from the sleazy 

deserted WHARFS, gain admittance to the ancient SPEAKEASY, and 
attempt to discover the hidden photographs of the politician's beautiful 
daughter! Brave the deadly alleys, hallways, and traps. Avoid the 
BOUNCER and the other characters of questionable reputation! Play in 
the rigged CARD GAME if you dare! Discover why the old man died with 
a smile on his face! Find out why the WINO prefers cheap booze! Above 
all. try toescape without needing any injections of penicillin!!! 

DOHNE' BUGG is our best-selling ADVENTURE-DECODER! Are you 
STUCK in a machine-language ADVENTURE GAME'' This program will 
display on the screen all VERBS that interact in the game, all 

LOCATIONS & OBJECTS you will find, and all ACTIONS that result! A 
MUST FOR THE SERIOUS ADVENTURER! Note: will not work on Model 
III disk systems! 

All programs (except #0401) work on 16k MODEL I & III. *" 379 

$15 EACH — we pay postage! 

Immediate shipment! Check, credit cards, or phone order [12-6 p.m.] 
Dealers and Distributors welcome — please inquire. Hint Sheets Available! 



data lines D0-D3 at the time the 
OUT signal starts a conversion. 
Tie the OUT signal to the latch 
enable. You can then use the 
latch in conjunction with U8 to 
transmit this same data back as 
an interrupt priority level on in- 
terrupt lines U11-U14. In this 
way, each analog input can have 
its own priority level with input 
line 5 having a higher priority lev- 
el than line 4. Each line will 
have its own A/D service routine. 
I did not build the 1 MHz clock 
shown driving the A/D on my A/D 
board; it is a duplicate of the cir- 
cuit shown in the CMOS Cook- 



book by Don Lancaster. In my 
particular application, my S-100 
bus has a 2 MHz clock I divide 
down to 1 MHz. If desired, you 
can use a 555, but it has a 
reliable maximum clock rate of 
less than 1 MHz. Experiment 
and see. If the clock rate falls 
too low, then use the EOC signal 
to cause the interrupt. ■ 

David Haan is a systems pro- 
grammer who maintains operat- 
ing system software in a real- 
time data acquisition computer 
system for a gas and electric 
utility. 



1" REM LISTING 1 

15 REM 

20 REM THIS ROUTINE MUST RUN BEFORE RUNNING EITHER OF THE 

30 REM PROGRAMS IN LISTINGS 2 OR 3 . SET MEMORY SIZE TO 

40 REM 32250 AND UNDER 'SYSTEM' ENTER /32000 AFTER RUNNING 

50 REM THIS ROUTINE. 

60 FOR I = 32000 TO 32027 

7 READ A 

80 POKE I, A 

9 NEXT 

100 FOR I = 32256 TO 32289 

110 READ A 

120 POKE I, A 

130 NEXT 

140 DATA 33,64,126,34,96,127,243,219,238,211,238,62,195,50,18 

150 DATA 64,33,0,126,34,19,64,237,86,251,195,25,26 

160 DATA 245,197,219,238,79,6,127,10,50,19,126,12,10,50,20,126 

170 DATA 193,241,205,0,0,245,197,219,238,254,0,32,231,211,238 

180 DATA 193,241,201 

190 END 

Program Listing 1 



1 REM LISTING 2 

5 CLS 

10 REM THIS PROGRAM WILL INITIATE AN INTERRUPT FROM THE A/D. 

20 REM IT WILL USE PORT 239 AND RETURN THE VALUE TO VARIABLE A 

3 REM THE VALUE WILL BE PROCESSED TO INDICATE AN INPUT VOLTAGE 

40 REM AND DISPLAY THE VALUE ON THE SCREEN. 

50 POKE 32320,181 :REM SET UP RETURN INSTRUCTION 

55 AS="#.*t*#" 

60 OUT 239,6 

70 A = INP(239) :REM GET INPUT VALUE 

80 A = A* 5/ 255 : REM CONVERT TO VOLTAGE INPUT 

90 PRINT@512,"THE INPUT VOLTAGE IS 

95 PRINT USING A$;A; 

96 PRINT " VOLTS" 

100 GOTO 60 :REM DO IT AGAIN 
110 END 

Program Listing 2 



200 
210 

220 
230 

2 40 

250 

26 

27 
2»S 

2 90 

3 00 
310 
320 
330 
340 
350 
363 
370 
3 80 
390 
402 
410 
420 
43 
440 



REM 

REM LISTING 3 

REM 

REM THIS PROGRAM WILL POKE A MACHINE LANGUAGE ROUTINE 

REM INTO HIGH MEMORY. THIS ROUTINE WILL GET THE A/D 

REM VALUE AND PROCESS IT FOR DISPLAY ON THE SCREEN. 

CLS 

FOR I = 32320 TO 32483 

READ A 

POKE I, A 

NEXT ' 

OUT 239,6 

GOTO 310 

DATA 229,42,21,126,229,33,201,0,34,21,126,251,245,197,213 

DATA 221,229,219,239,17,0,0,95,7 9,6,96,205,159,126,22,100 

DATA 20 5,17 3,126,221,9,221,229,225,22,10,205,173,126,62,48 

DATA 132,50,221,126,221,2 29,225,205,173,126,62,48,132,50 

DATA 2 20,126,221,229,225,62,48,133,50,218,126,33,20 5,126,17 

DATA 0,60,1,23,0,237,176,221,225,209,196,241,243,225,34,21 

DATA 126,251,225,201,33,0,0,203,56,48,1,25,200,235,41,235 

DATA 24,245,125,108,3 8,0,3 0,0,6,16,221,33,0,0,41,23,48,1 

DATA 4 4,221,41,2 21,35,183,237,82,4 8,3,25,221,43,16,23 7,201 

DATA 84,72,69,32,73,78,80,85,84,32,73,83,32,0,46,0,0,32,86 

DATA 79,76,84,83 

END 



Program Listing 3 
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Take DOSPLUS 3.4 



c 



Do you have that tired 
dragged out feeling 
known as "DOS Drag" 
from an operating system 
that is just too slow? Do 
you have "Computis 
Interruptous" because 
you spend more time 
with your DOS manual 
than you do at your com- 
puter? Has an undepend- 
able DOS got you down 
with the inadvertent "Dumps"? 

Then you need DOSPLUS 3.4. 
DOSPLUS 3.4 contains all the active 
ingredients for a quick recovery. Dependable fast 
action features like instant boot-up, BASIC array sort 
(multi-key, multi-array), Tape/ Disk- Disk/Tape utility 
(with program relocator), lnput@ (controlled screen 
input from BASIC), and complete disk editing 
features including random access file editing and 
ASCII modification on sector dump utility. 

And who wouldn't feel better with proven fea- 
tures like the ability to use a "DO" (command 
chaining) file from within a BASIC program, 
and more reliable BACKUP and FORMAT utilities. 




In addition, you have the 

convenience of repeating 

the last DOS command 

with "/" <ENTER>, a 

single file convert from 

Model III TRSDOS, file 

directory supported for 

Model III TRSDOS disks, 

complete device routing 

supported with FORCE and 

JOIN, and the ability to read or 

create 40 track disks in 80 track 

drives. Plus many other time and effort 

saving features. 



Of course, in order for a prescription to work, 
you've got to follow instructions — in this case 
the instructions are contained in the new 
easy to use easy to follow 240 page DOSPLUS 
users guide with system technical reference section. 
So, if you're experiencing any DOS 
related discomfort, get instant relief. $"^ Jt t%95 
Get DOSPLUS 3.4 



DOSP 




■■■■HBBHBn 



First in the Industry backed by a lifetime wai 






MICRO SYSTEMS 
SOFTWARE, INC. 

5846 Funston Street ■ Hollywood FL 33023 



(Outside of Fla.) 
CALL TOLL FREE 

1-800-327-8724 



FOR VISA/MASTEflCHAnaEyC.aO. ORDERS 
TOLL FREE LINES WILL ACCEPT ORDERS ONLY1 

For Applications and Technical information, 
call (305! 983-3390 w drop us a card. 

Dealers inquiries invited 



^384 



MODEL l/lll 

SUPER SKETCHER MODEL l/lll 

Have you ever wanted to add graphics to 
BASIC programs as BASIC subroutines in 
minutes rather than hours... or draw 
schematics, charts, graphs, maps, cartoons or 
logos such as ours using graphics & 
alphanumerics. ..save graphics as pages and 
animate them or print them with your EPSON 
MX-80? SUPER SKETCHER's the answer. It 
works like a text editor with graphics. It's easy 
to use and Features • Full Cursor control • 
Help table • on screen editiong • Circle, 
Square, Sine Wave & point to point commands 
• Edit & animate 10 Graphics screens at one 
time • Save Graphics files, BASIC subroutines 
& programs on disk or tape • 128x45 or 64x15 
display • Built in Epson MX-80 driver • and 
much more. 
SUPER SKETCHER Mod l/lll DISK $29.95 

CODES II for the ELECTRIC PENCIL 

CODES II for the Model I and the ELECTRIC 
PENCIL is an easy to use software package 
that lets you imbed printer control codes into 
your PENCIL textfiles, with NO hardware add- 
ons. Shift your printer into Double Wide, 
Condensed, Elongated character fonts and 
send any special control codes to your smart 
printer to get it to do what you bought it for. 
Codes II loads into the Electric Pencil and 
includes codes for Epson MX-80 & 100. R.S. 
LP IV, VII & VIII, Centronics 737/739, MPI 88 
series. Okidata Microlines and one that you 
can customize. 
TAPE $19.95 (Require, lower cate) DISK $24.95 

DISK INVENTORY SYSTEM MODEL III 

DISK INVENTORY for the Model III allows you 
to keep track of your disks permanently! This 
Menu Driven indexed utility lets you search 
through up to 99 disks (4752 diskfiles) in 1 
second and display or print them 
alphabetically by name, extension or disk 
number^ Printer driver has built in page 
numbers & spacing in all modes and a unique 
Disk Jacket labeling feature. 
MODEL III DISK $29.95 

AUTOMATIC MENU SYSTEM MOD III 
AUTOMENU for the Model III is more than just 
an automatic menu system. Just power up and 
AUTOMENU takes over with a complete menu 
to Execute, Load or List Programs & 
Command files or enter Debug, Basic or 
System with a single keystroke. Ideally sr" 
for office use. 
MODEL III DISK $15.95 

16K RAM $15.99 

Premium 16K 200 Ns RAM for TRS-80 Model 
lll/l computers. Includes ram test & 
instructions. ONE YEAR GUARANTEE 
(Model 1 owners add $2 for dip shunts) 

DEALER INQUIRIES INVITED 

Allow 2 extra weeks lor personal checks COD orders add 
$2.00 When ordering specify computer type and add $2.00 
lor S/H Minn, residents add 5% sales tax. VISA/Master Chg. 

VISA/MASTER CHG. ACCEPTED 



master charge 




7D00 21407E 
7D03 22607F 



7D06 F3 
7D07 DBEE 
7D09 D3EE 

7D0B 3EC3 
7D0D 321240 
7D10 21007E 
7D13 221340 
7D16 ED56 
7D18 FB 
7D19 C3191A 



7E00 

7E00 F5 
7E01 C5 
7E02 DBEE 
7E04 4F 

7E05 067F 



P.O. Box 19096 • Minneapolis. MN 55419 - 612/827-4703 
TRS-80 it registered trademark of Tandy Corp. 



7E07 
7E08 
7E0B 
7E0C 
7E0D 
7E10 
7E11 
7E12 
0001 
0001 
7E15 
7E16 
7E17 
7E19 
7E1B 
7E1D 
7E1F 
7E20 
7E21 



7E40 

7E40 
7E41 
7E44 
7E45 
7E48 
7E4B 
7E4C 
7E4D 
7E4E 
7E4F 
7E51 
7E53 
7E56 
7E57 
7E58 
7E5A 
7E5D 
7E5F 
7E62 
7E64 
7E66 
7E67 
7E69 
7E6C 
7E6E 



0A 

32137E 

0C 

0A 

32147E 

CI 

Fl 

CD 



F5 

C5 

DBEE 

FE00 

20E7 

D3EE 

CI 

f'i 

C9 



E5 

2A157E 

E5 

21C900 

22157E 

FB 

F5 

C5 

D5 

DDE5 

DBEF 

110000 

5F 

4F 

0660 

CD9F7E 

1664 

CDAD7E 

DD09 

DDE5 

El 

160A 

CDAD7E 

3E30 

84 



00010 
00020 
00030 
00040 
00050 
00060 
00070 
00080 
00090 
00100 
00110 
00120 
00130 
00140 
00150 
00160 
00170 
00180 
00190 
00200 
00210 
00220 
00230 
00240 
00250 
00260 
00270 
00280 
00290 
00300 
00310 
00320 
00330 
00340 
00350 
00360 
00370 
00380 
00390 
00400 
00410 
00420 
00430 
00440 
00450 
00460 
00470 
00480 
00490 
00500 
00510 
00520 
00530 
00540 
00550 
00560 
00570 
00580 
00590 
00600 
00610 
00620 
00630 
00640 
00650 
00660 
00670 
00680 
00690 
00700 
00710 
00720 
00730 
00740 
00750 
00760 
00770 
007 80 
007 90 
00800 
00810 
00820 
00830 
00840 
00850 
00860 
00870 
00880 
00890 
00900 
00910 
00920 
00930 
00940 
00950 
00960 
00970 
00980 
00990 
01000 
01010 



Program Listing 4 

LISTING 4 

SECTION 1 

THIS ROUTINE WILL PLACE THE MANUAL INTERRUPT 
ISR ADDRESS INTO THE TABLE OF ISR'S. 



START LD 

1-0 



7D00H 



HL,ADISR 
(7F60H) ,HL 



SECTION 2 



;A/D INT. ISR LOCATION. 
; PLACE IN ISR TABLE. 



THIS IS THE SET UP FOR THE INTERRUPT PROCESSOR. 
IT MUST BE RUN TO ESTABLISH THE LOCATION OF THE 
INTERRUPT PROCESSOR. IT NEED NOT BE IN PROTECTED 
MEMORY. 



DISABLE INTERRUPTS. 
THE IN AND OUT IN- 
STRUCTIONS CLEAR THE 
INTERRUPT BOARD. 
LOAD JUMP INSTRUCTION. 
INTO MEM. LOC. 4012H. 
START OF INT. PROCESSOR. 
PUT IN JUMP ADDRESS. 
SET INT. MODE TO 1. 
ENABLE INTERRUPTS. 
GO TO BASIC ENTRY. 



SECTION 3 

THIS IS THE INTERRUPT PROCESSOR. IT MUST 
RESIDE IN PROTECTED MEMORY. 



DI 




IN 


A,(0EEH) 


OUT 


(0EEH) ,A 


LD 


A,0C3H 


LD 


(4012H) ,A 


LD 


HL,IPROC 


LD 


(4013H) ,HL 


IM 


1 


EI 




J? 


1A19H 



ORG 

IPROC PUSH 
PUSH 
IN 

IPROC1 LD 



LD 

LD 

LD 

INC 

LD 

LD 

POP 

POP 

DEFB 

DEFS 

DEFS 

PUSH 

PUSH 

IK 

CP 

JR 

OUT 

POP 

POP 

RET 



CALL 
CALL1 
CALL2 
CNTRL 



7E00H 

ftF 

BC 

A, (0EEH) 

C,A 

B,7FH 

A,(BC) 

(CALLl) ,A 

C 

A,(BC) 

(CALL2) ,A 

BC 

AF 

0CDH 

1 

1 

AF 

BC 

A, (0EEH) 



NZ,IPROCl 

(0EEH) ,A 

BC 

AF 



,-32256 

;SAVE AF REGISTERS. 

;SAVE BC REGISTERS. 

;GET INT. PRIORITY LEVEL. 

;REG. 'C HAS OFFSET 

;INTO ISR TABLE. 

;REG. 'B' HAS START OF 

;ISR TABLE. 

;ISR LO ORDER BYTE. 

;PUT ADDR. IN CALL INSTR. 

;ISR HI ORDER BYTE. 
;PUT ADDR. IN CALL INSTR. 
; RESTORE ' BC ' REGISTERS. 
; RESTORE 'AF' REGISTERS. 
;CALL INSTRUCTION. 
;CALL LO ORDER BYTE. 
;CALL HI ORDER BYTE. 
;SAVE 'AF' REGISTERS. 
;SAVE 'BC' REGISTERS. 
;GET INT. PRIORITY LEVEL. 
;TEST IF ONE EXITS. 
;GET ISR ADDRESS. 
; CLEAR INT. BOARD. 
; RESTORE ' BC ' REGISTERS. 
; RESTORE 'AF' REGISTERS. 
; RETURN FROM INTERRUPT. 



SECTION 4 

THIS IS THE A/D INTERRUPT SERVICE ROUTINE. 
IT MUST ALSO RESIDE IN PROTECTED MEMORY. 



7E40H 



PUSH 


HL 


LD 


HL, (CNTRL) 


PUSH 


HL 


LD 


HL,0C9H 


LD 


(CNTRL) ,HL 


EI 




PUSH 


AF 


PUSH 


BC 


PUSH 


DE 


PUSH 


IX 


IN 


A,(0EFH) 


LO 


DE,0 


LD 


E,A 


Li) 


C,A 


LD 


B,96 


CALL 


MULT 


LD 


D,100 


CALL 


DIVIDE 


ADD 


IX, BC 


PUSH 


IX 


POP 


HL 


LD 


D,10 


CALL 


DIVIDE 


LD 


A,30H 


ADD 


A,H 



32320 

SAVE 'HL' REGISTER. 
GET 2 PUSH INSTRUCTIONS. 
SAVE PUSH INSTRUCTIONS. 
0C9H IS RETURN INSTR. 
PUT RETURN IN INT. PROC . 
ENABLE INTERRUPTS. 
SAVE 'AF' REGISTER. 
SAVE 'BC REGISTER. 
SAVE 'DE 1 REGISTER. 
SAVE 'IX' REGISTER. 
GET INPUT VALUE. 
CLEAR 'DE' REGISTER. 
PUT INPUT VALUE IN ' E ' . 
ALSO SAVE IT IN 'C . 
CONVERT INPUT TO 
VALUE SUCH THAT AN 
INPUT OF 255 WILL BE 
EQUAL TO 500. EQUAL 
TO 255 * 1.96 
PUT CONTENTS OF 'IX* 
INTO 'HL' REGISTER. 
DIVIDE 'HL' BY 10. 

PUT ASCII INTO 'A' . 
ADD REMAINDER OF DIVIDE 

Program continues 
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Progr c 


m continued 










7E6F 


32DD7E 


01020 




LD 


(ONES) ,A 


>TO 'A' r PUT IN MSG AREA. 


7E72 


DDE5 


01030 




PUSH 


IX 


;PUT CONTENTS OF 'IX' 


7E74 


El 


01040 




POP 


HL 


;INTO 'HL' REGISTER. 


7E7 5 


CDAD7E 


01050 




CALL 


DIVIDE 


;DIVIDE BY 10. 


7E7 8 


3E30 


01060 




LD 


A,30H 


;PUT ASCII INTO 'A'. 


7E7A 


84 


01070 




ADD 


A,H 


;ADD REMAINDER OF DIVIDE 


7E7B 


32DC7E 


01080 




LD 


(TENS) ,A 


;TO 'A', PUT IN MSG AREA. 


7E7E 


DDE5 


01090 




PUSH 


IX 


; PUT CONTENTS OF ' IX ' 


7E80 


El 


01100 




POP 


HL 


;INTO 'HL' REGISTER. 


7E81 


3E30 


01110 




LD 


A,30H 


;PUT ASCII INTO 'A'. 


7E83 


85 


01120 




ADD 


A,L 


;ADD HUNDREDS PART OF #. 


7E84 


32DA7E 


01130 




LD 


(HUND) ,A 


;PUT IN MESSAGE AREA. 


7E87 


21CD7E 


01140 




LD 


HL,MSG 


;GET START ADDR. OF MSG. 


7E8A 


11003C 


01150 




LD 


DE r 3C00H 


; START OF SCREEN. 


7E8D 


011700 


01160 




LD 


BC, LENGTH 


; LENGTH OF MSG BUFFER. 


7E90 


EDB0 


01170 




LDIR 




; DISPLAY MESSAGE. 


7E92 


DDE1 


01180 




POP 


IX 


/RESTORE 'IX' REGISTER. 


7E94 


Dl 


01190 




POP 


DE 


/RESTORE 'DE' REGISTER. 


7E95 


CI 


01200 




POP 


BC 


t RESTORE 'BC REGISTER. 


7E96 


Fl 


01210 




POP 


AF 


; RESTORE 'AF' REGISTER. 


7E97 


F3 


01220 




Dl 




/DISABLE INTERRUPTS. 


7E98 


El 


01230 




POP 


HL 


;GET 2 PUSH INSTRUCTIONS. 


7E99 


22157E 


01240 




LD 


(CNTRL) ,HL 


/RESTORE INSTR. TO IPROC. 


7E9C 


FB 


01250 




EI 




/ENABLE INTERRUPTS. 


7E9D 


EI 


01260 




POP 


HL 


/RESTORE 'HL' REGISTER. 


7E9E 


C9 


01270 




RET 




/RETURN FROM ADISR. 


7E9F 


210000 


01280 


MULT 


LD 


HL,0 


/CLEAR 'HL'. 


7EA2 


CB3 8 


01290 


MULTLP 


SRL 


B 


/MULTIPLY THE VALUE 


7EA4 


3001 


01300 




JR 


NC,MULTGO 


/IN 'E' REG BY THE 


7EA6 


19 


01310 




ADD 


HL,DE 


/VALUE IN 'B' REG. 


7EA7 


C8 


01320 


HULTGO 


RET 


Z 


/SEE NOTE BELOW. 


7EA8 


EB 


01330 




EX 


DE,HL 




7EA9 


29 


01340 




ADD 


HL,HL 




7EAA 


EB 


01350 




EX 


DE,HL 




7EAB 


18F5 


01360 




JR 


MULTLP 




7EAD 


7D 


01370 


DIVIDE 


LD 


A, I, 


/DIVIDE THE VALUE IN 


7EAE 


6C 


01380 




LD 


L,H 


/ ' HL ' REG BY THE VALUE 


7EAF 


2600 


01390 




LD 


H,0 


/IN 'D'. 


7EB1 


1E00 


01400 




LD 


E,0 


/SEE NOTE BELOW. 


7EB3 


0610 


01410 




LD 


B,16 




7EB5 


DD210000 


01420 




LD 


IX, 




7EB9 


29 


01430 


DIVLP1 


ADD 


HL,HL 




7EBA 


17 


01440 




RLA 






7 EBB 


3001 


01450 




JR 


NC,DIVLP2 




7EBD 


2C 


01460 




INC 


L 




7EBE 


DD29 


01470 


DIVLP2 


ADD 


IX, IX 




7EC0 


DD23 


01480 




INC 


IX 




7EC2 


B7 


01490 




OR 


A 




7EC3 


ED52 


01500 




SBC 


HL,DE 




7 EC 5 


3003 


01510 




JR 


NC, DIVGO 




7 EC 7 


19 


01520 




ADD 


HL,DE 




7EC8 


DD2B 


01530 




DEC 


IX 




7ECA 


10ED 


01540 


DIVGO 


DJNZ 


DIVLP1 




7ECC 


C9 


01550 




RET 






7ECD 


54 


01560 


MSG 


DEFM 


'THE INPUT IS 


' 


0801 




01570 


HUND 


DEFS 


1 




7EDB 


2E 


01580 




DEFB 


• . • 




0001 




01590 


TENS 


DEFS 


1 




0001 




01600 


ONES 


DEFS 


1 




7EDE 


20 


01610 




DEFM 


1 VOLTS' 




£017 




01620 


LENGTH 


EQU 


S-MSG 








01630 


;THE MULTIPLY 


AND DIVIDE ROUTINES LISTED ARE THOSE 






01640 


;LISTEC 


IN "TRS-80 ASSEMBLY LANGUAGE PROGRAMMING" 






01650 


; PUBLISHED BY 


RADIO SHACK AS 


PUBLICATION # 62-2006. 


?S0!1 




01660 




END 










Communicate in color with the MICRO- 
CONNECTION™ direct connect 
modem for the TRS-80* Color 
Computer. Run 300 bps serial printers 
to download color files. Send E-mail, 
chat, buy merchandise, access the 
Source* and other exciting data bases 
with the MICROCONNECTION™ for 
the TRS-80* Color Computer. S 199.50 

the rnicroperipheraf corporation 

2643 - 15 1 st Place N.E. 

Redmond WA 98052 
(206)881-7544 

Thanks Bobi 

Color Bulletin Board Connection-80 

(212) 441-2807 



•indicates trademarks </ Tandy Cexp 
and Reader's Digest, inc 
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Subset^ 




80 Micro does not keep subscription 
records on the premises, therefore 
calling us only adds time and doesn't 
solve the problem. 

Please send a description of the prob- 
lem and your most recent address 
label to: 

BQmicno 
Subscription Dept. 
PO Box 981 
Farmingdale, NY 11737 



Thank you and enjoy your subscription 
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LYNX 

TRS-80 

MODEM 

$ 2 2988 

DELIVERED 



LYNX Features 

D Compellability with both Wode : a id 
Z] No separate purchases required 
C One year warranty 

□ Autc. dial Auto answer 

D Works with any software, including ST-30 
by Mickius 

G Active C.tA.< BREAK, and CONTROL keys 
"3 Half or lull auplex variable word length 
portly, ona stop bits 

Zi Dial trorr phone. Keyboard, or memory 

a Works with or without Model III RS-232 cord 

□ Can oc placed o- either side ot Model III 
C! Nci tool, needed to Install 
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is available 
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UTILITY 



Do it back and forth as well as up and down. 



Horizontal Scrolling 



G. M. Foley 
4385 Mason 
Canal Winchester, OH 43110 



Most programs which plot 
the value of a function 
place the independent variable 
(often time or distance) horizon- 
tally on the screen. But try to 



shift the plot from right to left 
when adding new values- 
Basic programs run too slowly 
to be of much use. 

Program Listing 1 is the As- 
sembly language version of a re- 
locatable module which shifts 
all graphics on the screen one 
cell to the left and erases the 
graphic characters in the left- 



most cell of each line. (It also 
erases all non-graphic charac- 
ters from the screen.) 

This module can be called by 
the USR function in any Basic 
program. The Basic program 
then plots a new value at the 
right of the screen with the com- 
mand SET(127,Y), where Y is the 
new value (normalized to the 







00100 


;SHIFT 


SCREEN 


LEFT ONE 


GRAPHIC UNIT-NO WRAPAROUND 


4000 




00110 


SCR 


EQU 


4000H 




FF00 




00120 




ORG 


0FF00H 




FF00 


010004 


00130 


SHIFTL 


LD 


BC,400H 




FF03 


210040 


00140 




LD 


HL,SCR 




FF06 


110000 


00150 




LD 


DE,0 




FF09 


2B 


00160 


S0 


DEC 


HL 


; SHIFT LEFT ONE CHARACTER 


FF0A 


7E 


00170 




LD 


A,(HL) 


;PUT CHARACTER IN A REGISTER 


FF0B 


57 


00180 




LD 


D,A 


; SAVE IT 


FF0C 


E680 


00190 




AND 


80H 


;IS IT A GRAPHIC CHARACTER? 


FF0E 


2811 


00200 




JR 


Z,Sl 


;NO, DO NOT COPY 


FF10 


7D 


00210 




LD 


A , I, 


;IS 


FF11 


FE00 


00220 




CP 


00H 


; THIS 


FF13 


280C 


00230 




JR 


Z f Sl 


; THE 


FF15 


FE40 


00240 




CP 


40H 


; LEFT 


FF17 


2808 


00250 




JR 


Z,S1 


MOST 


FF19 


FE80 


00260 




CP 


80H 


COLUMN? 


FF1B 


2804 


00270 




JR 


Z,S1 


;IF 


FF1D 


FEC0 


00280 




CP 


0C0H 


; SO 


FF1F 


2002 


00290 




JR 


NZ,S8 


; DO NOT 


FF21 


1600 


00300 


SI 


LD 


D,0 


; COPY THE MARK 


FF23 


7A 


00310 


S8 


LD 


A,D 




FF24 


E62A 


00320 




AND 


2AH 


;MASK BITS 1,3,5 


FF26 


CB2F 


00330 




SRA 


A 


; SHIFT TO 0,2,4 


FF28 


B3 


00340 




OR 


E 


J GET BITS 1,3,5 FROM LAST BYTE 


FF29 


F680 


00350 




OR 


80H 


; MAKE IT GRAPHIC AND FUT IT 


FF2B 


77 


00360 




LD 


(HL) ,A 


IN THE BYTE. 


FF2C 


7A 


00370 




LD 


A,D 


; GET THE REST 


FF2D 


E615 


00380 




AND 


15H 


;MASK BITS 0,2,4 


FF2F 


CB27 


00390 




SLA 


A 


; SHIFT TO 1,3,5 


FF31 


5F 


00400 




LD 


E,A 


; SAVE FOR FOR NEXT BYTE 


FF32 


0D 


00410 




DEC 


C 




FF33 


20D4 


00420 




JR 


NZ,S0 


;D0 IT AGAIN 


FF35 


79 


00430 




LD 


A,C 




FF36 


B0 


00440 




OR 


B 


;IS BC-0? 


FF37 


C8 


00450 




RET 


Z 


;YES, FINISHED 


FF3 8 


0B 


00460 




DEC 


BC 


;NO, DO IT AGAIN 


FF3 9 


18CE 


00470 




JR 


S0 




0000 




00480 




END 






00000 TOTAL 


ERRORS 














Program Listing 1. 


Horizontal Scroll Subroutine 



range 0-47). The next time the 

Horizontal Scroll subroutine is 
called by USR, the new value will 
shift left and the 128th previous 
value will disappear off the left 
of the screen. 

Program Listing 2 shows 
code you can use to enter the 
Horizontal Scrolling subroutine 
by Basic Data and POKE state- 
ments. Line 100 of Listing 2 sets 
the memory size to protect the 
subroutine from being overwrit- 
ten by the Basic program. If you 
do not put this line in your Basic 
program, be sure to set the 
memory size when you turn the 
computer on, or when you call 
Basic in your disk system. If the 
Horizontal Scroll subroutine is 
the only one at the top of mem- 
ory, put it at least 64 bytes below 
the top (set the memory size ac- 
cordingly to 32704, 49088 or 
65472). 

Since disk operating systems 
use some of the upper bytes, 
disk owners should place this 
subroutine 256 bytes below the 
top of the memory. If you or- 
dinarily load other machine lan- 
guage subroutines (such as 
KBFIX or RENUM) at the top of 
memory, load the Horizontal 
Scroll subroutine module below 



The Key Box 

Basic Level II 
Model I 
16K RAM 
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them and change the memory 
size protection accordingly. The 
address you assign in the Basic 
DEFUSR statement will be 
where you loaded your version 
of Horizontal Scroll. 

Listing 2 loads the subroutine 
at FFOO hex, appropriate to a 
48K disk system. If you have a 



32K disk system, the second 
phrase in line 100 should be 
POKE16562.191, line 110 should 
begin For I = - 16440 To- 16582 
and line 170 should read DE- 
FUSR1 = &HBF00. For 32K with- 
out disk use 170 POKE 16526,0: 
POKE 16527,191. For a 16K sys- 
tem without disk use: 



10 CLS 

20 PRINTSTRING$(5, 13) ; STRINGS ( 13 , 32) ; ['HORIZONTAL SCROLL BY G. M. 

FOLEY" :PRINT 
30 PRINT STRINGS(18,32) "FOR 48K DISK SYSTEM ": PRINT 
40 PRINT'HORIZONTAL SCROLL IS CONTAINED IN LINES 100-170 OF THIS 

PROGRAM." 
50 PRINT'THE REST OF THE PROGRAM IS A DEMONSTRATION OF THE PLOTT 
ING OF":PRINT 

60 PRINT'THE FUNCTIONS SIN ( T/35 ) *SIN ( T/6 ) AND 1-EXP ( SIN (T/35 ) *SI 
N(T/6))." 

70 FORI=1TO3000:NEXTI 
90 DEFINT I-J 

100 POKE16561,255:POKE1656 2,254:CLS 
110 FOR I=-256 TO -198:READ J : POKEI , J : NEXTI 
120 DATA 1, 0, 4, 33, 0, 64, 17, 0, 0, 43,126, 87 
130 DATA 230,128, 40, 17,125,254, 0, 40, 12,254, 64, 40 
140 DATA 8,254,128, 40, 4,254,192, 32, 2, 22, 0,122 
150 DATA 230, 42,203, 47,179,246,128,119,122,230, 21,203 
160 DATA 39, 95, 13, 32,212,121,176,200, 11, 24,206 
170 DEFUSR1=SHFF00 
200 CLEAR 64 
210 X=127 

27 Tl=T/35:T2=*T/6 
275 Z=48-15*EXP(SIN(T1)*SIN(T2) ) 
280 Y=24-23*SIN(T1)*SIN(T2) 
290 A=USR1(A) 

310 IF Y<0 OR Y>47 THEN 330 
320 SET(X,Y) 

330 IF Z<0 OR Z>47 THEN 350 
340 SET(X,Z) 
370 T=T+1:GOTO 270 

Program Listing 2. Use with a 48K disk system 



100 POKE 16561, 191 :POKE 16562,127 

110 FOR I =32704 TO 32762: 

170 POKE 16526, 192: POKE 16527,127 

In addition see Program Listing 3. 

Each execution of the scroll- 
ing subroutine takes about one- 
eighth of a second; it will not 
slow down a Basic program. If 
more than one value is plotted at 
the rightmost edge of the dis- 



play (for instance, by SET 
(127,X):SET(127,Y):SET(127,Z)), 
all variables will be scrolled to 
the left on successive execu- 
tions of the subroutine. ■ 

Gerard Foley, a self-employed 
consulting physicist, enjoys 
ham radio as well as personal 
computers. 



6 CLS 

65 PRINTSTRINGS(5, 13) ;STRINGS(10, 32), -"HORIZONTAL SCROLL BY g. m. 
f OLEY" : PRINT: PRINT: PRINT 

70 PRINT'HORIZONTAL SCROLL IS CONTAINED IN LINES 100-170 OF THIS 
PROGRAM." 

71 PRINT'THE REST OF THE PROGRAM IS A DEMONSTRATION OF THE PLOTT 
ING OF": PRINT 

72 PRINT'THE FUNCTIONS SIN(T/35 ) *SIN(T/6) AND 1-EXP (SIN (T/35 ) *SI 
N(T/6))." 

75 FORI=1TO3000:NEXTI 

80 CLEAR 6 4 

90 DEFINT I-J 

100 POKE16561,191:POKE16562,127:CLS 

110 FOR 1-32704 TO 32762:READ J: POKEI , J:NEXTI 

120 DATA 1, 0, 4, 33, 0, 64, 17, 0, 0, 43,126, 87 

130 DATA 230,128, 40, 17,125,254, 0, 40, 12,254, 64, 40 

140 DATA 8,254,128, 40, 4,254,192, 32, 2, 22, 0,122 

150 DATA 230, 42,203, 47,179,246,128,119,122,230, 21,203 

160 DATA 39, 95, 13, 32,212,121,176,200, 11, 24,206 

170 POKE16526,192:POKE16527,127 

210 X=127 

270 Tl=T/3 5:T2=T/6 

275 Z=48-15*EXP(SIN(T1)*SIN(T2)) 

280 Y=24-23*SIN(T1)*SIN(T2) 

290 A=USR(A) 

310 IF Y<0 OR Y>47 THEN 330 

320 SET(X,Y) 

330 IF Z<0 OR Z>47 THEN 350 

340 SET(X,Z) 

370 T=T+l:GOTO 27 

Program Listing 3. Use with a 16K tape system 
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Low Cost Storage 

Model III Internal Drives 

• single sided, 40 tracks 
with250K $215 

• double sided, 40 tracks 

with 500K $335 

• double sided, 80 tracks 

with 1000K $435 

Model I and III External 

(Includes disk drive, power 
supply, cable and color coordi- 
nated cabinet) 

• single sided, 40 tracks 
with250K $315 

• double sided, 40 tracks 
with 500K $435 

• double sided, 80 tracks 
with 1000K $535 



iipatible disk drives 

CIp to one megabyte for Models I and III 




INTERFACE, INC. 
20932 CANTARA STREET 
CANOGA PARK, CALIFORNIA 91304 
(213)341-7914 



External and internal mounting 

Now you can have up to one megabyte 

of unformatted storage for your TRS-80 

Model l or III. Drives can be mounted 

internally or externally on the Model 111 and 

externally on the Model 1. 

Eight color cabinets to choose from 

Cabinets for external mounted drives are 

available in black, chrome, off-white, 

lime green, dark green, bright orange, 

computer blue, and brilliant yellow. 

Gnconditional warranty 
and service 

90-day unconditional warranty 
plus service center for 
out-of-warranty service. 
For more information on the 
TRS-80 compatible 
disk drives, call or write: 

Dealer and quantity discounts available upon request. 

MasterCard, VISA or COD orders accepted. TRS-80 is a 

registered trademark of Tandy Corporation. 



>- 182 



sSee List of Advertisers on page 386 
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GENERAL 



The second time around and the third and the fourth . 



Program Begat 
Son of Program 




Kenneth J. Christensen 
Craig Safer 

Collegiate Living Organization 
117 NW 15th Street 
Gainesville, FL 32603 

Self-reproducing programs 
have always challenged 
programmers. Such a program 
replicates itsown imagethrough- 
out the host computer's memory 
when it is executed. Each copy of 
the original program executes in- 
dependently to continue the re- 
production process. 

Self-reproducing programs 
have possible applications in ad- 
vanced systems programming, 
but are also important in demon- 
strating theories of self-repro- 
ducing automata. The programs 



presented here allow TRS-80 us- 
ers to experiment with a "worm," 
or self-reproducing program. 

Program Listing 1 is the self- 
reproducing program as written 
in Z80 Assembly language. We 



feel this program represents a 
record for length in self-repro- 
ducing programs— only 10 bytes. 
Program Listing 2 is a Basic 
routine that POKEs this program 
into memory beginning at ad- 



4980 




00190 




ORG 


4980H 


4986 




00200 
00210 


START 


SOU 


4986H 


49 80 


218 6-9 


00220 




LD 


HL, START 


4983 


1186-.9 


00230 
00240 




LD 


DE, START 


4986 


010A00 


00250 




LD 


BC,000AH 


4989 


EB 


00260 




EX 


DE,HL 


4 98A 


09 


00270 




ADD 


!1L,BC 


4 98B 


EB 


00280 




EX 


DE,HL 


498C 


EDB0 


00290 




LDIR 




4 98E 


54 


00300 




LD 


D,H 


498F 


5D 


3 1 e 

00320 




ID 


E , L 


0000 




003 30 




END 




00000 TOTA1 


ERRORS 












Program Listing 1a 









00100 


;THIS 


IS A PROGRAM THAI' W1LI REPRODUCE ITSELF 






00110 


; THROUGHOUT THE 


WRITTABLE 


1EMOR1 


OF THE COMPUTER. 






00120 


;THE VARIABLE : 


START" MUST 


BE CORRECTLY DECLARE! 






00130 


jAS " 


)RG VALUE' 


+ 6. 










00140 


; 














0019 


; WRITTEN BY : 












00160 


; 




CRAIG A. SATER 








00170 


; 




KENNETH J. 


CHRIS 


r EN SEN 






00180 


• 










4980 




1 9 




ORG 


4 9 8011 






4986 




00200 
00210 


START 


eq;j 


4986H 




, 


4980 


218649 


00220 




I D 


HL, START 




INITIALIZE ML 


4983 


1186-9 


00230 

00240 




LD 


DE, START 




[INITIALIZE DE 


4986 


010A0 


00250 




LD 


BC,000AH 




*** BEGIN PROGRAM *** 


4989 


EB 


260 




EX 


DE,HL 






4 98A 


09 


00270 




ADD 


HL,BC 






4 98B 


EB 


00280 




EX 


DE,HL 






498C 


EDB0 


00290 




LDIR 








4 9 BE 


54 


00300 




LD 


D,H 






498F 


SD 


00310 
00320 




LD 


E,L 




**« END PROGRAM *** 


0000 




00330 




END 








00000 TOTAL 


ERRORS 
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dress 18822 (decimal). The ma- 
chine code POKEd into memory 
locations 18816-188221 initial- 
izes the HL and DE register pairs 
as required. The program is fully 
relocatable; the only requirement 
is to initialize the HL and DE reg- 
ister pairs to the starting address 
of the program. To run the self- 
reproducing program you can 
either enter the assembled ver- 
sion using T-Bug, or you can en- 
ter and directly run the Basic rou- 
tine given in Listing 2. 

How It Works 

At the heart of the self-repro- 
ducing program is the powerful 
Z80 block-load-with-increment 
instruction (LDIR). The LDIR in- 
struction moves a block of 
memory whose source address 
is in the HL register pair and 
destination address is in the DE 
register pair. The BC register 
pair contains the byte count to 
be moved. The BC pair is decre- 
mented to zero at the end of the 
block move. 

The first instruction in the pro- 
gram initializes the BC pair to 



The Key Box 

Basic Level II 
Model I 
16KRAM 
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el I an 




* Most EFFICIENT Disk Basic Interpreter! 

A true Z-80 Basic. Others claim to have a NEW 
Basic, but their cumbersome archaic code can- 
not measure up to the speed and size of SUPER- 
BASIC. Seeing Is Believing! 

* Most COMPATIBLE Operating System! 

Model III MULTIDOS will Automatically Read 
(without reconfiguring system between reads 
—without modifying source media) 

rtW' vV — \ MULTIDOS Model 

'CtP "%' \ MULTIDOS Model 




<&>* 



a 




MULTIDOS 
MULTIDOS 
MULTIDOS Model 
DOSPLUS Model 
DOSPLUS Model 
PERCOM DBLDOS 

UTILITY TO READ TRSDOS MODEL III, VERSION 1.3. 



Single Density LDOS Model I Single Density 

P Density LDOS Model I Double Density 

Double Density LDOS Mode! Ill 

Double Density NEWDOS/80 Model I Double Density (unadulterated) 

II NEWDOS/80 Model III (unadulterated) 



Other Model I Single Density Operating Systems Must Be Altered (via System Utility) To Be 

Read By MULTIDOS Model III. MULTIDOS Model I Doesn't Care! It Just Reads 'Em. 

(Hardware Modification Required To Read Double Density Diskettes) 

* Most PORTABILITY 

Mix & Match Model I and Model III MULTIDOS 

Diskettes. 




«(> e 



VISA & MasterCard 

WELCOMED 

Foreign Orders Add $15.00 



* For Model I Orders Only * 
Please Specify Single, Double 
or P Density. 



— MAILORDERS — 

itan Electronics Corporation 

P.O. BOX 234 
PLYMOUTH, MICHIGAN 48170 

•••••••• 
— TECHNICAL JNFORMATION — 

Cosmopolitan Electronics Corporation 

C/O VERNON B. HESTER 
42403 Old Bridge Road • Canton, Ml 48188 • (313) 397-3126 

NOW AVAILABLE FROM 



95 



Plus $3.00 For 
Shipping & Handling 

Michigan Residents 

Add 4% Sales Tax 

COD Orders Add $1.50 



Personal Checks Take 
2 Weeks To Clear 



COMPUTER SHACK 

1691 Eason 

Pontiac. Michigan 48054 

(313)673-2224 



POWER SOFT 

1 1 500 Stemmons Expressway 

Dallas. Texas 75229 

(214)484-2976 



BYTES & NAILS 

5110 6th Avenue 

Sioux City, Iowa 51 106 

(712)274-2348 



SIMUTEK 

COMPUTER PRODUCTS, INC 

4877 East Speedway 

Tucson, Arizona 8571 2 

(602) 323-9391 



,-- 58 



TRS-80 is a registered trademark of Tandy Corp 



1 CLS 






10 


DATA 33,134,73,17,134 


73 


20 


DATA 1 


,10,0,235,9,235 


237,176,84,93 


30 


FOR N= 


L8816 TO 18821 




40 


READ X 


! POKE H,X 




50 


NEXT M 






60 


FOR N= 


1882 2 TO _8851 




70 


READ X 


I POKE N,X 




81! 


NEXT N 






90 


MS = IN'l 


;i8816/256) : LS=1 


100 POKU 


.65 26.LS : POKE 


16527, MS 


110 PRl.Ni 


"PROGRAM POKED 


INTO MEMORY" 


120 INPUi 


"PRESS ENTER TO BEGIN"; AS 


130 A=U5R{0) 




141 


END 
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10 (total byte count). The next 
three instructions add this value 
to the DE pair. Since arithme- 
tic operations can only be per- 
formed on the HL pair, the 
DE and HL pairs are exchanged. 



After the LDIR instruction the HL 
pair is copied into the DE pair. At 
this point both the DE and HL 
pairs are initialized to the start- 
ing address of the next copy of 
the self-reproducing program. 



Running the self-reproducing 
program crashes the system 
since it fills the entire writable 
memory of the host computer. If 
you want to view the contents of 
memory after you run the self- 
reproducing program, press 
Reset and type in and run the 
program shown in Listing 3. The 
program generates the sample 
output shown in Table 1, a repe- 
titious pattern which is a series 
of copies of the program you 
originally POKEd in.B 



Kenneth Christensen, a grad- 
uating senior in electrical engi- 
neering at the University of 
Florida, will be pursuing a grad- 



uate degree at North Carolina 
State University and is looking 
forward to a career in computer 
systems design. 

Craig Safer, a senior chemist- 
ry major at the University of 
Florida, will be attending den- 
tistry school next fall. He enjoys 
sailing and photography. 



1 


CLS 


10 


A=18822 ■. • 


20 


PRINT A;" s "; 


30 


FOR N=A TO A+9 


40 


PRINT PEEK(N) ; 


50 


NEXT N 


60 


PRINT 


70 


A=A+10 


80 


GOTO20 


90 


END 
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2?, 5 


9 


235 


28 7 


176 


R4 


93 


19132 


1 10 


Si 


235 


9 


235 


23 7 


176 


8 4 


93 









235 


5 


235 


23 7 


17 5 


8 4 


93 


19142 


1 10 





235 


8 


23 5 


23 7 


176 


8 4 


93 




1 10 


H 


23 8 


5 


23 5 


237 


3 7 6 


8 4 


93 


19152 


1 10 


;; 


235 


8 


23 5 


237 


176 


8 4 


93 


13852 


1 10 





23 5 


9 


23 5 


23 7 


17 6 


8 4 


93 


19162 


1 10 





235 


9 


23 5 


237 


17 6 


8 4 


93 








23 5 




235 


237 


176 


84 


93 


19172 


: 10 





23 5 


9 


235 


28; 


17 6 


8 4 


93 




1 10 





23 5 


9 


235 


23 7 


176 


8 4 


93 


19182 


i 10 





23 5 


9 


23 5 


23 7 


17 6 


8 4 


93 




1 10 





235 


9 


235 


237 


176 


8 4 


93 


19192 


i 10 





23 5 


y 


23 5 


237 


1/6 


8 4 


93 


18892 


1 10 





235 


9 


23 3 


23/ 


17 6 


84 


93 


19202 


1 10 





25 5 


i 


23 5 


23/ 


176 


6 4 


93 


1890 2 


1 10 





25 5 


9 


235 


237 


176 


84 


93 


19212 


1 10 





23 5 


9 


235 


23 7 


176 


3 4 


93 


■ 8912 


1 10 





23 5 


9 


23 5 


2.3 7 


176 


8 4 


93 


19222 


1 10 





235 


9 


235 


28/ 


1/6 


(5 4 


93 


18 922 


1 10 




23 5 


5 


235 


237 


176 


84 


93 


19232 


1 10 


8 


23 5 


9 


23 3 


23 7 


17 6 


8 4 


93 


18932 


1 10 





23 5 


9 


25 3 


23 7 


37 6 


84 


93 


19242 


1 10 


5 


235 


9 


23 3 


237 


176 


4 


93 


18942 


1 10 





235 


9 


235 


23 7 


176 


8 4 


93 


19252 


1 10 





23 5 


9 


285 


23 7 


176 


8 4 


93 


18952 


1 10 


8 


235 


9 


23 5 


237 


176 


84 


93 


19262 


1 10 


8 


23 5 


9 


235 


23; 


37 8 


3 4 


93 


18962 


1 10 





235 


9 


235 


237 


17 6 


84 


93 


19272 


1 10 





23 5 


9 


235 


287 


176 


8 4 


93 


18972 


1 10 





235 


5 


23 5 


237 


176 


84 


93 


19282 


1 10 


2 


23 3 


9 


25 5 


23 7 


17 6 


8 4 


93 


18982 


1 10 


fl 


235 


5 


235 


237 


176 


9 4 


93 


19292 


1 10 





23 5 


9 


23 3 


2i7 


176 


84 


93 


18992 


1 10 





23 5 


9 


235 


237 


17 6 


8 4 


93 


19302 


1 10 


8 


23 5 


9 


23 5 


23 7 


176 


84 


93 


19002 


1 10 





235 


<) 


235 


237 


17 6 


84 


93 


19312 


1 10 





235 


9 


235 


237 


176 


84 


93 


19012 


1 10 





235 


9 


23 5 


237 


176 


8 4 


93 


19322 


1 10 





2 35 


9 


23 5 


23 7 


176 


8 4 


93 


19022 


1 10 





233 


9 


235 


237 


176 


8 4 


93 


19332 


1 10 


8 


235 


9 


235 


23 7 


176 


8 4 


93 


19032 


1 10 


2 


2-1S 


9 


?3 5 


23 7 


176 


8 4 


93 


19342 


1 10 


U 


235 


y 


25 6 


2 3 7 


1/6 


8 4 


93 









23 5 


9 


235 


237 


17 6 


8 4 


93 


19352 


1 13 





235 


9 


23 5 


23 7 


176 


6 4 


93 


. 19052 


1 10 





235 


5 


28 5 


237 


176 


84 


93 


19362 


1 10 





235 


8 


235 


23/ 


17 6 


8 4 


93 


19062 


1 10 


V- 


23 5 


5' 


23 5 


237 


17 6 


84 


93 


19372 


1 10 





23 5 


y 


23 5 


23 7 


176 


8 4 


93 




1 10 


'.! 


23 5 


9 


235 


23 7 


176 


84 


93 


19382 


1 10 





235 


9 


235 


23 7 


176 


84 


93 


19082 


1 10 


.'. 


23 5 


9 


235 


237 


176 


84 


93 


193y2 


1 10 





235 


9 


2.3 5 


237 


17 6 


8 4 


93 


19092 


1 10 





255 


9 


235 


23 7 


176 


8 4 


93 


19402 


1 10 





23 5 


9 


23 5 


28 7 


17 6 


6 4 


93 






■ •■ 


235 


5 


235 


23 7 


176 


84 


93 


19412 


1 10 





235 


9 


2^5 


237 


17 6 


8 4 


93 


19112 


. 1 10 





23 5 


9 


28 5 


237 


17 6 


84 


93 


19422 


1 1 





23.5 


9 


235 


237 


176 


84 


93 


19122 


: 1 10 





2 35 


9 


23 5 


237 


176 


84 


93 

Tab 


5 9 432 

le 1 


1 10 


5 


235 


9 


23 5 


237 


17 5 


6 4 


93 



AUTHORIZED TRS 80® DEALER #R491 






26 - 4002 

Model II, 64K 



26- 1062 

TRS-80 Color Computer With Model III 1 6K RAM 

Extended Color BASIC Model m > BAS, C 

$839.00 

WE ACCEPT CHECK, MONEY ORDER, OR PHONE ORDERS WITH VISA OR MASTERCARD. SHIPPING 
COSTS WILL BE ADDED TO CHARGE ORDERS. DISK DRIVES, PRINTERS, PERIPHERALS, AND SOFT- 
WARE- YOU NAME IT, WE'VE GOT IT. WRITE OR CALL FOR OUR COMPLETE PRICE LIST. 

C& S ELECTRONICS, LTD. 32 EAST MAIN ST. MILAN, MICH. 48160 
^ 138 (31 3) 439-1 508 (31 3) 439-1 400 



...•<<>.«.■ ■:•■-: 88,v v\\: •■' 'jr&t.-' 



.■<:■!■■ 9" .*****#• ,<-***« 



C & S ELECTRONICS MART IS AN AUTHORIZED TRS 80* SALES CENTER STORE #R491 
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HIGH SPEED CASSETTE SYSTEM 



Now the widely acclaimed 
JPC Cassette System is available 
for your TRS 80' computer. 
The price is only $90.00 

I C-8 Cassette System 
J PC Products 
Albuquerque. NM 
Kit: $90 

Assembled: SI 20 

b) Carl A. Kollar 

1 guess I don't have to tell any TRS-80 owners 
how frustrating the cassette system that 
comes with the computer can be. Even with the 
factory mod that's available, the annoyance of 
loading and checking programs becomes just 
barely tolerable. 

If you're like me, after you've just plunked 
down a chunk of money for a Level II 16K ma- 
chine, "you ain't got nuttin left" for even one 
disk drive at 500 bucks apiece. So you suffer. 

A reasonable alternative is the Exatron 
Stringy Floppy (ESF). This will cost you about 
250 bucks and totally eliminates your loading 
and saving problems, automatically and fast. 
I've-had one of these for about six months and 
love it! 

But, if the price is still too steep, have 1 got a 
device for you! 

The Device 

The February 1980 issue of Microcomputing 
had an ad that intrigued the hell out of me. It 
was a high-speed cassette system by JPC Prod- 
ucts acclaimed as a "poor man's flopp>." It 
made all sorts of seemingly ridiculous claims 
such as "loads five times faster," "stores 50,000 
bytes on a 10-minute cassette," "less than one 
bad load in a million bytes with the volume con- 
trol anywhere between one and eight." 

All this for a measly [90J bucks? How could 
this be? A call to Albuquerque answered a few 
questions: Yes, it had its own power supply, 
and, it stored programs five times faster be- 
cause it utilized higher density data. The com- 
puter outputs the information at a higher rate 
out of the rear keyboard connector. 

The ad had even claimed anyone could build 
it even if you have never soldered before. JPC 
would make it work, if you couldn't— for free. 
I was sold. I placed my order, and it arrived 
about two months later (parts shortage). 

I work in electronics, so 1 found the unit ex- 
ceptionally easy to build. It took about an 
hour. The manual is superb. (That's better than 
great.) It was clear, concise and exact with no 




FOR TRS-80 



[Reprint of June 1980 Review. 80 Microcomputing] 



ambiguities. Important parts placements are 
stressed (polarity markings on elect roly tics, 
bands on diodes, etc.). 

JPC was right! With these instructions, you 
couldn't go wrong. The board quality is excel- 
lent. It is double-sided and parts locations are 
clearly marked on the component side of the 
board. There are no jumper wires to install. 
JPC utilizes PC traces and plated-through 
holes for connections to traces on the other side 
i) I ihe board. 

Also, there are absolutely no adjustments or 
settings to bother with. 

The documentation is a sheaf of 8'/.> x 1 1 pa- 
pers stapled together. It is written in the nicest 
format I've seen in a while. Each command 
and/or subjects is covered on its own sheet in 
large type. All explanations arc in easy to read 
English — not computerese. 

Commands and Features 
SAVE"iileiiame": Saves your BASIC pro- 
gram on cassette. 

LOAD: Reads the next BASIC program from 
the cassette. 

LOAD"filename": Searches for and loads the 
specified file from cassette. 
LOAD? and LOAD? "filename": Reads file 
from cassette, and compares contents to mem- 
ory. 

LOADN: Prints a list of all the programs on a 
cassette, until interrupted by the "break" key. 
LOADN "filename": Same as above except the 
tape will stop at the end of the program named. 
KILL: Removes the file manager program 
from memory so that the extra memory can be 
used b> large programs. 
RSET: Allows the operator to rewind and posi- 
tion the tape on tape recorders that have these 
functions tied to the motor control jack. 
RUN" filename": TC-8 searches for a specified 
program and runs it immediately. 
PUT"filename": Same as SAVE "filename", 
except it is for use with system tapes. 
GET: Same as LOAD, except it is for use with 
system tapes. 

GET"filename": Same as LOAD "filename", 
except it is for use with system tapes. 
GET? and GET? "filename": Same as LOAD? 
and LOAD?" filename ". except it is for use 
with system tapes. 
GETN and GETVfilename": Same as 



LOADN and LOADN"filename'\ except it is 
for use with system tapes. 
OPEN: Required before cassette input or out- 
put of a data file can be attempted. 
CLOSE: Required to end a cassette data file. 
PRINT*: Allow-, numerical or string data to be 
output to a cassette file. 

INPUT*: Allows numerical or string data to be 
input from a cassette file. 

1 haven't counted them, no I don't know 
about the "one load in a million bytes" claim, 
but my son, Anthony (age 1 1), loaded about 30 
of his programs from his Radio Shack format 
tape to a new I C-8 format tape. He's run them 
all and found no bad loads. 

Unlike the standard tape system, you can po- 
sition your tape anywhere before the program 
you want and not have to look for a blank spot 
between programs. The I C-8 patiently waits 
for the program you want and then starts load- 
ing without getting confused by the portion of 
the previous program you just fed it. 

Try that on your regular cassette system; 
you'll wear out the reset button. ■ 

ORDER NOW 

To order your TC-8 kit. send your check or 
money order for $90.00 plus $.V50 postage 
and handling to JPC PRODUCT SCO., 12021 
Paisano C"t., Albuquerque, NM 87112 (New 
Mexico residents add 4% sales tax). Credit card 
orders accepted by phone or mail. Personal 
checks will delay shipment. We will otherwise 
immediately ship you the TC-8 kit, the cabinet, 
the ribbon cable, the power adapter, an instruc- 
tion manual, r and a cassette containing the 
software.,, .. . 

For Mod I Level II only. 



S 42 



JPC PRODUCTS CO. 
Phone (505) 294-4623 
12021 Paisano Ct. 
Albuquerque. N.M. 87112 




•sSee List ot Advertisers on page 3i 
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UTILITY 



The Key Box 

Model I 
32K RAM 
Disk Basic 
1 disk drive 



This terminal program is easy to modify. 




Richard C. McGarvey 
221 Hirsch field Drive 
Williamsville, NY 14221 



I'm sure that most computer 
communicators have occa- 
sionally wondered why all of 
the available telephone com- 
munication programs are writ- 
ten in machine language. For 
many people, machine language 
is a mystery. 

Yes, machine language pro- 
vides an execution speed you 
can appreciate, but do you really 
understand how a program 
works? 

To communicate with a net- 
work such as The Source or 
CompuServe, commercial pro- 
grams are readily available. You 
may not understand the pro- 
grams, but as long as you know 
which keys to hit and when, you 
can use them. 

But what do you do when you 
want to talk to another TRS-80 
owner and can't find a program 
to do it; or, perhaps, you find a 
machine language program that 
works, but really doesn't do all 
you would like. If you are not 
familiar with machine language 
(and, sometimes, even if you are) 
the problem of customizing the 
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program seems insurmount- 
able. 

That's why John Storfer and I 
decided to write this Basic com- 
munication program. With it, 
you can communicate with any 
other TRS-80 owner via the 
telephone. 

In addition, this program gives 
you the option of sending disk 
files or programs in any format 
to a receiver's disk. 

Genesis 

We chose to write the pro- 
gram in Basic so you could eas- 
ily alter it to your own needs. 

At first we didn't know exactly 
how to go about the transfer 
routines. Then, in the May issue 
of 80 Microcomputing, I saw an 
article by Dan Keen and Larry 
Pezzuto titled "One Wheel 
Drive." This utility, that allows 
one-drive file copy, was the 
spark we needed. 

We decided to open the files, 
take in one record, break it 
down, send it and reassemble it 
into a record on disk at the other 
end. 

Our first program worked, but 
was too complicated and too 
long to be practical. 

After some extra labor, John 
and I came up with D1SK/XFR, 
the program that is shown in 
Program Listings 1 and 2. 
Listing 1 is a single-statement 
listing, with explanatory re- 



marks for easy reading and 
alteration. Listing 2 is a com- 
pressed version with no re- 
marks; this is the one that 
should be keyed into your 
TRS-80. 

Once loaded and run, the pro- 
gram prints a message instruc- 
ting you to hit any key to go into 
the communication mode. The 
message also states that hitting 
the @ key will switch the pro- 
gram to transfer mode. 

First decide who will answer 
and who will originate; then set 
up the modems. Once the 
modems' tones are detected, hit 
any key. Now, anything you type 
shows up on your CRT as well as 
on your friend's. 

Once you are ready to send or 
receive a program or file simply 
hit the @ key. You are given 
three options: to send a disk file, 
to receive a disk file, or to return 
to communication mode. 

The first two options produce 
the same message. You are asked 
for the FILESPEC of the program 
or file you are sending or receiv- 
ing. Enter the FILESPEC in the 
usual manner, including all ex- 
tensions, any password and the 
drive number the program is on or 
is going to. The FILESPEC you 
send must be available on a disk 
drive. The FILESPEC you receive 
need not be the same. 

When the FILESPEC is en- 
tered you are prompted to place 



the disk in the correct drive and 
to hit Enter. Now— be patient. 
Basic is slow and mere is a lot of 
work to do. 

If you receive some type of er- 
ror or the program crashes, be 
sure to enter CLOSE before do- 
ing anything else. This closes 
the file without damaging it. 
An error-catching routine also 
closes the file, if an error occurs, 
but you can't depend on it under 
all circumstances. 

Now you ask, "What about 
the other computer? How does 
it know when I'm ready?" Good 
question. 

This is another reason why 
the exchange is slow. Each com- 
puter continually checks with 
theothertoseeif it is ready. You 
can enter your FILESPEC any 
time, but no bit is transferred un- 
til both computers are ready. 

Processing 

Once the transfer portion of 
the program is running, the file 
is opened. Next, the LOF(X) is 
determined (that is the length of 
the file). This is the first byte 
sent out, one bit at a time. 

At the receiving end the bits 
are reassembled into the value 
of LOF(X) and assigned to 
variable EF. Now the receiver 
knows how many records are in 
the file. 

If the program is in the send 
mode, the first record is read in- 



Program Listing 1 



REM 'BASIC TERMINAL PROGRAM 

REM INCLUDES TRANSFER OF DISK BASIC PROGRAMS (SAVED IN ASCII) 
REM WRITTEN BY RICHARD MCGARVEY AND JOHN STORFER 
CLS: PRINT- 
HIT ANY KEY TO START COMMUNICATION MODE: 
HIT THE ■ ' e " TO SELECT 
TRANSFER MODES. AN OPTION IS 
AVAILABLE TO RETURN TO COMM. 
MODE. 
CLEAR2500 

DEFINTA-F,R,X 'DEFINES VARIABLES AS INTEGERS 

DEFSTRH-M 'DEFINES VARIABLES AS STRINGS 

ONERRORGOTO93 

H=INKEYS 'HIT ANY KEY TO START PROGRAM 

IFH=""THEN60 

'IF NONE HIT CHECK AGAIN 
OUT232,A 'RESET RS-232 

A=INP(233)AND2480R5 'GET SWITCHES, REMOVE BAUD RATE, 

' SET BREAK, REQ. TO SEND, DATA TER 



'LOAD RS-23 2 WITH CONTROL INFO 
'LOAD RS-232 WITH BAUD RATE 
■CHECK FOR MODEM TONE 

'P NOT EQUAL ZERO GO CHECK AGAIN 



110 OUT234,229 

120 OUT233,85 

130 P=INP(232)AND32 

140 IFPTHEN130 

150 CLS 

160 PRINT'COMMUNICATION MODE" 

170 PRINTCHRSI14) 

180 RS=0 'SET RECEIVE/SEND CODE TO COMM. 

190 GOSUB750 'GET ANY INPUT FROM RS-232 

200 IFATHENPRINTCHRS(INP(235)); 'IF A=0 NO INPUT ELSE PRINT INP 

210 H=INKEYS 'GET KEYBOARD INPUT 

220 IFH=""THEN190 'IF NO INPUT GO BACK ELSE CONTINUE 

230 C=ASC(H) 'CHANGE INPUT TO INTEGER, PUT IN C 

240 1FC=31THENCLS 'IF CLEAR SCREEN PRESSED, DO IT 

250 IFC=64THEN290 'IF "@" PRESSED GOTO OPTION SELECT 

26 GOSUB80 'TRANSMIT PRESSED KEY 

270 PRINTH; 'PRINT PRESSED KEY 

280 GOTO190 'CONTINUE IN COMMUNICATION MODE 

290 CLS 

300 PRINT-PROGRAM TRANSFER MODE" 

310 PRINT, "ENTER 1 TO SEND DISK" ,,, "ENTER 2 TO RECEIVE DISK FILE 



"ENTER 3 TO RETURN TO 

320 PRINT,; 

330 INPUTA 

340 ONAGOTO380,570,160 

350 PRINT:PRINT"ERROR", 

360 PRINT"NUMBER MUST BE 1, 

370 GOTO3 00 

3 80 RS-1 

390 J="TRANSMIT" 

408 GOSUB850 

410 C=LOF(l) 

420 GOSUB750 

430 FORX=1TOLOF(1) 

440 GET1,X 

450 FORF-1T0255 

460 C=ASC(MID$(MX,F,1)) 



COMMUNICATION MODE" 



'GET 1,2 OR 3 TO DETERMINE MODE 
'GOTO PROPER LINE 

'NUMBER ENTERED WAS NOT 1 , 2 OR 
2 OR 3.": PRINT: PRINT 

'TRY ENTERING NUMBER AGAIN 

'SET RECEIVE/SEND CODE - 1-SEND 

'PRINT ROUTINE CODE 

■GET FILESPEC,OPEN FILE, FIELD FILE 

'SET C EQUAL TO NUMBER OF RECORDS 

'SEND NUMBER OF RECORDS 

'X-CURRENT RECORD NUMBER 

'GET RECORD X INTO BUFFER 1 

'F=CURRENT BYTE LOCATION IN BUFFER 

'SET C= TO CURRENT BYTE IN BUFFER 



to memory as one 255-byte 
string and one one-byte string. 
Next, the string (255 bytes) is 
taken apart one byte at a time 
from left to right. Then, each 
byte is transmitted one bit at a 
time. When the 255-byte string is 
done, the 256th byte is trans- 
mitted, completing the transfer 
of one record. 

At the receive end, the bits are 
assembled into bytes, which are 
in turn placed into a 255-byte 
string and a 1-byte string. LSET 
places them in the buffer and 
PUT transfers them to the 
receiving disk. 

As always such routines can 
cause problems. Basic is slow 
and the extensive record proc- 
essing really slows down transfer. 
The transfer time of the first rec- 
ord depends on when both com- 
puters are ready. After that the 
transfer rate is approximately 44 
to 46 seconds per record. 

We did add a routine that tells 
you how many records are being 
transmitted or received, and 



which record is being processed. 

Once the program is finished 
with all records, it automatically 
returns to the communication 
mode and prints Transfer Com- 
pleted on both terminals. 

The rest of the problems are 
related to phone connections. If 
you have poor phone connec- 
tions, or if you use an acoustic 
modem, you may get occasional 
errors. 

These errors are easy to spot 
in a Basic program by carefully 
watching listings. (Checking of 
machine language file transfers 
is not that easy.) How much you 
can depend on the received pro- 
gram depends on your phone 
connection and your experience 
with testing the transfer. 

One final note to program- 
mers who wish to modify this 
program. Line 90 in Program 
Listing 1 is not needed. It is a 
vestige of an earlier program. 
You can delete it with no prob- 
lem but, if you modify the pro- 
gram, you may need it. ■ 



470 GOSUB750 

480 NEXTF 

490 C»=ASC(LX) 'SET C= TO LAST BYTE OF RECORD 

500 GOSUB750 'SEND BYTE 

510 PRINT@384, "TRANSFER OF RECORD NUMBER" ;X; "OF" ; LOF (1) ; "COMPLET 

E* 

520 NEXTX 

530 CLOSE 

540 CLS 

550 PRINT'TRANSFER COMPLETE" 

560 GOTO160 

570 RS=2 

580 J="RECEIVE" 

590 GOSUB850 

600 GOSUB800 

610 EF=B 

620 P0RX=1T0EF 

630 MY="" 

640 F0RF=1T0255 

650 GOSUB800 

660 MY=MY+CHRS(B) 

670 NEXTF 

680 LSETMX=MY 

69?' GOSUB800 

700 LSETLX=CHRS(B) 



'SEND BYTE 



'CLOSE FILE 



'GOTO COMMUNICATION MODE 
'RECEIVE/SEND CODE - 2 - RECEIVE 
'J TO BE USED BY PRINT ROUTINE 
'GET FILESPEC,OPEN FILE, FIELD FILE 
'SEND READY TO RECEIVE, GET BYTE 
•SET EF = TO EOL (NO. OF RECORDS) 
'X = RECORD NUMBER 
'RESET MY TO NULL STRING 
' F= BYTE BEING RECEIVED 
'GET INCOMMING BYTE FROM RS-232 
'PUT INCOMMING BYTE AT END OF MY 



'PUT MY INTO BUFFER 1 

'GET 256TH BYTE 

'PUT LAST BYTE INTO BUFFER 1 

710 PRINT@384, "SAVING RECORD NUMBER" ; X; "OF" ; EF ; "TO DISK" 

720 PUT1,X 'SAVE RECORD TO DISK 

730 NEXTX 

7 40 GOTO53 

750 A=INP(234)AND128 

7 50 I FRS=0THENRETURN 

770 IFA=0THEN750 

780 B=INP(235) 

790 IFRS=2THENRETURN 

800 A=INP(234)AND64 

810 IFA=0THEN800 

820 OUT235 ,C 

830 IFRS=2THEN750 

840 RETURN 

85 CLS 

860 PRINT'PROGRAM TRANSFER MODE: 

870 PRINT, "ENTER FILESPEC: "; 

880 LINE1NPUTJ 'GET FILESPEC INTO J 

890 INPUT"PLACE DISK IN PROPER DRIVE AND HIT ENTER WHEN READY TO 
CONTINUE ";H 

900 0PEN"R",1,J 'OPEN FILE J FOR RANDOM ACCESS 

910 FIELD1,255 AS MX,1 AS LX 'FIELD 256 BYTE FILE 

920 RETURN 

930 PRINT"OPERATIONAL ERROR" :CLOSE 

940 PRINT'FILE CLOSED" , "STAND-BY" 

950 D=( ERR/2) +1 'GET ERROR CODE NUMBER 

960 IFD>24THEND=(D/2)+2 

970 C=0 'SET COUNTER TO 

980 A=20995 'LOCATION OF FIRST ERROR MESSAGE 



'GOTO CLOSE 
•TEST FOR DATA RECEIVED 
'IF COMMUNICATION MODE RETURN 
'KEEP CHECKING FOR INPUT 
•SET B- TO RECEIVED BYTE 
'IF IN RECEIVE MODE RETURN 
•TEST TRANS. HOLDING REGISTER FLAG 
'TEST TILL LAST BYTE TRANSMITTED 
'LOAD HOLDING REG WITH NEW BYTE 
'IF IN RECEIVE MODE GOTO INPUT 



' ; J 



990 'IN LIME 980 CHANGE 

NEWDOS 80. 
1000 B=PEEK(A) 
1010 A=A+1 
1020 IFB=0THENC=C+1 
1030 IFCODTHEN1000 

1040 • 

i05i) PRINTCHRS(PEEK(A) ) ; 

1060 A=A+1 

1070 IFPEEK(A)THEN1050 



IN TRS DOS. 
■ 20995 TO A - 19767 IF YOU ARE USING 

•PUT BYTE INTO B 

■ADD 1 FOR NEXT PEEK LOCATION 

'IF B=0 AT TERMINATOR OF STRING 
'IF COUNTER = ERROR CODE, FOUND 

PROPER ERROR MESSAGE 
'PRINT LETTER 
'GET NEXT PEEK LOCATION 
'IF NOT GOTO PRINT 



1080 PRINT" 

ERROR 
1090 END 



ERROR HAS OCCURED IN LINE ";ERL'ERL= LINE NUMBER OF 
'END PROGRAM EXECUTION. 



II CLS 
21! PRINT" 

HIT ANY KEY TO START COMMUNICATION MODE: 

HIT THE " 8 " TO SELECT 

TRANSFER MODES. AN OPTION IS 

AVAILABLE TO RETURN TO COMM. 

MODE,' 
30 CL£AR25e8:DEFINTA-F,R,X:DEFSTRH-N:0NERR0R6OT0278 

M H=INKEY$:IFH="THEN« ELSE(M232,A:A=INP(233>AND2«0R5:0UT23«,229:0UT233,85 
58 P=INP(232)AND32:IFPTHEN50ELSECLS 
68 PRINT'COMMUNICATION M0DE: 1 :PRINTCHR«(l<i):RS=8 
78 60SUB228:IFATHENPRINTCHR»(INPt235)); 
88 >*=Hi(EY*:IFK="THEN7BELSEC'ASC(H):IFC=3i™D(aS 
VB IFC=MTHEN1B8ELSE60SUB23B:PRINTH;:60T078 

ibb as 

118 PRINT-PROGRAM TRANSFER MODE 1 

128 PRINT, 'ENTER 1 TO SEND DISK 1 ,,, "ENTER 2 TO RECEIVE DISK FILE 1 ,,, 

■ENTER 3 TO RETURN TO COMMUNICATION MODE 1 

138 PRINT, ;:INPUTA:0NA6OT0158, 198,68 

H8 PRINTiPRINTERROR'^PRINT'NUMBER MUST BE 1, 2 OR 3. ■ :PRINT:PRINT:60T0118 

158 RS=l:J= , TRANSMIT-:SOSUe24B:C=L0F(ll:6OSU622«:F0RX=lT0L0F(l)iGETl,X:F0RF=lT0255:C=ASC(MID»(MX,F,ll) 

168 60SUB22i:NEXTF:C=ASC(LX):60SU8228:PRINT8384, ■TRANSFER OF RECORD NUMBER 1 SXS'OFMCf (1) i ■COMPLETE' 

188 CLOSEiCLSiPRINT'TRANSFER COMPLETE 1 :60T06B 

198 RS=2iJ^ , RECEIVE 1 :6OSUB248:6OSUB238:EF=8:F0RX=lTOEF:MY= ,1 :F0RF=lT0255:60SUB238:MY=MY»CHR«(B):NEXTF 

288 LSETHX*MY:60SUB23B:LSETLX=CHR»(B):PRINT33B4, "SAVING RECORD NUMBER" ;X; "OF" ;EF;'T0 DISK" :PUT1. XSNEXTX 

218 &0I018S 

228 A=INP(23«)AND128. , IFRS=8THENRETURNELSEIFA=8THEN228ELSEB=INP(235|:IFRS=2THENRETURN 

238 A=INP(23*)AND6*:IFA=8THEN23BELS£OUT235,C:IFRS=2THEN220ELSERETURN 

2*8 as: PRINT" PROGRAM TRANSFER MODE: " iJiPRINTi'ENTER FILESPEC: "iiLINEINPUTJ 

258 INPUT'PLACE DISK IN PROPER DRIVE AND HIT ENTER WHEN READY TO CONTINUE";H:OPEN"R"> 1, J 

268 FIELD1,255ASMX,1ASLX:RETURN 

278 PRINT'OPERATIONAL ERROR" : CLOSE: PRINT 1 FILE CLOSED", "STAND-BY" :D=(ERR/2>»l:IFD>2*THEND=(D/2)*2 

288 C=8:A=19767 

298 B=PEEK(A) :A=A+1 : IFB=BTHENC=C+1 

310 IFCODTHEN298 

318 PRINTCHR»(PEEK(A));:A=A-tl:IFPEEK(A)THEN3:8ELSEPR;NT" ERROR HAS OCCURED IN LINE ";ERL:END 
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EDUCATION 



(OPS) 



LOAD 80 



Learn by doing at your own pace. 




Frank Tymon 
1213 Topaz Way 
Santa Maria, CA 93454 



basis for "rolling your own" edu- 
cational programs. 

Self Reliance 

What is the best way to use 
your computer for your own edu- 
cation? You must develop the 
tool you need. 

Self-developed learning pro- 
grams have many advantages. 
First, and probably most impor- 
tant, the subject is interesting to 
you. This interest will motivate 
you to complete the project. 



The personal computer is a 
powerful educational tool 
whose potential remains un- 
tapped. High schools and col- 
leges are increasing their use of 
the computer as an educational 
aid but home users are not. One 
reason is the lack of quality, 
relevant, educational programs. 
Today the pages of computer 
magazines offer few ads that 
are education-oriented. The 
need is there and so is the 
market but an individual often 
finds himself searching for 
educational programs. 

My program fills a need in this 
area. It does not provide a spe- 
cific educational program for a 
given field; rather, it provides a 
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A second advantage is the 
specific tailoring associated 
with such a package. You, better 
than any other person, recog- 
nize your weak points. You know 
where to target your educa- 
tional program. You can cut and 
sew the fabric of the course to 
closely fit your mental physique. 

You can tailor not only the 
subject matter, but also the aca- 
demic level The resuit <s a prod- 
uct appropriate for your inter- 
est, knowledge level, and even 





SET SELECT 
KEY TO I 



Figure 1 



for your vocabulary. It would be 
a rare instance when you could 
find a commercial product with 
such unique properties. 

Finally, a self-designed learn- 
ing program is packaged to hold 
only those elements that con- 
cern you. Irrelevant branches, 
generalities, excess volume, 
and extraneous vocabulary are 
excised. The package addres- 
ses your needs. The overhead 
found in commercial packages 
does not exist. 

My program allows you to 
tailor learning packages to your 
needs. It is a tool for the learning 
process. With it you can learn, 
review, and progress at your 
own rate. At the same time it 
wastes no time on known facts. 
You establish your schedule, 
enter the relevant data, proceed 
at your own pace, and learn 
what is important to you. 

Before proceeding, one cau- 
tion. A pitfall exists. That pitfall is 
misinformation. If you enter false 
information— if you treat such 
information as true— you have 
wasted your effort. Even worse, 
you have uneducated yourself. 
Avoid this pitfall. Be sure of the 
information going into your edu- 
cational program. Research the 
appropriate sources. 

The program supports three 
basic functions: teaching in a 
test mode; testing on key mate- 




liil 



*TO^^ 





Mere powerful programming tc 
for theTRS 80. Nowon disk. 



Better results. Microsoft's Level III BASIC and Editor/ 
Assembler- PI us are programming tools that help you write 
complex programs in less time, with less effort and util- 
izing less memory. Better programs. No matter what your 
programming skill. And for the first time these tools are 
available on disk. 

Editor/ Assembler-Plus. A powerful editing, assembly and 
debugging tool with many sophisticated features that make 
writing TRS-80 assembly language programs easier, faster 
and more efficient. 

• Full disk capabilities. 

• Assembly directly into memory. No need to save object 
code then reload for execution. 

• Macro capability that allows you to define macros for 
commonly used sequences of instructions. 

• Conditional assembly that allows you to generate more 
than one version of a program. 

• Eight breakpoints at a time for program debugging. 

• The INCLUDE statement that allows you to call additional 
disk files for assembly. 

• Other features include extensive operators, automatic 
origin, symbol table printout, quash command, hex, deci- 
mal and octal constants, single step-through instructions 
in memory, five type-out modes, four type-in radices, plus 
extensive edit commands 

A more powerful BASIC. With Level III BASIC, you get 
power to perform tasks in BASIC that used to require 
assembly language Plus, new ease-of-use features for 
youi FRS 80. 

• Advanced graphics. Develop charts, graphs, even anima- 
tion in Level III BASIC. Draw a line, an outline box or 

sSee List of Advertisers on page 386 



a solid box by specifying just two points. Then save and 
recall it with BASIC commands. 

• MENU. One command that allows you to construct an 
entire menu. 

• CHAIN and COMMON commands allow you to call 
another program and pass variables to it 

• Powerful editing commands such as COPY/TRANSFER, 
FIND and CHANGE. 

• DUMP command that makes debugging easiei 

• Time-limit response. New INPUT # LEN and LINE INPUT 
# LEN commands allow you to set a time limit on response. 

• RS-232 output from BASIC. With a single command. 

• More. Level III gives you automatic line numbering, 26 
user -definable single stroke instructions, and more. 

Disk or cassette. Disk versions of Level III and Editor/ 
Assembler-Plus are brand new. Cassette versions are also 
available with many of the same capabilities. 
Talk to your Microsoft™ dealer. Ask for a demonstration 
of two of the most powerful tools you can get for your 
TRS-80: Level III BASIC and Editor/ Assembler-Plus. On 
disk or cassette. From Microsoft. 

TRS-80 is a trademark of Radio Shack, a division of Tandy Corporation 

Microsoft is a trademark of Microsoft, Inc. 

Microsoft Consumer Products is a division of Microsoft. Inc 




10700 Northup Way, Bellevue, WA 98004. (206) 828-8080 
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rial; and introducing new mate- select, by review material. 



rial each session. 

The program accomplishes 
this using the disk file in a ran- 
dom access mode primarily to 
allow extraction and modifica- 
tion of a key. The approach is an 
ineffective use of disk space. 
However, you will probably re- 
program the disks with learning 
material from time to time, so 
such inefficiency becomes a 
minor issue. 

The key identifies whether the 
material is known or unknown. 
The user codes unknown or un- 



The flowchart shown in Fig. 1 
reflects in an overview how the 
program works. Its use is rela- 
tively straightforward. 

This program can aid in lan- 
guage learning. To best use it in 
this fashion, the routine pro- 
vides the English meaning of a 
foreign word or phrase. When 
you enter the appropriate re- 
sponse the program compares 
the input string with the value it 
has stored, and responds ac- 
cordingly. If the answer is right it 
increments the key and passes 



learned material in the key to on to the next entry. If the 

assure its frequent review. He answer is wrong, it sets the key 

codes better known material to to 1 and tells the right answer, 

be less frequently checked. The Thus, on my next session, I will 

key identifies each question for review again the words or 

current study, or for one of phrases I missed. As a result I 

several spaced reviews over a do not waste time on known 

selected time period. If, for ex- subjects. 

ample, the key is set to 1, the In the program file two acts as 
material is for current review. If a lookup identifying the record 
set at 2, the material is for later number. The instructions lead 
review. A key of 3 provides for an the user through entry of data to 
even later review of relatively develop a learning vehicle, or 
well-known information. to use a previously developed 
When your knowledge of the learning vehicle. In the latter 
material is satisfactory the pro- case the user is guided in select- 
gram increments the key num- ing a weekly review, monthly 
ber. As a result you will review review, or the like. When the 
this material less frequently. user correctly answers a dis- 
The program accomplishes this played question, the program in- 
automatically. The change is crements the key value, and 
triggered by how well you ans- replaces the old record with this 
wer a specific question. A wrong one. If the user answers incor- 
answer moves the reviews closer, rectly, the key is set to 1 , and the 
whereas a right answer dis- record saved. There are other 
places it. You find yourself re- activities, such as truncating en- 
viewing only those areas which tries to correspond to the length 
you have not learned adequately, of the saved field to allow corn- 
Sequentially, the key is initial- parison, testing for end of file, 
ly designated as 1 . If you answer and so on. 
a question wrong, the current The program as provided, in 
value of the key is replaced by 1. conjuction with the flowchart 
If your answer is correct, the and remarks, should be easy to 
value of the key is incremented use. Use of the program is not 
by 1 (in this instance, going to limited to learning languages, 
a value of 2). When you elect to You can use it for vocabulary, 
study only those questions math, or a wide variety of other 
which are new, or which you disciplines. Realistically, you 
have missed, the program pre- should supplement it with other 
sents only items with a key of 1. learning approaches, reading, 
When you want to review materi- and application of learned 
al, the program presents items material. 

with a key value of 2, 3, and so Three supplements that rein- 
on. The questions addressed force each other quite well are 
are only those at the review level reading, use of flash cards, and 
you selected. use of tapes. A well-planned 
The process is the same for study approach taking advan- 
each study session. You are tage of all of these is generally 
always confronted by material desirable. They provide effective 
you wish to learn, or, if you supplements to the program. 
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Program Listing 



1 REM THIS IS PROGRAM LEARNA/BAS 

2 REM PROGRAM COPYRIGHT NOVEMBER 1981 BY FRANK TYMON 
10 CLS 

20 CLEAR 5000 
30 KNT = 

40 ' OPEN FILE 2 TO ACCESS/SAVE MAX RECORD COUNT 
45 ' OPEN FILE 1 TO ACCESS/SAVE RECORDS 
50 OPEN "R",2,"SAVEKNT/BAS" 
60 FIELD 2,3 AS KNTS 
70 OPEN "R",l, "TRIAL/BAS" 

80 FIELD 1,2 AS KEYS, 6 AS DT$,25 AS WDS, 25 AS MEANINGS 
85 ' *************•***«***.***«****««**.,,**,».***,**,. 
90 INPUT "IN TO ENTER DATA;OU TO READ FROM DISK ";ACTS 
100 IF VAL(KNT$)<=1 LSET KNT$=STR$(1) 
110 IF ACTS="IN" KNT=VAL(KNT$) 
120 CLOSE 2 

130 ' SUB 360 PERMITS READING; 340 ENDS ROUTINE 
140 IF (ACT$="OU") GOSUB 360 :GOTO 340 

150 'NEXT SECTION ALLOWS ENTRY OF DATA UNDER KEY 1 

160 INPUT "INPUT DATE";DTE$ 

170 PRINT "KEY IS 1,2,3,4,5,6 FOR DAY , WEEK , MONTH, QUARTER, SEMI- 

NUAL, ANNUAL" 

180 PRINT "ALWAYS USE 1 FOR INITIAL ENTRY." 

190 PRINT "TO STOP, ENTER LAST,," 

200 INPUT "INPUT KEY, WORD, MEANING" ; KYS ,WRDS,MNS 

210 IF KY$="LAST" THEN 280 

220 ' NEXT SECTION WRITES RECORD 

230 KY$=STRS(VAL(KY$) ) 

240 LSET KEYS=KY$:LSET DT$=DTES : LSET WDS = WRD$:LSET MEANINGS- 

250 KNT=KNT+1 
26 PUT 1,KNT 
270 GOTO 200 

280 IF ACT$="OU" GOTO 340 

290 ' NEXT SECTION DISPLAYS RECORDS 

300 CLS:FOR G=l TO KNT:GET 1,G 

310 PRINT KEYS, DTS, WDS, MEANINGS 

320 NEXT G 

33 GOSUB 540 

3 40 CLOSE 1:END 

350 'NEXT SECTION READS RECORDS BY SELECTED PERIOD 

360 CLS 

370 PRINT "FOR DAY, THE INITIAL INPUT, ENTER (BETWEEN QUOTATION 

MARKS) SPACE AND 1" 

380 PRINT "INPUT FOLLOWING NUMBERS (PRECEDED BY A BLANK, AND "; 

390 PRINT "BETWEEN QUOTATION MARKS): 2,3,4,5,6 FOR WEEK,"; 

400 INPUT " MONTH,QUARTER,SEMI-ANNUAL,ANNUAL">PERS 

410 KNT=KNT+1 

420 GET 1,KNT 

430 IF EOF(l) GOTO 540 

440 FOR Z=l TO 300:NEXT Z 

450 IF(KEYS<>PER$)GOTO 410 

460 ' NEXT SECTION TESTS YOU ON WORD 

470 CLS 

480 PRINT CHRS(23) 

490 PRINT 6 450, MEANINGS 

500 FOR 1=1 TO 300:NEXT I 

510 GOSUB 610 

520 GOTO 410 

530 ' NEXT SECTION SAVES RECORD KOUNT 

540 IF ACT$="OU" KNT=KNT-1 

550 KTS=STRS(KNT) 

56 OPEN "R",2,"SAVEKNT/BAS" 

570 LSET KNT$=KTS 

580 PUT 2,1 

590 CLOSE 2 

595 IF EOF(l) END 

600 RETURN 

605 • *****.**************.********.*.*****«*,*♦,* 

610 CLS 

620 GOTO 800 

630 ' NEXT SECTION DETERMINES SUCCESS OF TEST 

640 INPUT "INPUT WORD " ;WRD$ 

650 IF (WRDS=BUFFS) GOTO 740 

660 CLS 

670 PRINT CHR$(23) 

680 PRINT @ 450, WDS 

690 PRINT §482, MEANINGS 

700 FOR 1=1 TO 300:NEXT I 

710 LSET KEYS=STR$(1) 

720 PUT 1,KNT 

730 RETURN 

735 ' ********************************************* 

740 A%=VAL(KEYS) :B$=STRS(A%) 

750 IF(BS>=" 6") LSET KEYS'" 6":GOTO 780 

760 LSET KEY$=STR$(A%+1) 

770 PUT 1,KNT 

780 GOTO 730 

785 ' «*******«»*******•»**»«***.*»«*******.**«**** 

790 ' NEXT SECTION CUTS WORD DOWN TO SIZE 

800 BUFFS=WD$ 

810 N=15 

820 B$=RIGHTS(BUFFS,1) 

830 IF (BS=" ") N=N-1:BUFF$=LEFTS(BUFFS,N) !GOTO 820 

840 GOTO 640 



AN 



■MN 



This is only a minimal version 
of a useful learning tool. You 
can expand it to incorporate 
more extensive questions and 



by use of multiple answers, us- 
ing numerical or alphabetical 
identifiers. In this approach we 
study the new, review the old, 



answers. The simplest way to in- and waste no effort on the 
corporate this mode would be already known. ■ 



EPROM 




Proyrams 2508, 2758, 2516, 2716, 2532 and 2732 five volt EPROMS. 

Complete - no personality modules to buy. 

Intelligent - microprocessor based, programs and verifies any or all bytes. 

RS 232 serial interface - use with computer or terminal. 

Verify erasure command ■ verifies that EPROM is erased. 

Extended diagnostics • error output distinguishes between a bad EPROM 

and one which needs erasing. 

May be used for extremely reliable data or program storage. 

All powei on programming socket undei processor control. LED warning 

light indicates when power is applied. 

Complete with Textool zero insertion force socket. 
High performance /cost ratio. 
Standard DB-25 I/O connector. 

PRICE S289 



BAY TECHNICAL ASSOCIATES, inc. 




HWY. 603. P.O. BOX 387 

BAY ST. LOUIS, MISSISSIPPI 39520 

(601) 467-8231 



^243 



ALL HARDWARE 



Model I Lowercase 



DUALCASE 



ELECTRONIC SHIFT-LOCK • DEB BOUNCE 
BLOCK CURSOR • SWITCHABLE 



■THF PATCH 

ch use ROM sub -r 



npaliblc 



with an> word pr.vs--.bor. an\ DOS and also othei languages 
ibled and tested . . . $127 00 



SCRIPLUS v3.0 (by ROSTEK) is the software "patch" for SCRIPSIT (c) that lets you output 
control codes to CHANGE TYPE STYLES. UNDERLINE, etc. from within your text files. Written 

especially foi the MX 80 but works fine with most an> printer thai accepts control codes Make? >< .ur 
printer do all the tricks it was designed for -DIR. KILL, MF.ROE. and MORF. WHILF IN 
SCRIPSIT lc| 
How manv limes have vou wished' Here "tiz ON DISK 39.95 



Need a SUPERFINE lowercase CHARACTER GENERATOR for your MOD 1 .' KSCi 
Technology builds "em, and we've got one just for you. Beautiful lowercase FULL DECENDERS 
Allof the uraphics. of course. INCLUDES the SPECIAL GRAPHICS for CHRS(0) thru CURS (.11) 
omitted in the later Radio Shack lower case chips. Ask for the CGA-2. You'll love it! Only 29 95 



Did you ever bomb a disk.' SUPER UTILITY (by Kim Watt) WILL AUTOMATICALLY 
RECOVER BOOT SECTIONS. GAT TABLES. READ AND COPY PROTECTED MEDIA. 
TRANSFER FROM ONF DOS TO ANOTHER. SINGLE OR DOUBLE DENSITY, andon, and 
on. and on You just wouldn't believe Includes a hundred and some odd vital functions. The 
BEST (no doubt! ) and very, very highly recommended for ANYONE that uses a TRS-80 MOD I or 
MOD 3 with any kind of DISK and any kind of DOS. You just got to use it to realize what you've got 
here' The name 'SUPER UTILITY" is a gross under statement One use can easily pay for the 
program. 48K required. Specify 35tk. 40tk or 80 tk media for your Mod I or Mod 3. Absolutely 
professional' You need this' Don't get caught without it. 74.95 



The 



nly 



you can'! repla 



TIME PLUG IN A SPRINTER (by Holmes 



i ngin. 



rig I; 



TRIPLE THE SPEED of your TRS-80 MODEL I OR MODEL 3. 

YES! A NEW Z SOB MICROPROCESSOR IS INCLUDED' 

YES' Special circuitry handles your slower memory chips 

YES' Automatic switch down to "normal" for disk I/O 

YES' IT IS ABSOLUTELY FANTASTIC and only 99.50 COMPLETE!! 

Only the cream of the crop - - for you. from HACKS. 




WHEN ORDERING SPECIFY: 

"Mem Size" G "Memory Size" □ 



I'o order send payment plus $2.00 shipping and 
handling. Texas residents add 5% sales tax 



National Distributors 
for CI (DAT Inc 



HACKS 



P.O. BOX 12963 

Houston. Texas 77017 

713-455-3276 



^ 244 



Quality Software for Your TRS-I 



For TRS-80 Model I & III Disk or Tape 



SOFTEK 100 

An assortment of 106 programs 
including Business. Personal, 
Educational, Animation, Con- 
struction, etc. A list of pro- 
grams is included. 

$99.50 

Model I & III Tape or Disk 



SOFTEK PAYROLL 

Figures all laxes and keeps track of 

total earnings. 

Model I and III Disk $99.50 



ACCOUNTS PAYABLE 

Wili keep track of total expenses paid 
out and will print hard copy. Currently 

used lor commissions paid out to bro 
ker insurance agents. 

Model I & III Disk $89.50 



MAIL LETTER 

Will do the same as mail but you can type up to two letters along with it 
and the mail letter program will type the letter and put their name and 
address on the heading and also print "Dear" and their first name. 

Model I & Ml Disk $29.95 



SPECIAL FOR JUNE 
BOX OF 10 DISKS 

2 OF THE 10 
CONTAINING SOFTEX 100 

$101.00 



SHANNON MAGNETIC 5'A" 
40 TK DBL DENSITY DISKS 

Box of 10 

$22.50 



SCARFMAN 

"1981 Cornsoft Group 

Model I & III Tape 

$15.95 
Model I & III Disk 

$19.95 



MAIL PROGRAM 

Keeps a list of over 1,000 names and will display, edit, 
list, or print mailing labels. 

Model I & III Disk $19.95 



THE FLOPPY DOCTOR 

By Dave Stambaugh 
FLOPPY DISK/MEMORY DIAGNOSTIC 
Computer "professionals" have long known the impor- 
tance of regular use of diagnostic software in verifying 
the integrity of computer hardware. The TRS-80 is no 
exception; good diagnostics are a must. The MICRO 
CLINIC offers two programs designed to thoroughly 
check out the two most trouble prone sections of the 
TRS-80, the disk system (controller and drives) and the 
memory arrays 

MODEL I ..$24.95 MODEL III . $29.95 



MODEL I DOUBLE DENSITY PACKAGE 

NEWDOS/80 Version 7.0 and Controller 
Everything you need to convert you; FRS-80 Model , to 
run double density. Complete with software, hardware, 
and instructions — installs in minutes with NO SOLDER- 
ING. WIRING OR CUTTING S229.95 

NEWDOS/80 Version 2.0 foi Model I and III $1 39.00 



FLIPSORT 

F.le Box Storage (or 5' a ". $19.95 

1 Box Verbatim 5Vt " Disks with Flipsort. $43 95 



SHANNON MAGNETICS 

DISK HEAD CLEANERS 

$24.00 



GROUP INSURANCE QUOTER 

Good '■-■ quoting several plans of insurance, 
primarily health, and printing hard copy 

Model I & III Disk $99.50 



AIDS SYSTEMS 

BY METS TECHNOLIGIES 
MTC AIDS III 

This easy to use system allows 
even a novice TRS-80 user to 
create data files custom con- 
figured for many applications, 
from lists (01 mailing and < ata 
loging to financial reporting 
and time scheduling. It requires 
NO PROGRAMMING and is 
complete with features for add- 
ing, deleting sorting updatm j 
and printing 

MODEL I $69.95 

MODEL II $99.95 



VERBATIM 
DISKETTES 

Double Density :i:ia 40 



Track Datalife. 



$25.00 



SOFTEK SOFTWARE 

P.O. BOX 702 
STERLING, ILLINOIS 61081 
815-625-5342 ^ 374 

MASTERCARD AND VISA WELCOME 

We Also Accept: 

» COD • CHECKS • MONEY ORDERS 

ADD $2.00 FOR SHIPPING 



sSee List ol Advertisers on page 386 



TRS-80" IS A TRADEMARK OF TANDY CORP. 
AIDS III." CALCS III." MERGE III." ARE TRADE- 
MARKS OF METATECHNOLOGIES 

Write or Call for Complete Price List 
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GAME 



LOAD 80 



Or is that a light at the end of grid? 



You Light Up J 




David R. McGlumphy 
4429 Paula Lane 
Red Bank, TN 37415 



Imagine a tic-tac-toe grid. It 
has nine squares: one in the 
center and eight around the 
periphery. The goal of this game 
is to light all the squares except 
the center one. 

Rules 

Each square corresponds to a 
number. The top row is to 7, 8, and 
9. The middle row is 4, 5 and 6, and 
the bottom row is 1, 2 and 3. 

You change a square from 
dark to light or light to dark by 
pressing its corresponding num- 
ber. If you change a corner, you 
also change every place which 
is immediately adjacent to that 
corner, for a total of four places 
changed. If you change the 
center, you also change the 
squares directly above, below, 
to the right, and to the left of the 
center for a total of five places 



changed. If you change squares 
2 or 8, you also change the two 
squares horizontally adjacent to 
2 or 8 (1 and 3 or 7 and 9), for a 
total of three places changed. If 
you change squares 4 or 6, you 
also change the two squares 
vertically adjacent to 4 or 6 (1 
and 7 or 3 and 9), for a total of 
three places changed. 

It's easier to play the game 
than to read the rules! 

The Program 

80 Microcomputing published 
my version of Simon in the 
August 1981 issue. In that arti- 
cle I asked if anyone had worked 
on a program like the Merlin 
game; SMSGT Kanach sent me 
a listing of his version written for 
theColorComputer. I used much 
of his logic in my program al- 
though I have changed some of 
his techniques. I wrote this Ba- 
sic program for a Model I Level II 
or disk system. 

I used David Morr's Super 
Sound routine (see 80 Microcom- 
puting, May 1980). Model III users 
will have to use a different sub- 
routine to produce sound. Color 
Computer users can substitute 
the Sound command for the USR 
calls or GOSUBs to the USR call 
in this program. They can elimi- 
nate lines 50 and 1420-1620; they 
must replace any GOSUB 1610 



with their Sound command. 

The GOTO in the first line of 
code helped me write and debug 
the program. I used a disk sys- 
tem to write this program, and I 
couldn't simply insert or change 
a few lines and run the program 
again. If you look at line 1430 in 
the listing, you will see 29 num- 
bers between the quotes. Run 
the program, press Break, and 
then look at line 1430. It will look 
like garbage because it has 
been packed with a sound-pro- 
ducing machine language pro- 
gram. (The Data statement con- 
tains the program.) The ma- 
chine language program also 
has a zero embedded in it, which 
confuses the Basic interpreter. 
Basic thinks it means the end of 
a line of code instead of just a 
part of a machine language pro- 
gram. If you run the program 
several times without loading it 
from disk or tape first, you will 
get Syntax Error messages. 

I made program changes and 
then typed RUN 20. That auto- 
matically saved my program to 
disk, then ran the program to 
test it. When I found something I 
wanted to change, I typed RUN 
30 to get a fresh copy of the pro- 
gram from the disk so that line 
1430 would be correct. After I 
finished the programming work, 
I could have deleted the first 



three lines, but I left them in to 
share them with you. You may 
want to use this technique when 
you write your own programs. 

Disk Basic allows ten dif- 
ferent USR calls while Level II 
Basic allows only one (easily). 
They use completely different 
techniques to set up these calls 
to a machine language subrou- 
tine. Level II Basic requires you 
to POKE the address of the sub- 
routine into addresses 16526 
and 16527 while in Disk Basic 
you can use DEFUSR0=J 
(where J is the address of the 
subroutine). Line 1510 finds out 
if the program is running in 
Level II or Disk Basic. If you 
PEEK (16396) and find the value 
201, you are dealing with a Level 
II machine. 

If you have other Merlin-type 
programs you would like to 
share or if you have a sound rou- 
tine like Super Sound which 
works on the Model III, drop me 
a line.B 



The Key Box 



Basic Level 
Model I 
16K RAM 
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Program Listing 



SAVE'MERLIN" : RUN 



10 GOTO 40 

20 CLS : PRINT'SAVE MERLIN" 

30 CLS : LOAD-MERLIN" 

40 CLEAR 500 

50 GOSUB 1420 : REM BUILD SOUND ROUTINE 

60 CLS 

70 PRINT8704, "SQUARE GAME ADAPTED FROM MERLIN BY" 

80 PRINT'SMSGT CHUCK J KANACH JR, PSCI1 BOX 28749, APO SF 

90 PRINT'WRITTEN ON TRS-80 COLOR COMPUTER 4K SYSTEM" 

100 PRINT'MODIFIED FOR MODEL 1 LEVEL II BY DAVE MCGLUMPHY" 

110 PRINT"4429 PAULA LANE, RED BANK, TN 37415. 10/15/81' 

120 TN=8 : REM TRY # 

130 REM NUMBERS EACH SQUARE 

140 PRINTgl70,"7"; 

150 PRINTgl78,"8"; 

160 PRINT@186,"9"; 

170 PRINTg298,"4"; 

180 PRINT?306,"5"; 

190 PRINT@314,"6"; 

200 PRINTg426,"l"; 

210 PRINT@434,"2"j 

220 PRINT@442,"3"; 

230 REM DRAWS HORIZONTAL LINES 

240 FOR X=8 TO 56 

250 FOR Y=5 TO 29 STEP 8 

260 SET(X,Y) 

270 NEXT Y 

280 NEXT X 

290 REM DRAWS VERTICAL LINES 

300 FOR X=8 TO 56 STEP 16 

310 FOR Y=6 TO 28 

320 SET(X,Y) 

330 NEXT Y 

340 NEXT X 

350 REM RANDOMLY SELECTS THE DOTS 

360 FOR PX=16 TO 48 STEP 16 

370 FOR PY=9 TO 25 STEP 8 

380 IF RND(2)=1 THEN 410 

390 SET(PX.PY) 

400 GOTO 420 

410 RESET(PX,PY) 

420 NEXT PY 

43 NEXT PX 

440 REM PLAYER SELECTS #1-9. 

450 REM DEPENDING ON NUMBER, THE DOTS WILL SET OR RESET. 

460 AS=INKEYS 

470 IF AS<"1" OR AS>"9" THEN 460 

480 ON VAL(AS) GOTO 490,560,620,690,750,840,900,970,1030 

490 PI = 80 

500 GOSUB 1610 : REM SOUND 

510 FOR X=16 TO 32 STEP 16 

520 IF POINT(X,17)=0 THEN SET(X,17) ELSE RESET(X,17) 

530 IF POINT(X,25)=0 THEN SET(X,25) ELSE RESET(X,25) 

540 NEXT X 

550 GOTO 1090 

560 PI-60 

S70 GOSUB 1610 : REM SOUND 

580 FOR X-=16 TO 48 STEP 16 

590 IF POINT(X,25)=0 THEN SET(X,25) ELSE RESET(X,25) 

600 NEXT X 

610 GOTO 1090 

620 PI-50 

630 GOSUB 1610 : REM SOUND 

640 FOR X=32 TO 48 STEP 16 

650 IP POINT(X,17)«0 THEN SET(X,17) ELSE RESET(X,17) 

660 IF POINT(X,25)=0 THEN SET(X,25) ELSE RESET(X,25) 

670 NEXT X 

680 GOTO 1090 

690 PI-40 

700 GOSUB 1610 : REM SOUND 

710 FOR Y=9 TO 25 STEP 8 

720 IF POINT(16,Y) =0 THEN SET(16,Y) ELSE RESET(16,Y) 

730 NEXT Y 

740 GOTO 1090 

750 PI=35 

760 GOSUB 1610 : REM SOUND 

770 FOR X=16 TO 48 STEP 16 

780 IF POINT(X,17) =0 THEN SET(X,17) ELSE RESET(X,17) 

7 90 NEXT X 

800 FOR Y=9 TO 25 STEP 16 

810 IF POINT(32,Y) =0 THEN SET(32,Y| ELSE RESET(32,Y) 

820 NEXT Y 

830 GOTO 1090 

840 PI=30 

850 GOSUB 1610 : REM SOUND 

860 FOR Y=9 TO 25 STEP 8 

870 IF POINT(48,Y)=0 THEN SET(48,Y) ELSE RESET(48,Y) 

880 NEXT Y 

890 GOTO 1090 

900 PI=25 

910 GOSUB 1610 : REM SOUND 

920 FOR X-16 TO 32 STEP 16 

930 IF POINT(X,9)=0 THEN SET(X,9> ELSE RESET (X,9) 

940 IF POINT(X,17) =0 THEN SET(X,17) ELSE RESET (X,17) 

950 NEXT X 

960 GOTO 1090 

970 PI=20 

980 GOSUB 1610 : REM SOUND 

990 FOR X=16 TO 48 STEP 16 

1000 IF POINT(X,9)=0 THEN SET(X,9) ELSE RESET (X,9) 

1010 NEXT X 

1020 GOTO 1090 

1030 PI=19 

1040 GOSUB 1610 : REM SOUND 

1050 FOR X=32 TO 48 STEP 16 

1060 IF POINT(X,9)=0 THEN SET(X,9) ELSE RESET(X,9) 

1070 IF POINT (X, 17 )=0 THEN SET(X,17) ELSE RESET(X,17) 

1080 NEXT X 

1090 TN=TN+1 

1100 PRINT?704,CHRS(31) "TRY #";TN 

1110 IF POINT(32,17) =0 THEN 1120 ELSE 460 

1120 IF POINT(16,9) <>0 THEN 1130 ELSE 460 

1130 IF POINT(32,9)<>0 THEN 1140 ELSE 460 

Program c 



ENGINEERING 
ANALYSIS & DESIGN PROGRAMS 

Engineering Analysis Software supplies commercial quality analysis and 
design programs for architects and engineering consultants. All pro- 
grams are available in TRS-80 (I. II. III. & 16) and CP/M (8" SD. Apple, 
Northstar. & Omikron) formats 

EASI-PATH Pro/ect Management System ($300 00) is a data-base 
oriented program which uses CPM (Critical Path Method) to schedule 
pro|ect operations against time periods and cost constraints While the . 
reports generated with this program were designed as a tool to assure 
management that detailed project planning is performed it is also an 
effective sales tool for customer project presentations 

ST10M MC2' Structural Finite Element Analysis ($995 00) is a data-base 
oriented structural analysis program which solves plane frames, space 
frames, trusses, grids, and membrane element The program computes 
member forces, node deflections, and restraint reactions Additional fea- 
tures include a data-base editer (to update input information), imposed 
node displacements, and end moments on plane frame elements The 
semi-banded matrix solution allows large problem sizes in 64k micro- 
computers. 

EASI-BENDER ($795 00) Tube Bending program is an interactive pro- 
gram which provides the information required to estimate and fabricate 
bent tube shapes [pipes and conduits) The tabulated output includes 
bend angles, plane angles, clamp lengths, mandrel stops, and cut lengths 
for the problems entered 

Manuals w/demonstration diskette available for above $30.00 each. 

Other engineering packages (MC2") 

Commercial HVAC CL4M' ($1495.00) 

Duct Design DD4M' ($265 00) 

Residential HVAC 'RL5M' (295 00) 

Fire Sprinkler Design HP4M' ($995.00) 

Steel Beam Design AISC codes 

Concrete Column Design 

ENGINEERING ANALYSIS SOFTWARE CONSULTANTS 

P.O Box 1059 

Hightstown, NJ 08527 

VISA & MC accepted (201)367-5735 

'MC2 is the trademark for McClintock Inc 
"EASI software is copyrighted by Engineering Analysis 
Software Consultants ^ 313 
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♦NOTICE 

PROGRESSIVE ELECTRONICS 

s now authorized 

SALES and SERVICE 
for 

MICRO DESIGN PRODUCTS 



Board & 
Manual 



M - 1 M 3 

Expansion Expansion 

MDX2 MDX3 



$74.95 $74.95 

Parts Kit $205.00 $205.00 

Assembled 

& Tested $399.95 $324.95 



Phone 
Modem 

MDX4 

$29.95 

$40.00 
$99.95 



sSee List of Advertisers on page 386 



Aluminum Enclosures for the MDX2 S 45 00 

Mill Internal Drive Installation Kit s 119 95 

includes Power Suppy Cables Mounting Brackets 

643 E CHESTNUT ST 

LANCASTER OH 43130 

614/687-1019 hrs9-9EST 
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the COMPUTER 
STOCK MARKET book 

THE PROFESSIONALS BUY 

Purchased by over 160 Financial Institutions, 75 Market Advis- 
ory Services, 50 Colleges and Universities, and 1 50 Computer 
and Software Firms. 
Has been sold m every state and over 30 other nations. It is a study 
of market timing based on cycles and seasonal factors, as they affect 
stock and commodity prices. It gives solid tools for measuring and 
profiting from them. Author has more than 20 years experience as a 
stock broker, and conducted 8 years of computer research 
developing the 34 programs in the book which contains ideas and 
programs never before published. Programs are written in TRS-80 
BASIC 

Do you have the great stock and commodity trading advantages 
given by the home computer to the few who properly use it? 

To order "New Uses For The Home Computer In The Stock 
Market" send your name and address with your check for S19.95 
(overseas; U.S. A Dollar International Money Order or a Draft 
payable on a U.S.A. Bank) to : 

Thomas V. Lenz, Dept. M 
596 W. Karval Ct. - Spring Creek 

Elko, Nevada 89801 "* 144 



Program continued 

1140 IF POINT(48,9)<>0 THEN 1150 ELSE 460 

1150 IF POINT(16,17) <>0 THEN 1160 ELSE 460 

1160 IF POINT(16,25)<>0 THEN 1170 ELSE 460 

1170 IF POINT(48,17) <>0 THEN 1180 ELSE 460 

1180 IF POINT(32,25)<>0 THEN 1190 ELSE 460 

1190 IF POINT(48,25) <>0 THEN 1210 ELSE 460 

1200 REM DECLARES THAT YOU ARE A WINNER 

1210 FOR X = l TO 20 

1220 SS=USR(256+RND(70)+10) 

1230 PRINT6199, ******* WINNER! *****«», 

1240 SS=USR(256+RND(70)+10) 

1250 CLS 

1260 NEXT X 

1270 PRINT'YOU WON ON TRY # " ; TN 

1280 PRINT 

1290 PRINT-PRESS ANY KEY TO RUN THE GAME AGAIN." 

1300 IS=INKEY$ 

1310 IS-"" 

1320 FOR X=10 TO 90 

1330 SS=USR(256+X) 

1340 NEXT X 

1350 IF INKEY$<>"" THEN 1410 

1360 FOR X=89 TO 11 STEP -1 

1370 SS=USR(256+X) 

1380 NEXT X 

1390 IF INKEYSO"" THEN 1410 

1400 GOTO 1320 

1410 GOTO 60 : REM STARTS GAME AGAIN. 

1420 'SUPERSOUND BY DAVID G MORR-6599 RED FOX RD , REYNOLDSBURG, 

OH 43068, S 80 MICROCOMPUTING-05/80, PAGES 130-135, MODIFIED BY 

DAVE MCGLUMPHY, 4429 PAULA LANE, RED BANK, TN 37415 05/23/81 

1430 SS$ = " 123 4 567 8901 23 4 567 8901 23 4 567 89" 

1440 SS=VARPTR(SS$) 

1450 J=PEEK(SS+l)+256*PEEK(SS+2) 

1460 FOR K=JT0J+28 

1470 READ SS 

1480 POKE K,SS 

1490 NEXT 

150 DATA 205,127,10,62,1,14,0,237,91,61,64,69,47,23 0,3,179,211, 

255,13,40,4,16,246,24,242,37,32,241,201 

1510 IF PEEK(16396) O201 THEN 1580 : REM TO DEAL WITH DOS 

1520 REM SET UP THE USR ROUTINE FOR LEVEL II BASIC 

1530 MSB=INT(J/256) 

1540 LSB=J-256*MSB 

1550 POKE 16526, LSB 

1560 POKE 16527, MSB 

1570 RETURN 

1580 CMD'T" : REM DISABLE INTERRUPTS TO MAKE SOUND CLEAR 

1590 DEFUSR0=J : POKE 14308,0 : REM ENSURE SOUND AT CASSETTE 1 

1600 RETURN 

1610 SS=USR(1024+PI) : REM MAKE A NOISE 

1620 RETURN 



WE CARRY COMPONENTS FOR THELNW & MDX KITS 



\ 



7400 SERIES Til- 
ly pe Price 

7404 $ .25 

7405 29 

7416 29 

7427 25 

7438 38 

7442 29 

7451 ;;2o 

7474 32 

/486 .32 

7490 44 

7492 42 

7493 "42 

/495 .55 

74121 32 

74123 55 

74125 47 

74132 60 

74151 55 

74157 60 

74161 83 

74164 83 

74165 83 

74166 90 

74173 1.05 

74175 65 

74176 75 

74194 73 

74195 64 

74366 64 

74367 66 

1 

Oft 



74LS00 SERIES 

Type Price 

74LS00 $ .26 

74LS02 27 

74LS04 31 

74LS05 29 

74LS08 27 

74LS09 32 

74LS10 27 

74LS11 39 

74LS13 43 

74LS14 71 

74LS15 30 

74LS20 26 

74LS21 30 

74LS27 30 

74LS30 26 

74LS32 37 

74LS42 65 

74LS74 39 

74LS86 41 

74LS93 70 

74LS123 92 

74LS124 1.35 

74LS132 72 

74LS138 66 

74LS139 66 

74LS153 64 

74LS155 85 

74LS157 67 

74LS161 ..87 

74LS163 85 



74LS00 SERIES 

Type Price 

74LS164 92 

74LS166 2.29 

74LS174 71 

74LS175 71 

74LS193 87 

74LS240 1.39 

74LS241 1.39 

74LS244 1.39 

74LS245 2.20 

74LS257 76 

74LS273 1.75 

74LS367 69 

74LS368 69 

74LS373 1.49 

74LS374 1.45 

74LS393 1.95 

74S 00 SERIES 
Type Price 

74S04 $.55 

74S05 50 

74S22 47 

74S32 47 

74S64 47 

74S74 -...."a 

74S112 71 

74S161 2.95 

74S174 1.15 

74S175 1.15 

74S280 2.15 

74S387 2.95 




(713)488-4501 

17321 EICaminoReal 
Houston, Tx. 77058 

div. World Wide Data Systems Inc 



MEMORY 

SPECIAL FUNCTION 

Type Price 

FD1771B-01 $23.95 

FD1793B-01 39.95 

BR1941 6.95 

TR1602 4.95 

Z80A 9.95 

Z80B 14.95 

MC1372 5.95 

MC6674 11.95 

2716 6.95 

2114 2.95 

2102 6.49 



We Also Carry 
•CAPACITORS' 

•RESISTORS' 
'CONNECTORS* 

•SWITCHES' 
ETC. 

Write or Call 

For Complete 

CATALOG 



LINEAR 
Type Price 

75452 $.35 

LM1488 1.10 

LM1489 1.10 

uA7805/340T-5 99 

UA7812/340T-12 99 

UA7912/320T-12 99 

79L12 1.25 

78H05 5.95 

TL084 99 

MC1458 58 

MLM311P1 90 

MC14412 14.95 

IC. SOCKETS 
Type Price 

8PINS.T $.12 

14PINS.T 14 

16 PIN ST 16 

18PINS.T 21 

20PINS.T 23 

22PINS.T 27 

24PINS.T 30 

40PINS.T 47 

CRYSTALS 
Type Price 

1MHz $5.95 

3.579MHz 2.50 

4.0MHz 2.95 

16.0MHz 2.95 



VISA, MASTERCARD and AMERICAN EXPRESS 

NET 30 TERMS AVAILABLE 

D&B Rated Firms, Universities & Government 

•Prices do not include shipping* 
•Prices are subject to change without notice* 
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• Maximizes computing po 

• Virtually infinite expansic 
Low initial c 
Graceful gro 
Reasonable ex. 
Integrated system d 
Expand your system 



For a limited 
multiplexer b 
rformance . 
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available at ad 




UTILITY 



Decimal to octal to binary to hexadecimal. 




16, 10, 
Which Base 




Karl Sarnow 
Salzwedeler Hot 9 
3000 Hannover 1 
West Germany 



Every programmer must oc- 
casionally translate num- 
bers from one system to another. 
Although not really difficult, the 
process is time-consuming and 
error-prone. After all, how many 
of us are really proficient with the 
hexadecimal, binary or octal sys- 
tems? I wrote a program to 
smooth my path through conver- 
sions—you may wish to use it, 
too. 

Representing a Number 

Each natural number (or posi- 
tive integer) can be decomposed 
into a sum of products of the 
following form (Eq. 1): 

A = q t *ntt + q t _,*nt(t-1)+ . . . 
+ q 2 *nt2 + q 1 *nt1 +q 

where n is the base of the 
number A, q is a numeral with a 
value 0<qj<n. In the best 
known base system, the deci- 
mal system, it sounds a lot 
easier. For example, the number 
3190 means 3* 10T3 + 1*10T2 + 
9*10t1 + 0. In this example the 
base n is 10, the numerals q -q3 
are all less than 10(0, 1,2,3,4,5, 
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6, 7, 8, 9) and the position of a 
numeral in the number repre- 
sents the exponent of the base. 

As long as you are working in 
a base system with n less than 
10, there is no problem for the 
numerals. If, for example, the 
base is two, then the numerals 
qi are and 1. In the octal base 
system (n equals eight) the 
numerals q, are 0, 1,2,3,4,5,6,7. 

But what if the base is larger 
than 10? Letters in alphabetical 
order are usually used for num- 
erals greater than nine. The 
numeral meaning 10 would be A, 
11 would be B, 12 is C, 13 is D 
and so on. This works as long as 
the base is less than or equal to 
the number of letters in the 
alphabet plus 10 (36). Most com- 
puter applications are restricted 
to the decimal, binary, octal or 
hexadecimal base systems. The 
program shown in the listing will 
transform numbers between 
these four systems. 

The Main Program 

The main program consists of 
three parts: (1) input (lines 
10-50); (2) computing the num- 
ber in different representations 
(lines 60-140); and (3) output in 
different base systems (lines 
150-180). 

Parts 1 and 3 are simple and 
need no further comment. Part 2 
computes the various repre- 



sentations of the number in the 
following way. 

The input number N$ con- 
tains as a first character the 
code for the base system used. 
Line 60 truncates this code from 
the number. Lines 70-100 as- 
sign the corresponding value to 
BB, the base of the system. Line 
100 asks if the input number N$ 
is decimal. If so, ND is taken as 
the value of N$. If not, the 
subroutine at line 250 computes 
the decimal value ND from N$ 
and BB. 

Once ND is known, all other 
representations of the number 
N$ are computed from the 
decimal value ND by the sub- 
routine at line 200. The If. ..Then 
...Else statement in lines 120- 
140 is not necessary, but saves 
time when N$ is input in a base 
system different from the deci- 
mal system. 

Subroutines 

The two subroutines at line 
200 and line 250 are the heart of 
the program. The first (line 200) 
converts a decimal number ND 
into the representation Y$ in the 
base B. The second (line 250) 
converts a number N$ in the 
base BB into the decimal value 
ND. 

To explain how the conver- 
sion of N$ in the base BB to 
decimal ND works I will give an 



example. Assume the number 
N$ is given as H4FC. This means 
that the number N$ is given in 
the hexadecimal system, with 
BB = 16 as base and a value of 
4*16t2 + 15*16t1 + 12 (Eq. 2) 
according to Eq. 1. 

To obtain this value the com- 
puter first sets the value of ND 
and Z to zero (line 250). Line 260 
begins a For.. .Next loop which 
examines each character in N$. 
Remember that line 60 has re- 
moved the base code (B, O, D or 
H) from N$. Line 270 then sets Z 
equal to the ASCII value of the 
character being examined. Line 
280 determines if the character 
is alphabetic or numeric; then 
the value for the character is set 
equal to Z-K where K = 55 for 
alphabetics and 48 for nu- 
merics. This value is added to 
NB*BB in line 290. 

After the For.. .Next loop in 
lines 260-300, ND contains the 
decimal value of H4FC = 
D1276. Use your pocket calcula- 
tor to prove that Eq. 2 gives the 
same result as 1*10t3 + 2-10T2 
+ 7*10t1 + 6(Eq.3). 



The Key Box 

Basic Level II 
Model I or III 
4K RAM 



PROGRAMMING TOOLS FOR YOUR 
™S-80® MODEL I AND MODEL HI 



INSIDE LEVEL II 

The Programmers Guide to the TRS-80 ROMS 

INSIDE LEVEL II is a comprehensive reference guide to the Model I and Model III ROMs 
which allows the machine language or Basic programmer to easily utilize the sophisti- 
cated routines they contain. Concisely explains set-ups, calling sequences, and variable 
passage foi numbei conversion, arithmetic operations, and mathematical functions, as 
well as keyboard, tape, and video routines Part II presents an entirely new composite 
program structure which loads under the SYSTEM command and executes in both Basic 
and machine code with the speed and efficiency of a compiler In addition, the 18 chapters 
include a large body of other information useful to the programmer including tape 
formats, RAM useage, relocation of Basic programs. USR call expansion, creating 
SYSTEM tapes of your own programs, interfac ng o! Basic variables directly with ma 
chine code, and special precautions for disk systems. INSIDE LEVEL II is a clearly 
organized reference manual. 80 Microcomputing calls it a volume of valuable informa- 
tion.. ..immensely thoughtful, literate, and cleanly designed Byte Magazine says: "I 
recommend this book to serious machine language programmers." 
Includes updates for Model III. INSIDE LEVEL II $15.95 

SINGLE STEP THROUGH RAM OR ROM 

STEP80 allows you to step through any Basic or machine language program one 

instruction at a time, and see the address, hexadecimal value. Zilog mnemonic, register 
contents and step coi mt tor each instruction The top 14 lines of the video screen are left 
unaltered so that the target program may perform its display functions unobstructed 
STEP80 will follow program flow right into the ROMs, and is an invaluable aid in learning 
how the ROM routines function Commands include step (trace), disassemble, run in 
step mode at variable step rate, display or alter memory or CPU registers, jump to 
memory location, execute a CALL, set breakpoints in RAM or ROM, write SYSTEM 
tapes, and relocate to any page in RAM. The display may also be routed to your line 
printer through trie device control block so custom print drivers -ire automatically sup- 
porter! 
Specify Model I or Model III. STEP80 S16.95 

SMART TERMINAL PROGRAM 

This machine language program may be used as a smart terminal with time share 
systems or for high speed file transfers between two disk-based micros over modems or 
direct wire. It is menu driven and extremely simple to use. Functions include real-time 
terminal mode, save RAM buffer on disk, transmit disk file, receive binary files, examine 

and modify UART parameters, program 8 custom log-on messages, automatic 16-bit 
checksum verification of accurate transmission and reception, and many more user 
conveniences. Supports line printers and lowercase characters. With this program you 

will no longei need to convert machine language programs to ASCII for transmission, and 
you will know immediately if the transmission was accurate This program comes on a 
formatted disk. 
Specify Model I or Model III. TELCOM $39.95 

PROGRAM INDEX VERSION 2.0 

Assemble an alphabetized index of yout entire program library from disk directories 
Program names and free space are read automatically (need not be typed in) and may be 

alphabetized by disk or program The list may also be searched for any disk, program, or 
extension, disks or programs added or deleted and the whole list or artv oar! see' to the 
printer. Printer output may be requested in three different formats including labels. The 
list itself may also be stored on disk for future access and update. II also includes a 
PURGE mode for quickly killing unwanted files. Directory reads and alphabetizing is 
done in machine code tor speed 1 ,000 programs may be sorted in 'ess. than 10 seconds 
80 Microcomputing called it "The best thing since sliced bread." it works with TRSDOS. 
OS-80, NEWDOS. and NEWDOS.'SO single or double density. One drive and 32K 

required 

Specify Model I or Model III. INDEX $24.95 

4 SPEED OPTIONS FOR YOUR TRS-80 

The SK-2 clock modification allows CPU speeds to be switched between normal, an 
increase of 50%, or a 50% reduction; selectable at any time without interrupting execu- 
tion or crashing the program. Instructions are also given for a 100% increase to 3.54 MHz. 

The SK 2 may be configured by the user to change speed with a toggle switch or on 
software command. It will automatically return to normal speed any time a disk is active, 
requires no change to the operating system, and has provisions for adding an LED to 
indicate ween the computer is not at normal speed It mounts inside the keyboard unit 
with only 4 necessary connections for the switch option (switch not included), and is 
easily removed if the computer ever needs service. The SK-2 comes fully assembled 
with socketed IC's and illustrated instructions. 
Model I only. SK-2 $24.95 



INSTANT ASSEMBLER 
NOW ON DISK! 

The INSTANT ASSEMBLER is a powerful disk or tape-based assembler and debugger 
for the TRS-80. Now you can assemble directly o memory and immediately debug your 
program with the built in single stepping debugger. Quickly switch from assembler to 
debugger and back again without losing the source code. This feature makes INSTANT 
ASSEMBLER an excellent learning tool for assembly language programming 
INSTANT ASSEMBLER is absolutely unique among tape based assemblers in that it 
produces relocatable code modules that can be linked with the separate LINKING 
LOADER, which is supplied in two versions for loading programs into either high or low 
RAM. This lets you build long programs with small modules. INSTANT ASSEMBLER also 
features immediate detection of errors as the source code is entered, a compactly coded 
source format that uses 1/3 as much memory as standard source, and many operational 
features including single stroke entry of DEFB and DEFW, pinpoint control of listings, 
alphabetic listing of symbol table, separate commands for listing error lines or the symbol 
table, block move function, and verification of source tapes 

INSTANT ASSEMBLER s debugger provides single stepping with full register displays, 
decimal or hex entry of addresses, forward or backward memory displays, disassembly 
of ob|ect code in memory, memory display in ASCII format, and hex-to-decimal or 
decimal-to-hex conversion. The single-stepper will step one instruction at a time or at a 
fast rate to any defined address. 

INSTANT ASSEMBLER occupies less than 8400 bytes of memory. In a 16K machine this 
will leave you enough memory to write assembly language programs of around 2000 
bytes. This and its module-linking feature make INSTANT ASSEMBLER ideal for users 
with only 16K machines. The instruction manual may be purchased separately for S3, 
which will apply towards the purchase of the INSTANT ASSEMBLER. In addition to disk 
I/O. the disk version includes a stand-alone version of the debugger. 

Specify Model I or Model III. TAPE INTASM $29.95 

Specify Model I or Model III. DISK INTASM S35.95 

RESTORE DAMAGED TAPES WITH RESQ2 

Cassette recordings are subject to several types ot damage. Thin spots in the oxide, dirt, 
voltage fluctuations while recording, or stray magnetic fields can all contribute to lost or 
added bits RESQ2 was written to provide a method of restoring tapes that can no longer 
be loaded for these reasons. It can restore BASIC, SYSTEM. ASSEMBLER, and DATA 
tapes. RESQ2 compares two copies of the damaged tape to attempt a restoration, 
though restoration can often be accomplished with only one copy. After the damaged 
data is corrected in memory, a new tape may be recorded and verified which does not 
contain the errors The success rate of RESQ2 will depend on the severity and quantity of 
errors RESQ2 comes with a comprehensive user manual and examples of two types of 
crashed' programs to practice on. 
Specify Model I or Model III. RESQ2 $19.95 

RAM SPOOLER AND PRINT FORMATTER 

This program is a full feature print formatting package featuring user defineable line and 
page length (with line feeds inserted between words or after punctuation), screen dump, 
printer pause control, and baud rate selection. In addition, printing is done from a 4K 
expandable buffer area so that the LPRINT or LLIST command returns control to the user 
while printing is being done Works with cassette ot disk systems Ideal lor Selectee or 
other slow printers. Allows printing and processing to run concurrently. Output may be 
directed to either the parallel port, serial pert, or the video screen 80 Microcomputing 
said "! can only give my highest recommendation of Spooler and Mumford Micro 
Systems. 
Specify Model I or Model III. SPOOLER $16.95 

DUPLICATE SYSTEM TAPES WITH CLONE 

Make duplicate copies of almost any tape including Basic, SYSTEM, data lists, assem- 
bler source, or custom loaders". The file name, load address, entry point, and every byte 
(in ASCII format) are displayed on the video screen. Model III version allows changing 
tape speed so you can load in a tape at 500 baud and write it out at 1500. 
Specify Model I or Model III. CLONE $16.95 

MACHINE CODE FAST FOURIER TRANSFORM 

Written by Dr. A H. Gray. Jr., co-author (with J.D Markel) of the classic text Linear 
Prediction of Speech', this complete package includes 3 versions ot the machine lan- 

guage FFTASM routine assembled foi 16, 32 and 48K machines, a short sample Basic 
program to access them, a 10K Bas'c program which includes sophisticated interactive 
graphing and data manipulation, and a manual of instructions and examples. The 

machine language subroutines use variables defined by a supporting Basic program to 
make data entry and retrieval automatic. Without PEEKs and POKEs They perform 20 to 
40 times faster than their Basic equivalent (256 points in 12.5 seconds), and handle up to 
a 1024 point complex FFT. The FFT is useful in analyzing stock market and comodity 
trends as well as tor signal analysis 

Specify Model I or Model III. FFTASM $49.95 

FFTASM on disk with source code $69.95 



MUMFO 

MICRO 

SYSTEMS 



>RDERING: Complete satisfaction is guaranteed or a full refund will be made. All programs 
xcept TELCOM and DISK INTASM are shipped on cassette unless $5 is included for a 
formatted (no system) disk. Include $1.50 for postage and handling. California residents add 
6% sales tax. Visa, Mastercharge and COD orders accepted. SPECIFY MODEL I OR MODEL 

HI. Dealer inquiries invited i , : 



Box 400-E Sui 



/California 93067 (805) 969-4557 
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To explain the subroutine at 
line 200 I will go back and trans- 
form ND = 1276 decimal to Y$ in 
the hexadecimal system. First, I 
will do it by hand. Divide the 
number by the base: 1276 -f- 16 
= 79.75 (Eq. 4). The fractional 
part of the result in Eq. 4 gives 
the last hexadecimal numeral in 
our new representation: 0.75 * 
16 = 12 = C(Eq. 5). Next divide 
the integer part of the result of 
Eq. 4 by the base number: 79 -*■ 
16 = 4.9375 {Eq. 6). Again, the 
fractional part gives the next 
hexadecimal numeral: 0.9375 * 
16 = 15 = F(Eq.7). Because the 
integer part of Eq. 6 is less than 
16 (the base), it is the highest 
hexadecimal numeral. There- 
fore the hexadecimal represen- 
tation of decimal 1276 is 4FC. 

Line 200 assigns ND to Z and 
the empty string to Y$. Line 210 
computes the integer part of Z/B 
and leaves in Y the value of the 
corresponding hexadecimal 
numeral. Line 220 computes the 
ASCII code for this numeral and 
line 230 adds this character 
leading to Y$. This procedure 



repeats until there is no integer 
part left (Z equals 0). 

Editor's note: This program is 



not error-trapped for incorrect 
binary, octal and hexadecimal 
inputs. Therefore restrict your 



binary inputs to and 1; your oc- 
tal inputs to 0- 7; and your hexa- 
decimal inputs to O-F. ■ 



X HH»««»»»t«t»*»t.«««*tt* t 4 t **, 1 ,, t( „,, tt ,„ ) ,, 4 „„,„ ) ,„, lHt 

2 '* 

3 '* BASE CONVERSIONS * 

4 '* BY * 

5 '* DR. KARL SARNOW * 

6 •* , 

7 ******************************************************* t ****** 
10 CLS:CLEAR(200) : PRINTTAB(10) "NUMBER REPRESENTATION PROGRAMM" 

20 PRINT: PRINT "ADD ONE OF THE FOLLOWING PREFIXES TO THE NUMBER YOU WANT TO" 

: PRINT "REPRESENT: " 

30 PRlNT'B - BINARY, O - OKTAL, D - DECIMAL, H - HEXADECIMAL" 

40 PRlNT'FOR EXAMPLE: HFF = D255." 

50 PRINT: INPUT" YOUR NUMBER";N$ 

60 B$=LEFT$(N$,1) :N$»RIGHT$(N$,LEN(N$)-1) 

70 IF B$="B" THEN BB=2 

60 IF BS="O n THEN BB=8 

90 IF BS="D" THEN BB=10 

100 IF BS="H" THEN BB-16 

110 IF BBO10 THEN GOSUB 250 ELSE ND=VAL<N$) 

120 IP BB<>2 THEN B=2:GOSUB 200 :NB$=Y$ ELSE NB$=N$ 

130 IF BB<>8 THEN B=8:COSUB 20G :NOS=YS ELSE NOS=N$ 

140 IF BB<>16 THEN B=16:GOSUB 200 :NH$=Y$ ELSE NH$=N$ 

150 PRINTTAB( 20) "NUMBER REPRESENTATION" 

160 PRINT'HBX" , "DECIMAL" , "OCTAL" , "BINARY" 

170 PRINTNH$,ND,NO.$,NB$ 

18t> PRINT: INPUT'HIT 'ENTER' WHEN READY" jNSsGOTO 10 

190 'SUBROUTINE TO CONVERT DECIMAL NUMBER ND TO BASE B 

200 Z=ND:Y$="" 

210 Y=Z:Z=INT<Z/B) tY=Y-B*Z 

220 IF Y>9 THEN K=55 ELSE K=48 

230 Y$=CHR$(Y+K)+Y$:IF Z>0 THEN 210 ELSE RETURN 

240 "SUBROUTINE TO CONVERT NUMBER OF BASE BB TO DECIMAL FORM ND 

2 r ,0 ND=0:Z = 

260 FOR 1=1 TO LEN(N$) 

270 Z«=ASC(MID$(N$,I,1)) 

280 IF Z>64 THEN K=55 ELSE K=48 

290 ND=ND*BB+Z-K , 

300 NEXT 

310 RETURN 



Program Listing 



■■■nmn 



PRINTERS 



COOSOL DISCOUNTS 




EPSON MX70 CALL 

EPSON MX80 CALL 

EPSON MX80 F/T CALL 

EPSON MX 100 CALL 

NEC PC-8023A-C $555 

ANACOM ANC150PORS $1195 

ANACOM ANC160P OR S $1465 

TALLY MT-1602 OR 5 $1495 

TALLY MT-1802 OR 5 $1795 

NEC 3510-1, 3515-1, 3530-1 .... $1795 
NEC 7710-1,7715-1, 7730-1 ....$2495 

NEC 7720-1 , 7725-1 $2995 

C.ITOH FP 1500 25PU, 

H, OR Q $1350 

C.ITOH FP 1500 25RU $1450 

C.ITOH FP 1500 45PU OR Q . . . $1795 

C.ITOH FP 1500 45RU $1995 

HP-PRINTERS $ CALL 



HEWLETT PACKARD 




• HP-125 Microcomputer $2995 

• HP-85A Microcomputer $2195 

• HP-83A Microcomputer $1595 

• HP 85/83 16K Memory Module . . $169 

• HP7225B Graphics Plotter $1959 

• HP-5 %" Dual Disk Drive $1995 

• HP-5 V4 Single Disk Drive $1249 

• HP 8" Dual Disk Drive $5395 

• HP-Other Mass Storage Units . . CALL 

• HP-9111A Graphics Tablet $1595 

• HP Firmware CALL 

• HP Software Packages CALL 

• HP Interfaces CALL 

OTHER COMPUTERS 

• ALTOS MTU/Floppy/Harddisk . CALL 

• ADDS Computer Systems CALL 

• ATARI Computer and 
Accessories CALL 



NEC COMPUTER 




• NEC Computer PC-8001A CALL 

• NEC I/O Unit PC-801 2A CALL 

• NEC I/O Port PC-8033A CALL 

• NEC Disk Drive PC-8031A CALL 

• NEC Disk Drive PC-8032A CALL 

• NEC Dot Printer PC-8023A-C . . CALL 

• NEC GR Monitor JB-1201 CALL 

• NEC COL Monitor JC-1202 .... CALL 

• NEC Accessories & Software . . . CALL 
TELEVIDEO TERMINALS 

• 91 0C $595 

• 920C $750 



91 2C 
95 0C 



$705 
$959 



ADDS Viewpoint WB2101 

or WB2102 $595 



COOSOL, INC. 



Calif. (7I4) 545-22I6 (800) 854 

P.O. BOX 743, ANAHEIM, CALIFORNIA 92805-0743 ^105 



8498 
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Looking for a Spelling Checker? 
Get more than just a spelling checker — get 




(L) LEARN HORO (R) REPLACE WORD (S) SKIP 
ERROR: nisstake 



I 



This is an exanple of a text being checked bs' 
HEXSP0.L. The text scrolls vp the screen'as it is checked. 
When an error is detected, sou have three choices. 

1) REPLACE the incorrect word. The replacenent v 
is INSTANTLY RE-CHECKED for correctness, then inserted in 
text. 

2) The Mord is correct, leave it as it is. 

3) Tell HEXSPELL to LEARN this word for future 
reference, uith just one keystroke. 

Hexspell requires just ore step to d 
correct a text, and learn new words. Your document is 
prin t as soon as Hexspell is finished. A word that is in error 
e.g.lnisstakel.is highlighted in the text for easy correction. 



Hexagon Systems is prouo lo announce another f:rs! in text checking — an everything 
checker. Hexspell 2 checks not only dictionary words, but learns and checks codes, for- 
mulae and numbers which are so essential in many commercial and technical documents. 
With Hexspell 2 you define what characters make up a word, then teach Hexspell the new 
' words" it needs to check your text This advanced system builds on the unique features ot 
the original Hexspell (the first TRS-80 spelling checker) Hexspell 2 features a one-step in- 
teractive process, a word list that adapts itself to your word usage a 25 000 word inibai 
word list and more than three years ol research and experience. ■RUH 

VISA 

Hexspell 2 upgrade for registered owners ot Hexspell Vers. 1 — 

S35 from Hexagon Systems or your nearest dealer 

Hexspell requires a TRS-80 Mod I or Mod III with 2 drives and 48K. US $99 



HeXAGON 
GYGTeMG 



P.O. Box 397, Station A 
Vancouver, B.C. Canada V6C 2N2 
Telephone (604) 682-7646 
Micronet 70235,1376 

v* 46 



638 S. Diliard St 

Winter Garden, FL 3278/ 

(305)877-2830 



RS © Color Comp. Software DOSPLUS 3.4 
I We also stock modems. 

cables & access. $ 1 20 


Lhi»'i 


Qg ; 


No CO.D.'s Please | 
Cashiers Check or MO. 1 


Mod III 48K 2 drs. 


Mod III 48K 2 drs | 


i with RS232 & built in modem 


90 day warr. | 


$ 2073 Mod III Controller 


$1895 | 


( no drive incl.) 




j $ 375 




Shipping extra • All prices subject to change 


without notice 5 


■ <t4H E ^B 1I| ufssB 


H • l^H 
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DOSPLUS 4.0 & 6.3 MEG. HARD DISK III 

for Mod. 3 

\Sz^aia $2895 

Complete & ready to plug into data bus for use as drive no. 4 

TANDON 40 TRACK DRIVES 

$ 230 Bare $ 275 Complete with case & pwr. supply 

We will special order 80 track drives ^i?s 
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MORE STRAIGHT TALK ABOUT DISK DRIVES 



DON'T BE CONFUSED BY ALL THE BRAND NAMES YOU SEE IN THE MARKET PLACE, THERE ARE VERY FEW MANUFACTURERS OF THE BASIC 

DRIVE CHASSIS, ALL THE OTHER NAMES ARE THOSE OF THE ASSEMBLERS OR THE RETAILERS. 

AS MANUFACTURED, THE DRIVE WILL NOT RUN ON A TRS-801, IT MUST BE MODIFIED BY THE ASSEMBLER. 

THE QUALITY OF THE DRIVE DELIVERED TO YOU IS DEPENDENT ON BOTH THE MANUFACTURER AND THE ASSEMBLER, THE BEST CAN TURN 

TO JUNK IF THE ASSEMBLY IS IMPROPERLY DONE. 

THE POWER SUPPLY AND CASE ARE VERY IMPORTANT COMPONENTS OF THE COMPLETE DRIVE, THE CASE MUST ALLOW PROPER COOLING 

AIR FLOW, AND THE POWER SUPPLY MUST MAINTAIN TWO CONSTANT V0LTA6ES. 

YOU MUST DEPEND ON THE COMPANY SELLIN6 YOU THE DRIVE TO SERVICE IT AT REASONABLE COST WHEN IT FAILS YOU, THE 

MANUFACTURER IS NOT EQUIPPED TO DO THIS! 

■ THE BEST MEASURE OF QUALITY IN A DRIVE IS IT'S SPECIFICATIONS, WILL IT HANDLE DOUBLE DENSITY. WHAT IS THE TRACK TO 
TRACK ACCESS TIME., THE ANSWERS TO THESE TWO QUESTIONS INDICATE THE PRECISION OF IT'S COMPONENTS. 

H WHAT KIND OF DRIVE SHOULD YOU BUY ? LEVEL IV HAS CHOSEN TO DISTRIBUTE EXCLUSIVELY, THE MPI LINE, ALL MODELS OF MPI 
ARE DOUBLE DENSITY RATED AND REQUIRE ONLY A FIVE MILLI-SECOND TRACK TO TRACK ACCESS TIME. 

■ WHAT DO ALL THE MODEL NUMBERS MEAN? 

B-5i= 40 TRACKS SINGLE HEAD SINGLE SIDE B-52= 40/40 TRACKS DOUBLE HEAD DOUBLE SIDE 
B-9i= 80 TRACKS SINGLE HEAD SINGLE SIDE B-92= 80/80 TRACKS DOUBLE HEAD DOUBLE SIDE 

(DOUBLE HEADS) -READ BOTH SIDES OF DISK (DUALS) -TWO DRIVES IN ONE CASE (RAW)-NO POWER SUPPLY OR CASE 
II WHERE SHOULD YOU BUY YOUR DRIVE, LEVEL IV IS ONE OF THE OLDEST AND LARGEST DISTRIBUTORS OF TRS-80* EQUIPMENT, LOOK 
AT THE ADS IN YOUR OLD MAGAZINES, MANY OF THE ADVERTISERS ARE NO LONGER IN BUSINESS, LEVEL IV HAS BEEN A LEADER 
SINCE THE BEGINNING, WE STAND BEHIND OUR PRODUCTS, AND WE'LL BE HERE WHEN YOU NEED HELP.' 

■ WHERE DO THE NATIONALLY KNOWN AUTHORS BUY THEIR DRIVES ? LEVEL IV CAN SHOW COPIES OF SALES RECEIPTS FOR DRIVES TO 
MOST OF THEM, LEVEL IV ALSO PROVIDES SERVICE FOR THEIR DRIVES AND COMPUTER SYSTEMS IN OUR FULLY EQUIPPED TECH CENTER. 

H CALL FOR OUR LOW PRICES ON NEW AND USED DRIVES, AND REMEMBER, WE ALSO TAKE TRADES 1 

LEVEL IV PRODUCTS INC. 32429 SCHOOLCRAFT, LIVONIA, MI 48150 
PHONES: MI (313) 525-6200 OTHERS 800-521-3305 (TOLL FREE) 

t a tradeiark of the RADIO SHACK DIV. of TANDY CORP. 



>-See List of Advertisers on page 386 
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REVIEW 



Three programs to write your checks for you. 



It's in the Mail 



Checkwriter-80 
Cat. No. 26-1584 
Radio Shack 
Model Ml, 48K 
$100 

Max! Check Register Accounting System 

Exador, Inc. 

Distributed by Adventure International 

P.O. Box 3435 

Longwood, FL 32750 

Models I & III, 48K; Model II, 64K 

$100 

Check Register Plus 

Softco 

1516 South Orchard 

Boise, ID 83705 

Models I & III, 48K 

$100 



Wynne Keller 

RD 1 Box 4130 
Solon, ME 04979 



Prints Checks 

Quarterly Payroll 

Reconciles Bk. Stmt. 

Accounts debit 

Accounts credit 

Accounts Total 

Multiple Bk Accts 

Pro rate expenses 

Security 

VisiCalc interaction 

Lowercase commands 

Report flexibility 

Balance available 

Entries retained atte' posting 

Error correction 



Small business is a vague term used to 
describe any business size from 0-500 
employees. Yet the needs of a business em- 
ploying one person are vastly different from 
those of a business employing 50, let alone 
500. A small business considering the use 
of a TRS-80 for bookkeeping purposes has 
many programs from which to choose. 
Those on the larger end of the small-busi- 
ness definition probably should select a 
complete, integrated business system of 
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payroll, general ledger, accounts payable 
and accounts receivable. Those at the low 
end in size may find such systems too ex- 
pensive and/ortoo complicated. They might 
be better served by some type of check reg- 
ister program, which is basically an elemen- 
tary general ledger, 

Three such programs now on the market 
can be used by individuals as well as busi- 
nesses. However, all are time consuming to 
use compared to a simple in-memory 
household checkbook program. These pro- 
grams do much more than balance the 
checkbook: They are sophisticated record- 
keeping systems. If you normally itemize 
deductions, or have special financial prob- 
lems such as rental income/expenses, 
these programs may be well worth the time 
and expense. Otherwise, they may be more 
program than you need or want. 

Features and Specifications 

The three programs do not perform the 
same functions. Two of the programs, Maxi 
Check Register Accounting System (Maxi 
CRAS) and Checkwriter-80, print the 
checks, if desired, to avoid the double work 
of typing an entry into the computer and 
typing it again on a check. Both programs 
also balance the checkbook, cancel checks 
and reconcile the bank statement. Maxi 
CRAS has the additional feature that it in- 
teracts with VisiCalc. Check Register Plus 
(CRP) is quite different from the other two 
since it does not balance the checkbook, 
write checks, or reconcile the bank state- 
ment. It does maintain payroll records and 
totals for tax and FICA purposes, and can 
even print W2 forms, with the purchase of 
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an extra module. 

Maxi CRAS requires a Model I or III with 
48K and two drives, or Model II with 64K and 
one drive. Printers which require special 
drivers may be used. Capacity is 223 ac- 
counts, divided as needed between ex- 
pense accounts and income accounts. Sev- 
eral disks may be used, if necessary, to 
store all the transactions for a year. The pro- 
gram was formerly marketed by The Bottom 
Shelf as the Check Register Accounting 
System, it has been totally rewritten for re- 
lease as Maxi CRAS. 

Checkwriter-80 is for the Model III only. It 
requires 48K and two drives. Printers which 
require special drivers are not supported; a 
parallel printer must be on-line before the 
program will run. The program is written in 
Cobol. It allows 33 expense accounts, 33 in- 
come accounts, 75 payee names/address- 
es, and nine bank accounts. 

Check Register Plus needs a Model I or 
III, 48K and two drives. Special printer driv- 
ers are not supported. Capacity is 400 ac- 
counts, divided as needed between income 
and expense. A Model II version is also 
available. The Model II version needs 64K, 
one drive, and includes check reconcilia- 
tion; it costs $129.95. 

Program Operation 

The usefulness of any of these programs 
depends in large part on your ability to or- 
ganize your financial accounts. It is impor- 
tant to list all your expense and income cat- 
egories in as much detail as will be mean- 
ingful. For example, an expense might be 
insurance. For some people, this becomes 
a single expense account. For others, it 
may be necessary to have several expense 
accounts for insurance, such as health in- 
surance, auto insurance and office insur- 
ance. All the programs allow changing of 
account titles, but if an account has a bal- 
ance, major switching should only be done 
at the end of the year. Therefore it is impor- 
tant to plan accounts carefully. 

Checkwriter-80 

Checkwriter-80 is a well written, easy-to- 
use program. Screens in various parts of 
the program all use the same control keys, 
and errors are simple to correct. A minor an- 
noyance is that control key entries must be 
in uppercase. The manual is well organized 
and easy to understand. 

Program initialization involves entering 
expense and income account titles, prefer- 
ably in alphabetical order, as well as name 
and account number for each bank ac- 

,■■ See List of Adve'tisers on paQp 386 



"The usefulness of any of these programs 

depends on your ability 
to organize your financial accounts." 



count. A payee name and address file is 
also created. This file of up to 75 names 
should include every firm to which checks 
are regularly written. 

When a check is entered, it must be as- 
signed to an expense account and a payee 
by entering the appropriate code number 
(obtained from a printout). If the code 
number is unknown, you can ask the com- 
puter to scan the file and find the appropri- 
ate payee or expense. This involves pulling 
the records in from the disk, however, so 
this method is rather slow. If there is no ex- 
pense account or payee which fits the 
transaction, both may be typed in directly 
by entering 00 as the code. This process 
uses extra space on the disk, however, so it 
should not be done too often. The program 
limits of 33 account and expense names 
and 75 payee names, though, are flexible 
rather than absolute limits. 

Checks are numbered internally by the 
program, and the actual check number is 



not used until the checks are printed. At 
that time, the starting number on the forms 
may be used. If the check is written manual- 
ly, there is no way to enter the actual check 
number into the program. 

Any error may be corrected at any time. 
Even if the check has already been printed, 
it is possible to fix the error and reprint the 
check. A check which is cancelled acciden- 
tally may be restored. 

One deposit is allowed per account per 
day. A deposit entry consists of date, 
amount and income codes. 

When you receive bank statements, the 
program reconciles the balance. This is the 
only point at which it is easy to obtain a 
checking account balance. Normally, to 
find the balance one must note the begin- 
ning balance, obtain a printout of the check 
register, and manually add the total depos- 
its and subtract the total checks. This is a 
lot of work for such an important piece of in- 
formation. 



N EW CLASSICS S OFTW ARE 

239 FOX HILL ROAD DENVILLE NEW JERSEY07834- TELEPHONE 201-625-8838 

PASCAL 80 by Phelps Gates 

"If anyone could devise a good PASCAL system for the TRS-80® it was 
Phelps Gates. I am happy to report he has done just that." 
BYTE, Dec. 1981, pg. 304 

"After trying out... (the competition) I found myself using PASCAL 80 ex- 
clusively. " Creative Computing, Nov. 1981, pg. 96 



PASCAL 80 is the friendliest 
PASCAL available anywhere! 
Monitor, editor, and com- 
piler are in memory at the 
same time, avoiding time 
consuming and annoying 
disk access and disk 
switching. Yet, it uses 
standard PASCAL syn- 
tax and leaves 23K of 
work space in 48K 
(32K at run time). 




Credit card orders: (201) 625-8838 



PASCAL 80 has 14 digit ac- 
curacy and requires a 48K 
TRS-80® with one disk 
drive. It comes in a binder 
with easy and complete 
user instructions for $99. 
Add $2 shipping and 
handling per order and 
specify Model I or 
Model III. 



NEW CLASSICS SOFTWARE 
239 Fox Hill Road 

Denville, NJ 07834 



(PASCAL 80 docs not implement variant records, pointer and window variables, 
or functions and procedures used as parameters.) 
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"A most unusual feature 

is the ability to transfer files to VisiCalc." 



After the monthly statement is reconciled, 
the cancelled checks and deposits are 
cleared off the disks. Only the totals are re- 
tained in the income and expense ac- 
counts, not the actual transactions. At the 
end of the year, a final clearing gives totals 
for the whole year in each account. 

Maxi CRAS 

Like Checkwriter-80, Maxi CRAS is initial- 
ized by deciding on expense and income ac- 
count titles. It is wise to include a few empty 
accounts in case more are needed later. 
After you enter accounts, obtain a printout 
for reference when entering transactions. 

A unique feature is this program's ability 
to allocate a check, in one transaction, to 
more than one expense category. For exam- 
ple, a check to an office supplies store 
might be for a desk and envelopes. You may 
specify the dollar amount for each cate- 
gory, perhaps $1 50 for the desk, assigned to 
the account for office equipment, and $10 
for the envelopes, assigned to office sup- 
plies. You may also allocate to accounts by 
percent or by fractions, rather than actual 
dollar amount. It is not unusual for a single 
check to cover various expenses; this is an 
important feature. Furthermore, individual 
expense entries are saved by the system for 
the entire year, so that the final summary 
lists every item in each expense category. 
This is not true of the other two programs, 
which are cleared monthly and retain only 
expense totals, not the individual entries. 

Check entry involves typing the payee, 
amount and purpose of the check. You type 
a check number if you write the check man- 
ually. For printed checks, you enter the 
starting number at printout time. The ex- 
pense account(s) are chosen by account 
number, but their names do not print on the 
screen, so it is easy to make an error and 
not notice it. To correct an error, the entire 
transaction is erased and you must begin 
again. During check entry, the balance is 
available at any time— an important con- 
venience, particularly for personal use. 
Check entry is made as rapid as possible by 
liberal use of default values when you press 
Enter. For example, the date has to be typed 
only if it is different from the current date, 
and even then only the day, not month and 
year. 

If you find an error after a check has been 
written to disk, it is not possible to alter or 
delete the check. A memo transaction is 
created to fix the error. If you do not find the 
error until after the check is printed, the 
check may not be reprinted. The advantage 
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of this system is that all entries are perma- 
nent and cannot be maliciously or inadver- 
tently altered. For personal use, however, 
the system is not as simple as Checkwrit- 
er-80's check edit function. 

The program maintains a payee and ad- 
dress file quite different from Checkwrit- 
er-80's. The limit in each file is 40 names or 
addresses (75 on the Model II). You may use 
either file, both or none, depending on your 
needs. A business or individual printing 
checks would want both files. A person 
writing checks manually would never need 
the address file, but might want to use the 
payee file to increase the speed of check 
entry. The payee file automatically prints 
the purpose of the check on the proper line. 
Both of these files are accessed not by a 
code number, but by an exact match with 



"The purpose of 

Check Register Plus 

is somewhat 

different from the 

other two programs.' 



the first line of the typed entry. Whether or 
not these files are used, the amount of disk 
space used by the transaction is the same. 
A most unusual feature is the ability to 
transfer files to VisiCalc. Account titles are 
placed on each VisiCalc row, and account 
balances are entered in the columns (one 
per month). This type of interaction be- 
tween programs is a great time saver, but is 
almost never seen in programs produced by 
different companies. The author should be 
congratulated for incorporating this trans- 
fer function. 

Check Register Plus 

The purpose of Check Register Plus 
(CRP) is somewhat different from the other 
two programs. It is actually a general ledger 
program, whose function is solely to chart 
the flow of money, not to balance the check- 
book. As such, it does not have any of the 
checkbook features of the other two pro- 
grams, and it does not print checks. 

Surprisingly, this is the only program of 



the three which has password security. The 
security is on three levels, and passwords 
may be easily changed by the person hav- 
ing the top-level password. This is also the 
only program which does not allow back-up 
of the program disk. CRP is shipped with a 
back-up disk provided by Softco. If the orig- 
inal disk is harmed, the back-up may be 
used while you wait for replacement at no 
charge. The programs also may not be list- 
ed. I would feel more comfortable with this 
system if the program disk could be write- 
protected. However, during operation the 
program disk is used as a back-up for data 
before posting. Since the program disk is 
used regularly for write as well as read, and 
must remain in the drive whenever the pro- 
gram is in use, eventual damage to the disk 
seems likely. As long as Softco will replace 
it at no charge, however, it is difficult to ob- 
ject to their policy. 

The CRP manual is well written and nice- 
ly presented, with important points well 
marked. However, at the end the reader may 
still have some unanswered questions, 
such as, "How do you handle income?" In- 
come is never mentioned in the manual. The 
sample data provided with the program lists 
one income account, so it must be possible 
to use the program to track income. One 
way to do so is to enter any income via the 
check-entry choice, but place a D for depos- 
it in front of the check number. Deposits 
can be allocated to various income ac- 
counts and placed on a separate printout. 
Since the program does not maintain a 
checkbook balance, this system works. But 
it would have been helpful to have some 
suggestions in the manual. 

CRP allows the user to choose his own 
account categories, or the samples provid- 
ed may be used. Each account may be as- 
signed to any of five printouts. The user 
chooses the headings for the printouts; if 30 
income accounts were needed, a printout to 
list and total these can also be obtained. 
The program automatically sorts alphabet- 
ically on the account number, so it is helpful 
to group similar expenses and give them se- 
quential account numbers. 

Because the program does not maintain 
a checkbook balance, cash entries can be 
handled as easily as checks. Check num- 
bers may contain letters, so entries which 
are not real checks can be flagged with a 
code letter. There is also no reason why a 
single check has to be a single entry. A 
check can be broken up as #1415a, 1415b 
and so on to allocate different portions of 
the check to different accounts. 
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SPECTRAL ASSOCIATES, the LEADER in TRS-80 Color Computer software, presents the best in 
machine language, fast action, high resolution arcade games. 




COSMIC INVADERS 

The best invaders type game avail- 
able. Complete with 16 skill levels, 
dynamite sound and 4 color hi-res 
graphics. Can you dodge the 
bombs long enough to blast the 
alien ship and invaders? Extended 
BASIC not required. 1 6K • $21.95. 




An exciting version of the popular 
PAC-MAN game with power dots, 
8 bonus shapes, super sound and 
16 skill levels. Hours and hours of 
challenging fun. Does not require 
Extended BASIC. Joysticks. 16K 
-$21.95 
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SPACE WAR 

Maneuver your spaceship through 
the defenses of the Death Star for 
the killing shot while avoiding space 
mines, enemy ships and the gravity 
pull of the BLACK HOLE. Two 
color hires graphics - does not re- 
quire Extended BASIC. Joysticks, 
16K - $21.95. 



COSMIC SUPER BOWL 

An excellent simulation of the 
popular handheld football games 
with a cosmic flavor. You must 
maneuver your player through a 
field of defenders. Five action skill 
levels. Does not require Extended 
BASIC. 16K - $14.95. 



EXTENDED BASIC GAMES 

SPACE TRADERS 5 14.93 

Galactic trading game 

BATTLEFLEET $14.95 

Battleship search game 

YAHTCEE $12.95 

Yahtzee type dice game 

LOTHAR'S LABYRINTH . $ 9.95 

Word search game 

LASER ATTACK $10.95 

Defend cities from lasers 

SOB HUNT $12.95 

Submarine attack game 



UTILITIES 

EDITOR/ASSEMBLER $34.95 

SUPER MONITOR 19.95 

EPROM PROGRAMMER 89.95 

(Program your own ROMs for the ROM PAC port) 

MAGIC BOX 24.95 

l oad MOD l/lll Basic Tapes into color computer 




ROBOT BATTLE 

Can you dodge the never ending 
horde of robots while avoiding the 
fatal touch of the Android? Realistic 
voices and 16 skill levels provide a 
tremendous arcade type challenge. 
Does not require Extended BASIC. 
Joysticks. 16K - $21.95. 




GEOGRAPHY PACK 

Great Geographical mind challeng- 
ers. You must identify the country/ 
state, capital, industry, etc. tor the 
U.S.. Europe, Asia, Africa and 
South America. Written in Extend- 
ed BASIC. $9.95 each, all 5 for 
$29.95. 



LPRINTER VII DRIVER $9.95 

Send any graphics page to L.PVII. Works in 4K. I6K 

or 32K machine Does not need Extended BASIC and 
allows scaling of drawings. 



MACHINE LANGUAGE GAMES 

• COLOROUT $12.95 

Fast action breakout game 

• CROID $12.95 

Artificial intelligence game 



SPECTRAL 

ASSOCIATES 

145 Harvard Ave. 

Tacoma, Washington 98466 

(206) 565-8483 

WRITE FOR COMPLETE 
CATALOG 

ADD 3% FOR SHIPPING MO COD 

VISA OR MASTERCHARGE ACCEPTED 



THE FACTS 

At last a complete description of the 
"guts" of the Color Computer. Specs 
on all of IC's complete schematics, 
theory of operation and program- 
ming examples. 

$14.95 



KEYS OF THE WIZARD 

Brand new super adventure filled with 
hundreds of rooms, glittering treasures and 
smart creatures which will follow you 
throughout the adventure. Plenty of tricks, 
traps and puzzles which change with each 
new game. Cassette save feature built in. 
Written in machine language. Extended 
BASIC not required. 1 6K - $ 1 9 



MEMORY EXPANSION 



^119 



RAMCHARGER 

• Tor oid style 
color computers 

• Extend memory 
from 16K to 32K 



DYMOCHARGER 

• For new style 
color computers 

• Extend memory 

from 4K or 16K to 32K 



100% compatible with Extended Basic 
No soldering or modifications needed 
Fits inside computer 
$79.95 • $79.95 




i^See List ol Advertisers on page 386 



80 Microcomputing, June/July 1982 • 341 



"Assuming all three programs are 
compatible with your equipment, 
the choice will largely be 
dictated by the intended use." 



The program has a particularly effective 
method of handling dollar entries. As you 
type each digit, it is printed on the right side 
and pushed left by the next digit. The deci- 
mal point is already on the screen and does 
not need to be typed. Errors may not be cor- 
rected at the time of check entry (except for 
payroll checks), but may be corrected later 
with the check-edit feature. 

CRP maintains payroll totals. Each pay- 
roll check must still be calculated by hand, 
but you may then enter the check and its 
deductions in the program, where totals ac- 
cumulate for quarterly reports. You may 
also obtain a printout of W2 forms, if an ex- 
tra module is purchased ($50). This section 
is time consuming to use if you make an er- 
ror. You enter the net amount of the check, 
with an uppercase P in front of the check 
number. The gross amount and four deduc- 
tions must then be entered: FICA, federal 
tax, state tax and other. If the check doesn't 
balance, the transaction is invalid and the 
entire entry must be retyped. A business 
with 20 or more employees would probably 
already be using a separate payroll pro- 
gram. Very small businesses, however, 
might find the module useful. 

At regular intervals (usually once a 
month), the checks must be posted to the 
accounts. A back-up of the check data is au- 
tomatically made on the program disk be- 
fore posting occurs. If anything goes wrong 
during posting, the accounts may be re- 
stored to their former condition, which 
makes error correction easier. As in Check- 
writer-80, posting accumulates totals in 
each expense account. The individual en- 
tries are not retained. Files are cleared after 
a successful posting. 

Reports 

In programs such as these, the reports 
are the most important part. At the very 
least, they are used to prepare income tax 
returns, but are probably also used on a 
monthly basis to review the status of the 
business. In general, the more different 
types there are, the more useful the pro- 
gram will be. All three programs print a list 
of the accounts for reference, in order by ac- 
count number. 

Checkwriter-80 provides a list of payee 
names/addresses, sorted by number and by 
name. Every time the program is run the 
check-register statement should be re- 
quested. It includes a list of which expense 
categories have been used during the peri- 
od, and how much was allocated to them. 
There is also a list of each check and depos- 



it, in order of entry, showing payee, date, ex- 
pense account number, amount, status and 
totals. Finally, there is a checkbook recon- 
ciliation statement, which lists and totals 
checks which are cancelled and checks still 
outstanding. Then it determines if the bank 
balance and program balance are in agree- 
ment. At the end of the year, a printout of 
the expense category list shows totals allo- 
cated to each category for the year. Of 
course the program also prints the checks 
using Trinity Form Co. # MPC 3-1 or MPC 
3-2 checks. 

The check register printout for Maxi 
CRAS is somewhat different from Check- 
writer-80 in that the amount is not printed 
on the same page as the payee. There is a 
list of check numbers, payees (payors for 
deposits), and descriptions of the check or 
deposit on one page, and then the amount 
paid or received listed in order, with running 
balance, on another page. This report is 
designed to be placed in a notebook with 
one page on the left and one page on the 
right, providing a 160-column printout. 
There are also reports of the accounts file, 
payee file, and address file for user conveni- 
ence when entering transactions. 

Maxi CRAS places great emphasis on 
tracing expenses. You may enter a brief de- 
scription of each check, as well as a longer 
(64 characters) note on the transaction. The 
brief descriptions shows up on the check 
register printout, and the notes may be 
retrieved on a separate printout. Checkwrit- 
er-80 does not allow any comments about 
transactions. 

Maxi CRAS also has an account distribu- 
tion statement for each month, listing the 
payee/payor, amount, account number to 
which it was assigned and account name. 
Another report lists the monthly subtotals 
for each account and current account bal- 
ance. Printouts of individual accounts may 
also be requested for any range of months. 
This audit trail shows all transactions as- 
signed to that account, what the transac- 
tion was for, check number, amount and 
running subtotal. If errors were made, the 
memory transactions which corrected them 
appear on the printouts. 

As in Checkwriter-80, Maxi CRAS prints a 
bank reconcilliation statement and in- 
dicates any unbalanced condition. Checks 
are printed using NEBS form 9020. 

Check Register Plus gives the user more 
control over what is printed on a report, but 
there are fewer report types available. When 
setting up the accounts, the user specifies 
which reports will include each account. 



There are five possible reports, all identical 
in format, but having user selected heading 
and contents. Each of the five lists the ac- 
count name, account number and amount 
charged to that account with a page total. 

There is also a check-register printout, 
showing each transaction, the account 
number to which it was assigned, amount, 
and payee. 

The quarterly payroll reports show em- 
ployee name, gross, net, YTD gross, state, 
Federal, FICA and other. Totals of all these 
categories are then reported, and it shows 
the employer's share of FICA, FUTA and 
SUTA (based on percentages entered by the 
user). 

A very welcome feature of the report sec- 
tion of this program is an on-screen mes- 
sage advising how to abort a printout. With 
the other two programs, a printout is abort- 
ed at your own risk via Reset with Maxi 
CRAS or Break with Checkwriter-80. Al- 
though the author of Maxi CRAS has in- 
formed this reviewer that pressing Reset 
does no harm, I prefer an abort within the 
control of the program, suchasCRPallows. 

A minor annoyance is that the printer 
goes to top of form with every request for a 
printout. If you are obtaining several print- 
outs in one session, this is annoying, not so 
much because of the waste of paper as the 
delay while a sheet is fed through un- 
necessarily. 

Conclusion 

The comments in the chart summarize 
some of the differences in the programs. 
Assuming all three programs are compati- 
ble with your equipment, the choice will 
largely be dictated by the intended use. If 
you wish the program to maintain the 
checkbook, choose between Checkwrit- 
er-80 and Maxi CRAS. Of these two, bear in 
mind that Maxi CRAS allows many more in- 
come/expense accounts, whereas Check- 
writer-80 allows multiple bank accounts. It 
is possible to use Maxi CRAS for more than 
one bank account, however, by maintaining 
separate sets of disks for each account. 

If you want quarterly payroll data main- 
tained, the logical choice is CRP. It also 
allows the greatest total number of ac- 
counts and has password security. 

For personal use, any of the three are ac- 
ceptable, but probably Maxi CRAS would be 
the most satisfactory, principally because 
the account balance is always available, 
the checks may be assigned to multiple ac- 
counts, and each transaction is stored for 
the year.B 
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Bayesian 

Investment 

Services 

Send $1.00 for 

instructive catalog 
with sample output 
of TRS-80* 
investor programs 
written by economist 
Dr. Richard Harriff 
of BIS. 

Stock Timer™ 
Commodity Timer™ 
Option Valuator™ 
Convertible 
Valuator™ 
Portfolio Valuator™ 

Write or call: 



BIS 



757 Santa Rosita 
Solana Beach, CA 92075 
(714)755-6225 

'TRS-80 is a trademark of Tandy Corp. 



PACKER Machine language program that edits all or part 
ot your Basic program to run faster, save memory, or 
ease editing The 5 options include UNPACK— unpacks 
multiple statement lines into single statements 
maintaining logic, inserts spaces and renumbers lines 
SHORT— deletes unnecessary words, spaces, and REM 
statements PACK— packs lines into maximum multiple 
statement lines, including all branches MOVE— moves 
line or blocks ot lines to any new location on program On 
2 cassettes for 16K. 32K & 48K 
For TRS-80 Mod I or III Level II or Disk Basic . . . $29.95 
SYSTEM TAPE DUPLICATOR Copy your SYSTEM format 
tapes Includes verify routines. The Model III version 
allows use of both 500 and 1500 baud cassettes speeds. 

For TRS-80 Model I or III Level II $15 95 

CASSETTE LABEL MAKER A mini word processor to print 
cassette labels on a line printer Includes 50 peel - and - 
stick labels on tractor feed paper 

For TR-80 Model I of III Level II & Printer S17.95 

PRINT TO LPRINT TO PRINT. Edits your Basic program in 
seconds to change all Prints to LPrints (except Print® or 
Print#) or LPrints to Prints Save edited version 

For TR-80 Model I or III Level II S12.95 

FAST SORT ROUTINES: for use with Radio Shacks 
Accounts Receivable. Inventory Control I. and Disk 
Mailing List Systems for Model I Level II Sorts in 
SECONDS 1 You'll be amazed at the time they can save 
Supplied on data diskette with complete instructions 

FAST SORT for Accounts Receivable $19.95 

FAST SORT for Inventory Control I $19 95 

FAST SORT for Disk Mailing List (specify data diskette of 

cassette tor 1 drive system) $14.95 

ALL THREE ROUTINES S44.95 

Prices subject to change without notice. Call or write for a 
complete catalog Oealer inquiries invited VISA and 
Mastercharge accepted Foreign order in US currency 
only Kansas residents add 3% sales tax. 
On-line catalog in Wichita FORUM-80 316-682-2113 
Or call our 24 hour phone (316) 683-4811 or write 
COTTAGE SOFTWARE . 1ft7 
614 N HARDING 
WICHITA. KANSAS 67208 




TEACH YOUR 
CHILDREN 



ALPHA— Our best seller. Enhanced with larger letters 
and three excercises Alphabet recognition for pre- 
schoolers. 



ALPHA II — More alphabet excercises. Find the dupli- 
cate etters; letters before and alter; put in a^pr.a 
betical order. 



SIGMA— Addition problems for grades 1-3. 



SIGMA-EX— Addition problems for the younger or 

slower earner 



SIGMA-82— Addition, subtraction, multiplication and 
division. Nine speed levels. Time left and total time 

constantly displayed. 

SPE-L— Spelling practice for grades 2-4. 



Learning to Count Money — A THREE PROGRAM 
SYSTEM THAT TEACHES THE IMPORTANT SKILL OF 

COUNTING MONEY SUPERIOR GRAPHICS (SOLD 
BY THE SET ONLY.) 



Available on cassette only for TRS-80 Models I and III 
$6.95 each, two for $12.00, four for $21.00 Learning to 
Count Money — $19.95 



Add $1.00 to total order for first class shipment. 

^188 
Mercer Systems Inc. 
87 Scooter lane 
Hlcksvllle, N.Y. I ISO 




BlPPt 



vM 



RGATE CENTURION - A totally original "Real 
" simulation overflowing with superb action sound 
aphics. A 100% machine code masterpiece with 
everything you wanted in a SciFi game: space monsters, 
marauding pirates, military skirmishes, your own fleet 
I ships, dazzling explosions, startling graphics, 
skill levels, and much, much more. (16K System 



RGATE PATROL - A fantastic spinoff from Hyper- 
Centurion with excellent sound & graphics. Com- 
a hypergate patrol ship and navigate the Hyper- 
of the Local Super Cluster in search of danger 
e stop action strategy) 
th games oni 



DENIABLY THE BEST SCIFI ""■ ^V^^-.W 

Others only dream of such programming, we make it a reality I 

"Real Ask your dealer for Synware Games, or order from us. 

sound The games are compatible with the TRS-80 model I or III. 

i with Specify 16K Level II compatible versions or 32K Disk 

isters, compatible versions on cassette (user transfers from 

l fleet cassette to disk). 

iphics. Postage paid in USA & Canada. Foreign orders add $2.00 

ystem f or postage. COD orders $3.00 extra. Florida residents 

add 4% sales tax. ' . ' v ;• •• ' •• ■■ ■*- ■ ■ : ■■ "■';""" " 

^"""'" Send check or money order to: 

Synergistic Solar, Inc. 

P.O. Box 560595 

Miami. Florida 33156 



notch games. For free catalog 



^*^^^^'rW^^»^™VW , l^^'S 



DEALER INQUIRIES MOST WE* 

TK*-JM Is a t radoma rfc of Tandy ! 



GENERAL 



RAM, that is, on your Model III 



Expand it— Burn it 



Colin Alexander 

28 Gladys 

San Francisco, CA 94110 



With 4116 RAM chips reach- 
ing bargain basement 
prices, I couldn't resist the urge 
to upgrade my Model III to its 
full 48K capability. 



For about one-sixth the cost 
of a Radio Shack memory kit 
(not to mention the required in- 
stallation fee), you can install 
your own RAM in 16K incre- 
ments! Your Radio Shack war- 
ranty is voided when you break 
the seal, but with patience and 
common sense, installing RAM 
is not difficult. The logic board 
in your Model III stands at the 
rear of the cabinet and is fully 
socketed for easy RAM expan- 
sion. I highly recommend the 
purchase of an IC Inserter/Ex- 
tractor set (Radio Shack #276- 



1574) to protect the sensitive 
RAM chips from static dis- 
charge and bent pins. When 
shopping for the memory kits, 
be sure to find a supplier of only 
prime 41 16 chips correctly rated 
for Model III operation (200 nS.). 
After your new memory is 
safely implanted, you will un- 
doubtedly want to test it for 
possible defects. I found myself 
in the same situation and after a 
fruitless search for a Model III 
memory test program either for 
sale or as a published listing, I 
modified the Model I RAM Test 



program from the March 1980 
issue of 80 Micro. 

The listing is Mr. Chepko's 
original program modified for 
the Model III with at least 16Kof 
memory. RAM chip designation 
has changed in the Model III but 



The Key Box 

Level II Basic 
Model III 
16K RAM 
Printer required 



100 CLEAR(21) :CLS:PRINTTAB(16) "*** MODEL III MEMORY TEST ***":PR 

INT 

130 DEFINTA-Z 

135 S=PEEK(16562) :POKE30005,S 

140 PRINT: PRINT'THIS PROGRAM WILL TEST FOR RAM STORAGE ERRORS IN 
A MODtL III (16K OR LARGER). MEMORY CAPACITY IS MEASURED BY 
THE PROGRAM, AND ALL UNUSED RAM WILL BE TESTED. EACH PHASE 

F THE TEST WILL APPEAR ON YOUR CRT." 

240 PRINT:PRINTTAB(15) ****** ACTIVATE PRINTER *****": PRINT 

245 PRINTTAB(16) : INPUT-CONTINUOUS TESTING (Y OR N) " ;R$: IFR$=" Y"T 

HENPOKE30000,1 

250 PRINT:PRINTTAB(5) :INPUT"PRESS <BREAK> TO STOP PRESS 

<ENTER> TO BEGIN" ;A 

260 LPRINT'BEGIN RAM TEST :" :LPRINT: LPRINT" 16K - PART 1 : " : S=PEEK ( 

30005) :A(1) =196 90 :A( 2) =22498 :IFPEEK( 20000 ) =1THENPOKE3 0000 , 1 

300 'POKE RAM 

330 LPRINT:LPRINT" TEST - A":LPRINT 

340 X=170:Y=85:B$="< POKE 1 " : PRINT:GOSUB440 

350 IFJ=0LPRINT" NO ERRORS. 

370 LPRINT:LPRINT" TEST - B":LPRINT 

380 X=85:Y=170:B$="< POKE 2" : PRINT:GOSUB440 

390 IFJ=0LPRINT" NO ERRORS. 

410 LPRINT" " :LPRINT"TEST OF MEMORY ADDRESSES ";A(l);"TO ";A(2); 

"COMPLETED.": LPRINT: LPRINTSTRINGS ( 20,"*") : LPRINT 

413 'MEM SIZE 

415 POKE16561, 255: P0KE16562,S:CLEAR{ 21). IFPEEK( 25000) O170THENRU 

417 IFPEEK(-163 85)=170ORPEEK(-1)=170THEN420 

418 IFMEM>29000ANDMEM<32000THENRUN800ELSEIFMEM>45000THENRUN900EL 
SE420 

420 LPRINTCHRS (7) : LPRINTCHRS (7) : LPRINTCHRS ( 7) : IFPEEK ( 20000 ) =10RR 
S="Y"THEN423ELSEPRINT:PRINTTAB(15) "RAM TEST COMPLETED. ": PRINT: IN 
PUT"RE-TEST: PRESS <ENTER> STOP: PRESS <BREAK>";A 

422 'RE-START TEST 

423 RUN425 

425 POKE16561,255:POKE16562, (PEEK(20005) ) : CLEAR (21) : S=PEEK ( 20005 
) :POKE30005,S:POKE25000,0:POKE32766,0:POKE-163 85,0:POKE-1,0:GOTO 
260 



430 'SET BIT PATTERNS 

440 J=0:FORI=A(1)TOA(2)STEP2 

450 POKEI,X:POKEI+l,Y:PRINTI;B$, 

4 Sit NEXT! 

470 'PEEK X 

480 Z=X:FORI=A(l)TOA(2)STEP2 

490 B=PEEK( I) iPRINTI;": PEEK X" , : IFBOZGOSUB570 

500 NEXTI 

510 'PEEK Y 

520 Z=Y:FORI=(A(l)+l)TOA(2)STEP2 

530 B=PEEK(I) iPRINTI;": PEEK Y" , : IFBOZGOSUB570 

540 NEXTI 

550 RETURN 

560 'BAD BIT 

570 LPRINTCHRS (7) : J=J+1: FORK=0TO7 

580 E=INT(B/2[K)-2*INT(B/2[ (K+l)) 

590 D=INT(Z/2[K)-2*INT(Z/2[ (K+l)) 

600 IFE=DGOTO650 

610 LPRINT: LPRINT'BIT #" ;K; "INCORRECT AT ADDRESS";I 

620 'BAD CHIP 

625 IFI>17385LPRINT" RAM CHIP U" ; 14-K; "DEFECTIVE" :GOTO650 



RAM CHIP U";50-K; "DEFECTIVE" :GOTO 



630 IFI>-16385ANDK-lLPRINT" 

650 

640 LPRINT" RAM CHIP U" j 32-K ; "DEFECTIVE 

6 50 NEXTK: PRINT" ": RETURN 

699 '16K HIGH RAM 

700 POKE16561,225:POKE16562,87:CLEAR(21):A(l)-22499:A(2)=32766:S 
=PEEK(3000 5) :POKE20005,S: IFPEEK ( 30000 ) -1THENPOKE20000 ,1 

720 LPRINT"16K - PART 2:*:GOTO330 

799 '32K TEST 

800 POKE16561,253:POKE16562,127:CLEAR(21) :S-PEEK(20005) : A(l) — 32 
768:A(2)=-16385 

820 LPRINT"32K - RAM BLOCK 2:":GOTO330 

899 '48K TEST 

900 POKE16561,253:POKEl6562,127:CLEAR(21) :S=PEEK (20005) :A(D— 32 
768:A(2)=-1 

920 LPRINT"48K - RAM BLOCKS 2 & 3:":GOTO330 



Program Listing 
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the addressing scheme remains 
the same as that in the Model I. 
Unlike the original program, you 
need not reserve memory when 
you turn on the computer and 
you are not restricted to testing 
high RAM. When you run the 
program, it not only measures 
available RAM in your system, 
but also automatically reserves 
and releases space during ex- 
ecution. It will test all addresses 
unused for program storage, the 
operating system or string 
space— even within the first 
16K! 

Another useful modification 
is the option for continuous or 
single testing. Should you 
choose continuous testing, the 
program will re-cycle until you 
press the Break key. 

For Model III owners without 
printers, simply change all 
LPRINTs to PRINTS and insert a 
pause routine (see lines 420 and 
250) in line 640 to prevent scroll- 
ing until you write down crucial 
information. 



Testing a full 48K system 
takes approximately one hour 
and 22 minutes. Since the pro- 
gram is written in Basic, it will 
be easy to modify. Beware— if 
you add any extra bytes to the 
program (or delete bytes from it) 
you will have to change A(1) in 
line 260! The program is packed 
so tightly and memory reserva- 
tion is so precise that byte- 
count is critical. Also you should 
run the program only after initial 
power-up to ensure proper ex- 
ecution. 

The screen displays are easy 
to understand. I have crammed 
much information on the CRT 
for each portion of the test and 
video RAM is hard at work. At a 
glance, you will know exactly 
which phase of the RAM test is 
being executed and the ad- 
dresses being affected. ■ 

Mr. Alexander is a book- 
keeper for Otis Elevator Co. His 
hobbies include archaeology 
and fine and applied arts. 
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Overcome 
CP/M Limitations 



TurboDOS 



• CP'M Compatible Virtually any CPM 
(ver. 2.x) program will run under Tur- 
boDOS without modification. Fully media 

compatible? with standard CP M-tormat 
diskettes 

• Spectacular Performance Programs 
run 3-10 times faster than TRSDOS or 

CP'M Benchmark results to 20 times fas- 
ter with some applications, as rested by 
an independent firm. 

• Double-Sided Drive Support Provides 
1.25 MBytes of Storage per 8" double- 
sided, densily disk Intermix combinations 
of single or doubles sided drives on line. 

• Expanded Directories Store more files 

and information per disk 

• Automatic Density Side Recognition 

Detects changes in disk format automati- 
cally Change disks at any time without 
compromising date or 'POOS Read- 
Only ' errors 

• Fast Disk Backup Copy an 8" SS DD dis- 
kette (61 OK) in loss than 80 seconds. 



The Professional 
CP/M-Compatible 
Operating System 

Copy a double sided/density diskette 

(1 .25 MBytes) in under 1 min. 45 sec. 

• Hard Disk Drive Support Supports large 
hard disks in excess of 1,000 MBytes 
without partitioning. 

• Advanced Utilities Complete set of disk 
utilities, system date and time functions, 
communications channel interface, and 
more included 

• Enhanced Automatic Print Spooling 
Run multiple printers simultaneously. 
Supports multiple queues and printers on 
spooling versions, standard 

• Advanced Mainframe-like Features In- 
cludes read-after-wnte validation oi all 
disk update operations, type- ahead but- 
lers, incremental disk backup utility. 
password/log-on security, system date 
and time functions, accepts string of multi- 
ple commands, and many other 
capabilities not available undei CP'M or 
TRSDOS Multi-use' networking versions 
also available 



Versions for TRS-80 Mod II & Xerox 820. 
Print spooling option $50 additional. 
Adaptable to any Z80-based computer. 

9 



D-R 



DATA-RX, INC. ^ 292 

686 Lighthouse Ave., Monterey, Ca 93940 
(408) 375-2775 



Manual $25 

refundable 

with purchase. 



TURBODOS is the registered trademark of Software 2000 

CP/M. MP/M. and CP/NET are registered trademarks of Digital Research Dealer/OEM Inquiries Invited. 



PMC SOFTWAR 



SPECIAL 
OQSPLU5 

V3.3 

Disk $49.00 
Save $50.00 



PRESENTS 

NEW 
Stellar Escort 

by BIG 5 
Tape 12.00 
Disk 15.00 



Electric Pencil 

PMC version of orig. 
for PMC/Mod I/III 

Tape $24 



UNBEATABLE PRICES! 



BUSINESS 


LIST 


OUR 


LIST OUR 




PRICE 


PRICE 


PRICE PRICE 


SMALL BUSINESS SYSTEMS GROUP 








Accounts Payable (48) 


195.00 


155 00 


It 3 


Accounts Receivable (48) 


195 00 


155 00 


■1,1 


Genera! Ledger (48) 


195 00 


155 00 


rVa 


Inventory Control (48) 


195 00 


155 00 


n/a 


Payroll (48). . : 


195 00 


155 00 


■-, a 


GAMES 








Adventure International 








Armor Patrol 


24 95 


19.00 


1995 1500 


Barlog - Maces and Magic #t 


29 95 


23 00 


n/a 


Conquest of Chestwood 


20.95 


16 00 


1995 1500 


Earthquake San Francisco 1906 (I) 


20 95 


tbCC 


1995 1500 


Eliminator 


24 95 


19 00 


1995 1500 


Lunar Lander 


20 95 


1600 


14 95 1100 


Missle Attack 


20 95 


1 6 00 


14 95 1100 


Mortons Fork - Maces and Magic #3 (1) 


29 95 


23 00 


n/a 


Planetoids 


20 95 


1600 


1995 1500 


Scot Adams Adventure #) #2 #3 


39 95 


3100 


rVa 


Scot Adam's Adventure # 1 « 1 1 * 1 2 


39 95 


3100 


n/a 


Scot Adam's Adventure #4 #5 #6 


3995 


3100 


■i ,i 


Scot Adam's Adventure #7 #8 »9 


3995 


3100 


n/a 


Sky Warrior 


20 95 


1600 


14 95 1100 


Space Intruders 


20 95 


thM 


1995 1500 


Star Fighter 


29 95 


23 00 


24 95 1900 


Star Trek 3 5 


1995 


1500 


1495 1100 


Stone of Sysiphus ■ Maces and Magic »2 (i) 


29 95 


23 00 


n/a 


Big Five 








Attack Force. 


■•■<■'■ 


15 0" 


1595 1200 


Cosmic Fighter 


'-t'i:- 


15 CC 


1595 1200 


Defense Command 


1995 


■sec 


1595 1200 


Galaxy Invasion 


It! si 


•:,:'!. 


1595 1200 


Meteor Mission 


1995 


1500 


1595 1200 


Robot Attack . . . 


is 95 


">'(' 


1595 1200 


Super Nova 


1995 


•t ; :;r 


1595 1200 


Cornsoft 








Scarfman 


'9 95 


•ittt: 


1595 1200 


Space Castle 


19.95 


1500 


1595 1200 


INFORMATION PROCESSING 






Adventure International 








Mam Manager 148) 


9995 


'9-..i:; 


'..■ 


OPERATING SYSTEMS 








Micro Systems Software 








Dos Plus V3 3 (1) . 


100 00 


80 00 


i .• 


UTILITIES 








Howe 








M0N3 (1) 


rtf< 




39 95 3100 


M0N4 (1) . . 


49 95 


3900* 


n/a 


STERM (I) 


n/< 




69 95 55 00 


System Diagnostc 


99 95 


,'9'i-J 


n/a 


WORD PROCESSING 








Michael Shrayer Software 








Electric Pencil (1) 


: '. 




100 00 24 00 


Aspen Software 








Grammatik (1) 


59 00 


46 00 




=r : iol -0:t . 1 


<■-:!.. 


23.00 




Proofreader (1). . . . 


54 00 


42 00 


-. ?. 


Soft- Screen (1) |48| 


69 00 


54 00 


rva 


Soft-Text (1) (48) . 


69 00 


54 00 


rVa 



MISCELLANEOUS 

Box of 10 5'«->nch Diskeites Mtcrosette 25 00 

Box of 10 C-10 cassettes Microsette 750 

Box of 10 C-20 cassettes Microsette 9 00 

Box of 10 C-60 cassettes Microsette 1 ' 00 

Box of 10 C-90 cassettes Microsette 15.00 

Adventure 1 thru 12 - Hints Sheets per adventure . . ' 00 i 
Software runs on PMC/LNW/MOD l/lll 

32K DISK/16K CASSETTE UNLESS MARKED. 



475 ELLIS ST., MT. VIEW, CA 94043 

Order Only CALL (415) 962-0318 
Information CALL (415) 962-0220 



Terms: FOR FAST DELIVERY send certified checks money orders Visa or Master Card number and 
expiration date Personal checks require 3 weeks U S.A sales only PRICES INCLUDE UPS continental 
delivery (do not use P0 Box) CALIFORNIA customers add 6'.?* tax Prices subject to change 



sSee List ■:>' Advertisers on page 386 
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UTILITY 



Machine code into Basic statements. 




John Heusinkveld 
2161 E. Cerrado Brio 
Tucson, AZ 85718 

The worst thing about using 
USR routines is translating 
the code into Data statements 
that can be POKEd into memory. 
Translating very short programs 
is not too bad, but when you 
have to translate several hun- 
dred bytes of code, a mistake is 
bound to happen. Just try check- 
ing five hundred Data elements 
for the one that you left out! 

I decided I needed a program 
for my Color Computer that 



would translate the contents of 
an area of memory into Data 
statements which I could then 
use as part of a Basic program. 
The program would have to 
allow me to specify the area of 
memory to be used, the number 
of elements per Data line, and 
the line numbers of the Data 
statements. I set up the Data 
lines as strings and then print 
them in an ASCII tape file, which 
I can then access using CLOAD. 

My Solution 

The Program Listing shows 
the results of my labor. This pro- 



gram does everything I wanted. 
It asks for the file name under 
which the program is to be saved, 
the line number of the first line, 
the increment between succes- 
sive line numbers, and the start 
and end addresses of the area in 
which the routine is located. The 
program should run under either 
standard or Extended Color 
Basic. 

You must protect the memory 
in which your routine is located; 
otherwise, it may be overwritten 
during string or cassette I/O 
operations. Remember, you do 
not necessarily need to locate 



CLS:CLEAR1000:PRINT"DATA GENERATOR" : PRINT'BY JOHN HEUSINKVELD" , "10/3/81" 

INPUT'HOW MANY ELEMENTS PER LINE";EL 

INPUT" INCREMENT"; LI: INPUT" STARTING AT'jLN 

INPUT'PILE NAME"«PT$ 

INPUT" START , END* ; S , E 

INPUT'READY CASSETTE"; P$: OPEN "0" r -l,FTS 

FORX=S TO E STEPEL:L$=STRS(LN)+"DATA":LN=LN+LI 

FORS=0TOEL-1:IFX+S>E THEN90 ELSEL$=L$+MIDS ( STRS (PEEK (X+S) ) , 2) +" , " : NEXTS 

QS=LEFT$(L$,LEN(L$)-1) : PRINT#-1 ,Q$: PRINTQS 
NEXTX 
END 



Program Listing 



the routine in the area in which it 
will be POKEd by the program 
that uses it; I suggest locating it 
in high memory. You could also 
put it in graphics memory if you 
have Extended Basic. 

A final problem is linking your 
main program to the data 
created by Datagen. You can 
CLOAD one and retype the other, 
but this is inefficient. Color Disk 
Basic has a Merge command, so 
if you have a disk or know some- 
one who does, you may be able 
to do a quick, efficient Merge of 
your Basic program and Data 
statements or you can use my 
Color Merge program which will 
appear in a future issue of 80 
Microcomputing. ■ 

John Heusinkveld is a high 
school student. 



The Key Box 

Color Computer 

Extended Color Basic optional 



-ATTENTION ALL TRS-80® OWNERS- 

No matter how your Model I, II or III is used, whether it be business or pleasure, this product can beneln you 

The FATIGUE FIGHTERTM reduces the operator fatigue (irritated, watery eyes arid headaches) caused by the harsh white video 
display thereby making computer use more efficient and/or enjoyable. The graph at the right will help explain how it works 

Superimposed on the standard eye sensitivity curve is the band pass curve o( the FATIGUE FIGHTERTM as recorded by a spectro- 
photometer A marker is also on the graph at the ideal psychological tolerance color. As you can see, the green color of the FATIGUE 
FIGHTERTM takes advantage of both eye sensitivity and psychological tolerance to make the display less irritating 

The FATIGUE FIGHTERTM is made of tough !* inch thick acrylic sheet which adds absolutely no distortion or fuzziness to the 
display and is industry proven to be an excellent material for optical filtering (e.g. lenses for laser safety goggles). It installs easily on all 
three TRS-80 ■ models with a pressure sensitive adhesive which will not let the filter fall off yet allows easy removal if necessary. Finally 
the black and silver border design makes it a perfect match tor the computer styling. 

If you want a FATIGUE FIGHTERTM of your own but prefer not to order by mail.check with your local computer stores to see if they 
have them in stock Otherwise follow the ordering instructions below. 

TRS-80 IS A TANDY CORP. TRADEMARK. 

TO ORDER: 

Sent) Name & Address Typed or Clearly Printed with Check or Money 
Order (U.S. FUNDS) lor $14.95 Each. Including Shipping. Canadian 
Orders add $1 00 Each. All Other Foreign Orders Add 52.00 Each lor 
Shipping. NO CREDIT CARD OROERS COO s (U.S. ORDERS ONLY) are 
$2 50 Additional Per Order S ate Accepted by Mail or by Calling 
904-378-2494 9-5 MF. Florida Residents Add 4% Sales Tax 
MAIL ORDERS MUST BE SENT TO THE US ADDRESS. 



-DEALER INQUIRIES INVITED- 




SOUTHERN INNOVATIVE DESIGN 
1520 NORTHEAST 12TH STREET 
GAINESVILLE, FLORIDA 32601 



-CANADIAN DEALERS ONLY- 

For pricing and ordering information contact: 

MICRO-COMP ENTERPRISES INC., 955 Brock Rd S, Unit 3 

Pickering. Ontario LI W 2X9 Phone:416-839-4561 




i" i r— r — r 

Violet Blue Green Yellow Orange Red 
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Let your TRS-80' do the proofreading on 
your SCRIPSIT text files!! 

Features of this program include: 

• Complete dictionary maintenance in- 
cluding the addition and deletion of 
words 

• Menu driven for ease of operation. 

• Spelling Checker 

• FREE expanded dictionaries avail- 
able, depending on your drive 
storage capabilities. 

NEW LOWER PRICE $59.95 



on Software and Hardware for 

TRS-80 



(All 48K with TANDON drives) 

1 single sided 40 track drive $1 695. CO 

2 single sided 40 track drives 1 895.00 

• dual sided 40 track drive 1 820.00 

2 dual sided 40 track drives 21 45. OO 

2 single sided 80 track drives 21 75.00 

2 dual sided 80 track drives 2395.00 

with RS-232 C Add 1 1 5.00 

The above computers include NEWDOS 
80 Version 2.0. 

NOTE: These Model III computers contain Apparat 
installed disk drives and memory. They are warranted 
Apparat Inc for 90 days. 




MISCELLANEOUS SUPPLIES 

DISKETTES 

Double density-soft sectored-replacement guaranteed. Spindle/Hub 
protected. (5W only) 

Verbatim Datalife 5>/»" 40 track $24.95 

Apparat's No Name 5V«" 40 track ST9.95 

Verbatim Datalife 8" model II $39.95 

PAPER 

9'/2"x11" blank white, tractor feed paper, full box 15# or 20#.. . $24.95 

14Vj"x11" green bar. tractor feed paper, full box $34.95 

3'A"x1 5/1 6" tractor feed mailing labels $1 9.95 

OTHER 

5'/i" plastic library case $ 1 .95 

8" plastic library case $ 4.95 

5 V Flip-sort $1 8.95 

8" Flip-sort $31 .95 

1 6K memory kits $1 9.95 



SPECIAL - FREE GRAFTRAX 

with EPSON MX-80 Printers 

MX-80 $499.00 

MX-80F/T $575.00 
with Graftrax, add $79.95 

MX-100 $775.00 

Printer Cables $24.00 
(Specify Computer Type) 

WE ALSO STOCK OKIDATA& NEC PRINTERS 
CALL FOR PRICES 



APPARAT'S PROM BLASTER 

An eprom programmer for all 25 X X and 27 X X chips. TRS-80* 

MOD I & III $149.00 

CABLE $ 1 7.95 

BUS EXTENDER 

mini version with 2 card slots and no enclosure $ 69.95 





ASSORTED ITEMS OF INTEREST 

MICRO CLINIC, Mod I $24.95, Mod III $29.95 

The ultimate in memory & disk diagnostics 
MEAL MASTER, Mod I & III Disk $24.95 

meal planning & grocery shopping aid 
FLEXTEXT/80 (requires Graftrax) $34.95 
ultilize the additional features of the MX-80 

printers under model I & III scripsit 

MICRO ACCOUNTING SYSTEM, $479.00 

Interactive G/L, A/R, A/P & checkbook manager 

UNITERM/80, $89.00 

Universal terminal program that takes advantage 

of the extended NEWDOS/80 commands 

BASIC BETTER & FASTER BOOK, $23.95 



NEW LOWER PRICES ON 
TANDON DISK DRIVES 

Complete with power supply, chassis & configured for 
TRS-80® Model I or III 

Single sided 40 track $285.00 

Dual 40 or Single 80 track $41 5.00 

Dual sided 80 track $51 5.00 

Special - 2 Dual sided 80's $999.00 

(ADDS ALMOST 15 MEGABYTES OF STORAGE 
TO A D D. MOD I OR A MOD III) 



MODEL I DOUBLE 
DENSITY PACKAGE 

Converts a standard TRS-80 Model I 
to Double Density. 
ApparatDoublerS NEWDOS/80V2.0. 
$278 00 value for oniy $21 9.00 
Doubler alone $129.00 




MM 



n^wuv/dou 



Version 2.0 



The most sophisticated DOS ever pro- 
duced for the TRS-80" 1 Models I and III. It 

provides the user with "MAINFRAME" 

power on a "MICRO". 

Some Features available are: 
Jobstream Control Language 
Mod I/Mod III Diskette interchangability 
Double Density Support on Model I 
Pagenation of BASIC listings on the screen 
Basic program single stepping 
Dynamic variable manipulation 
Multiple array sorts with BASIC CMD 
Complete technical support provided 

All this plus much more for only 
$149.00 



InfofflDTld 

Software Report Card 

NEWDOS/80 
Version 2.0 



Performance 
Documentation 
Ease of I s« 
Error Handling 



« M 

o. u. o w 

aane 
d a d 
o a q 

□ D D 



V ;V\; 








mgmm 



:omput 

Tamarac Pkwy • Denver. CO 80237 • (303) 741-1778 • (800) 525-7674 

Scnpsit & TRS 80 are a registered trademark of Tandy Corporation 
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■ See List of Advertisers on page 386 
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GENERAL 



HMD 



LOAD 80 



Schedule your work projects. 




Jeff Rosen 

985 Torrey Hill Drive 

Columbus, OH 43228 



III give you 30 days to complete 
this project! Be done by June 
25th or else. . .! 

Demands such as these are 
common in the business world; 
now your TRS-80 can help you 
meet them. My Project Calendar 
program will print a planning 
calendar for any type of activity. 
In addition to the month, day, 
year, and day of the week, the 
calendar includes counts of the 
number of calendar days, and 
work days elapsed and remain- 



ing. You can include or exclude 
weekends and holidays from the 
work day counts. 

If you are currently using a 
project scheduling aid (such as 
CP/M or PERT) which provides 
the day number on which vari- 
ous activities should begin or be 
completed, the Project Calendar 
program will assign the day 
numbers to actual calendar 
dates. 



The Key Box 

Basic Level II or 
Disk Basic 
Model I or III 
16K RAM 



AS 


User responses 


DAY 


Days elapsed counter 


DAYS 


Array tor names of days (Sunday, Monday, and so on) 


dcn: 


Total number of days to be printed 


HCNT 


Number of holidays defined 


HDAYS 


Holiday dates (form = mmddyy) 


HOL 


>-.-:, •■!. ■•■;..!■..;,::; ■■;:: >■: '' • ■<„ ; - \oc 


MDAY 


Day of month 


MNTH 


Month number (1- 12) 


MO$ 


Array contains names of months and their lengths 


P$ 


Print using format 


PG 


Page number 


PROJS 


Project name 


PWDAYS 


Work day number in string format (blank for non-work days) 


RCDAY 


Calendar days remaining 


RMS 


Remarks, contains word holiday on holidays 


RWDAY 


Work days remaining 


S2W 


Switch which bypasses printing on dry run 


SAT 


Switch indicates if Saturdays are work days 


STP$ 


Ending date of calendar if specified by user 


SUN 


Switch which indicates if Sundays are work days 


sw 


Switch indicates option selected for ending calendar 


WDAY 


Work day counter 


WEEK 


Day of week number (1-7) 


YEAR 


Calendar year 


All other variables are temporary holders or counters 




Table 1 



How the Program Works 

The program prompts you for 
the start date of the project and 
its duration. You may specify 
the duration as the number of 
work or calendar days, or alter- 
nately you may specify an end- 
ing calendar date. The computer 
also allows you to enter a proj- 
ect name to be used as the title 
of the calendar. 



The program will ask you 
whether to include Saturdays or 
Sundays as work days, and you 
can specify as many nonwork- 
ing holidays as necessary. Now 
the program has all the informa- 
tion it needs to generate the 
project calendar. 

Depending on the option you 
select for specifying when the 
calendar will end (number of 
calendar days, work days, or 



Program Listing 



100 CLEAR3000:DEFINTA-Z:DIMDAY$(7) ,MOS(12,2) 

110 REM***LOAD MONTH NAMES, MONTH LENGTHS, AND DAY NAMES*** 

120 F0RX=1T012:READM0$(X,1) ,MOS(X,2) :NEXTX : F0RX=1T07 : READDAYS (X) 

:NEXTX 

130 DATAJAN,31,FEB,2 8,MAR,31,APR,3 0,MAY,31,JUN,3 0,JUL,31,AUG,31, 

SEP, 30, OCT, 31, NOV, 3 0, DEC, 31, MONDAY, TUESDAY, WEDNESDAY, THURSDAY, FR 

IDAY , SATURDAY , SUNDAY 

140 P$ = "MM % % % % % % M ###* MM MM % 

%" 
150 REM***INPUT PROJECT NAME AND START DATE*** 
160 CLS: INPUT" ENTER PROJECT NAME";PROJS 

170 PRINT: PRINT-ENTER DAY #1 OF PROJECT" : INPUT'MONTH (1-12) ";MNT 
H:INPOT"DAY (1-31) " ;MDAY: INPUT"YEAR ( 4 DIGITS) " ;YEAR: F0RX=1T07:P 
RINT X") *DAYS(X) :NEXTX:PRINT"DAY OF WEEK (1-7) " :GOSUB690 :WEEK= 
VAL(AS) :IFWEEK<10RWEEK>70RMNTH<10RMNTH>120RMDAY<10RMDAY>31GOT017 
■£ 

180 REM***INPUT DURATION IN DAYS OR ENDING DATE*** 

190 CLSsPRINT"DO YOU WANT TO SPECIFY THE NUMBER OF DAYS (1) OR A 
": PRINT" SPECIFIC CALENDAR DATE TO END THE CALENDAR (2) " ; :GOSUB69 
:CLS:IFA$="2"THENSW-0:GOTO210 

200 INPUT"HOK MANY DAYS DO YOU WANT ON CALENDAR" ;DCNT: PRINTDCNT" 
WORKDAYS (1) OR CALENDAR DAYS ( 2) ?" :GOSUB690 :SW=VAL(A$) : IFSW< 
1ORSW>2THEN200 ELSE230 

210 PRINT'WHAT DAY DO YOU WANT TO RUN THE CALENDAR TO (MMDDYY) "; 
-. INPUTSTPS: iFLEN(STPS) 06THEN2 L0 
220 REM***CONFIRM INPUT INFORMATION*** 

230 CLS j PRINT PROJ$ " STARTS ON "DAY $ (WEEK)" " MO $ (MNTH, 1) " "MDAY 
" "YEAR:IFSW>0THENPRINT"CALENDAR IS PROJECTED FOR "DCNT" DAYS":E 
LSEPRINT'CALENDAR WILL END ON "STP$ 
240 PRINT: PRINT'CORRECT (Y OR N) ?" :GOSUB690 : IFA$O"Y"GOTO160 

250 REM***INPUT IF SATURDAY AND 'SUNDAYS ARE WORKDAYS*** 

260 PRINT'WILL SATURDAYS BE WORK DAYS (Y OR N) ?" :GOSUB690 :IFA$ 

="Y"THEN SAT=0 ELSE SAT=1 

270 PRINT'WILL SUNDAYS BE WORK DAYS (Y OR N) ?" :GOSUB690 :IFAS=" 

Y'THEN SUN=0 ELSE SUN=1 

280 REM***DEFINE HOLIDAYS, IF ANY*** 

290 INPUT"HOW MANY HOLIDAYS WILL THERE BE DURING THE PROJECT" ;HC 

NT: IFHCNT=0THEN330 

300 DIMHDAYS(HCNT) 

310 FORX^ITOHCNT 

320 PRINT'ENTER HOLIDAY ";X;" FORM: MMDDYY" ;: INPUTHDAYS (X) : IFLEN 

(HDAY$(X))O6THEN320 ELSENEXTX 

330 GOSUB670 :GOTO710 

340 GOSUB670 

350 CLS:INPUT"ALIGN PAPER. HIT ENTER" ;A$: POKE16425 ,1 :GOSUB630 

3 6 REM ******************************************************** * 

370 REM***START MAIN LOGIC. SW DEPENDS ON OPTION SELECTED IN LIN 

ES 190-200**** 

3 80 REM********************************************************* 
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specific ending date) the pro- 
gram will execute one of three 
possible loops. The first execu- 
tion of the loop computes the 
number of work days and calen- 
dar days in the project in order 
to initialize the days remaining 
counters. This dry run may take 
several minutes depending on 
the duration of the calendar. 

The computer passes through 
the loop once for each calendar 
day, beginning with the first day 
of the project. The day-of-week 
and day-of-month counters are 
advanced by one each time 
through the loop. If the day-of- 
week counter goes over seven it 
is reset back to one. If the day- 
of-month counter exceeds the 
number of days in the current 
month (defined in the MO$ ar- 
ray) it is reset to one and the 
month counter is advanced by 
one. If the month counter ex- 
ceeds 12, it is reset to one and 
the year counter is incremented. 
Each time the year counter is ad- 
vanced, the program determines 
if the new year is evenly divisible 
by four (leap year) and adjusts 
the number of days in February 



accordingly. 

The days elapsed and days 
remaining counters are in- 
creased and decreased by one, 
respectively. The day-of-week 
and date are checked to deter- 
mine if the day is a work day; if it 
is, the work days elapsed and re- 
maining counters are adjusted 
accordingly. 

When the appropriate number 
of days has been processed or 
the desired ending date is 
reached, the dry run is com- 
pleted. Now the days remaining 
counters (which started from 
zero and decreased by one each 
day) represent the number of 
work days and calendar days in 
the project, except they are 
negative. The signs are changed 
to positive via the ABSolute 
value function. 

Now the whole process 
repeats, but this time the calen- 
dar is printed as each day is pro- 
cessed. The program automati- 
cally paginates the calendar. 
Table 1 lists the variables used 
in the program. ■ 

Jeff Rosen is a self-employed 
CPA. His hobby is running. 



390 IFSW=2FOR RCDAY=DCNT-1TO0 STEP-1 : RWDAY=RWDAY-1 : DAY=DAY+1 

400 IFSW=0FORDAY=1TO30000:RWDAY=RWDAY-1:RCDAY=RCDAY-1 

410 IFSW=1F0R RWDAY=DCNT-1T0 STEP-1 :DAY=DAY+1 : RCDAY=RCDAY-1 

420 REH***DETERMINE IF HOLIDAY OR WEEKEND*** 

430 IFHCNT=0THEN460 

440 FORX=lTOHCNT:IFMNTH=VAL( LEFTS (HDAYS(X) ,2)) AND MDAY=VAL (MID$ ( 

HDAYS(X) ,3,2))AND YEAR-1900=VAL (RIGHTS (HDAYS (X) ,2) ) THEN HOL=l:GO 

TO460 

450 HOL=0:NEXTX 

460 IF(WEEK=6 AND SAT=1) OR(WEEK=7 AND SUN=l)OR H0L=1THEN: PWDAY$= 

"" :RWDAY=RWDAY+1:GOTO470 : ELSEWDAY=WDAY+1 : PWDAY$=STR$ (WDAY) 

470 IF HOL=l RM$="HOLIDAY" ELSE RMS="" 

480 REM***PRINT DETAIL LINE*** 

490 IFS2W=0LPRINTUSINGPS;DAY,PWDAYS,DAY$(WEEK) ,MOS(MNTH,l) ,MDAY, 

YEAR, RCDAY, RWDAY, RM$:IFWEEK=7LPRINT" ": IFPEEK ( 16425) >55LPRINTCHR 

S(12) ;:GOSUB630 

500 REH***CHECK FOR LAST DAY IF SW=0*** 

510 IFMNTH=VAL(LEFTS(STPS,2) ) ANDHDAY=VAL (MIDS (STPS , 3 , 2) ) ANDYEAR- 

1900=VAL(RIGHTS(STPS,2) JTHEN610 

520 REM***ADVANCE COUNTERS TO THE NEXT DAY*** 

530 MDAY=MDAY+1:IFMDAY>VAL(M0S(HNTH,2) ) HNTH=HNTH+1 : MDAY=1 : IFMNTH 

>12YEAR=YEAR+1:MNTH=1:GOSUB670 

540 WEEK=WEEK+1:IFWEEK>7WEEK=1 

550 REH***RETURN TO BEGINNING OF LOOP DEPENDING ON SW*** 

560 IFSW=1THENNEXT RWDAY ELSE IFSW=2THENNEXT RCDAY ELSE NEXTDAY 



580 REM' 



590 REM* 



'END OF MAIN LOOP* 



»**»**«*< 



<*.„•»'. * :, * I 



600 REM***PRINT ANOTHER COPY OR END*** 

610 IFS2W=1THEN RETURN ELSE PRINT'DO YOU WANT ANOTHER COPY (Y OR 
N) ?":GOSUB690 : IFAS="Y"THENMNTH=T1 : MDAY=T2 : YEAR=T3 : WEEK=T4 : PG= 
0:GOTO720 ELSEEND 
620 REM***PRINT PAGE HEADING*** 
630 PG=PG+1:LPRINTTAB(62) "PAGE "PG 

640 LPRINTTAB( 20) "PROJECT CALENDAR" : LPRINTTAB( 28-LEN ( PROJS) / 2) PR 
OJ$:LPRINT" " 

650 LPRINT" -ELAPSED- DATE —TO GO-- REMA 

RKS":LPRINT" WORK DAY OF MNTH DAY YEAR WORK":LPR 

INT "DAYS DAYS WEEK DAYS DAYS" : LPR 

INT" ": RETURN 

660 REM***CHECK FOR LEAP YEAR*** 

670 IF INT(YEAR/4)=YEAR/4 THEN MOS ( 2 , 2) =" 29 " ELSE MOS ( 2 , 2) =" 28" 

6 80 RETURN 

690 AS-INKEYS:IFAS=""THEN690 ELSERETURN 

700 REM***SET UP DRY RUN TO DETERMINE TOTAL NUMBER OF DAYS AND T 

OTAL NUMBER OF WORKDAYS*** 

710 Tl =MNTH : T2=MDAY: T3=YEAR: T4=WEEK 

720 CLS:PRINT@400,"***PLEASE WAIT***" : S2W=1 :GOSUB3 90 :WDAY=0:S2 

W=0:MNTH=T1:MDAY=T2:YEAR=T3:WEEK=T4:IFSW=0THENDCNT=DAY:RWDAY-ABS 

(RWDAY) :RCDAY=ABS( RCDAY) : ELSEIFSW=2THENRWDAY=ABS ( RWDAY) : ELSERCDA 

Y=ABS( RCDAY) 

730 DAY=0:GOTO340 



FREE 

business software 
directory 

• Radio Shack's Model I, II, III. 

• Heath's MBASIC and HDOS 

• CPM: Xerox, Alto... 

• IBM Personal Computer 



IDM2 is GREAT !' 



-publisher of 80-US 



" (GL) superior to either the Osborne (SBSG & Taranto) 
or Radio Shack... MAI L-X has a greater capacity... 
more flexible than (R.S.)" 

-columnist ot 80-microcomputing 

"imperceptively fast. ..(DBMS) is a good and reliable 
workhorse" -publisher of Interface Age 

Data base manager, integrated accounting package 
(AR, AP, GL & Payroll), inventory, word proces- 
sing, and mailing list. Compare and be selective ! 



a^ 



Micro Architect, Inc. 

96 Dothan St., Arlington, MA 02174 



A ESI 



fi 




!!NOW AVAIL 

I NDEX 

Sequential 

Access 

Method 



• Get and Put Records to Disk File by "KEY" 

• Read File in Key Sequence Without Sorting 

* Delete Records Without Recopying File 

• Add Records to Disk Files in Any Sequence 

* Variable Key Length From 1 to 50 Characters 

* Machine Language or Basic Subroutines. 

BUSINESS APPLICATION ADVANTAGES 

- Improved Disk Utilization 

- Easier Program Development 

- Improved Operating Characteristics 

- Reduce or Eliminate Sorting 

- Improved Performance 



ISAM SUBROUTINES 
ISAM UTILITIES 



Documentation 

On Diskette $90.00 



NEW! MACHINE LANGUAGE + BASIC SUBS — $140 

— PLUS — Free Mailing List Sample Application 
Add 6% Sales Tax for California Orders 

TRS-80- MODEL I, II, & III and CPM" SOFTWARE FROM: 

Johnson Associates -or- Telephone Order Line 

P.O. Box 3069 ^ For Bank Card Sales 

Redding, CA 96049 (916)221-0740 

WRITE FOR FREE CATALOG 



sSee List ot Advertisers on page 386 
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TECHNIQUE 



Use the interpreter's built-in exits to make modifications. 




J. C. Sprott 

5002 Sheboygan $207 

Madison, Wl 53705 



Having the Basic interpreter 
stored in read-only memory 
(ROM) as the Models I and III do 
is both a blessing and a curse. It 
is nice to have the computer 
ready to go without loading any 
cassettes or disks, but you're 
out of luck if you want to add or 
change something. 

ROM Exits 

The authors of the Basic inter- 
preters anticipated the need to 
modify and upgrade their opera- 
tion. At a number of critical 



places in the interpreter pro- 
gram a Call is executed to a 
location in the random-access 
memory (RAM) where the inter- 
preter previously stored a Re- 
turn instruction during its 
power-up sequence. The inven- 
tive programmer can reroute the 
interpreter to a subroutine to 
make the cassette port beep or 
the cursor blink, for example. 

In the Model I Level II, and 
Model III, memory locations 
16806-16868 contain a block of 
21 such exits. To see what they 
look like, enter the following 
from the Basic command mode: 

>FOR 1 = 16806 TO 16868: PRINT 
PEEK(I);: NEXT 

You should see 201, a machine 
language Return instruction 
(C9H), followed by two bytes of 



10 POKE 16561,254: POKE 16562,108s CLEAR 50: CLS 

20 PRINT "ROM EXIT IDENTIFIER": PRINT 

30 FOR 1-0 TO 5: READ X: FOR J-0 TO 20: POKE 27905+I+6*J,X 

40 NEXT J, I: FOR J=l TO 20: POKE 27907+6*J,65+J: NEXT 

50 FOR 1=28031 TO 28H62: READ X: POKE I,X: NEXT 

60 FOR J=0 TO 20: POKE 1680B+3*J,109 

70 POKE 16807+3*J,1+6*J: POKE 16806+3*J , ] 95 

80 PRINT CHR$(65+J);":"»16806+3*J,: NEXT: PRINT: PRINT 

90 INPUT "BEEP ON WHICH LETTER"; A$: POKE 28035 ,ASC(A$) 

100 DATA 2 45,62,65,195,127,109,50,255,63,254,0,32,23,197,14,99,6 

,9.1 ,62,1, 21 i,2L>5, 16, 2 5 4, 6,91 ,6 2.:..: .11 ,255, L6, 2 54, 13, 32, 237, 193, 2 

41,201 



Program Listing 1 



garbage, repeated 21 times. 
Radio Shack provides the extra 
two bytes so you can replace the 
Return with a Jump, followed by 
the two-byte memory ad- 
dress (least significant byte 
first) where your subroutine is 
located. End your subroutine 
with a Return instruction and 
the interpreter will continue 
merrily along its way. 

Although Radio Shack is no- 
tably secretive about where in 
the interpreter these exits occur 
(ostensibly because they are 
subject to change), enterprising 
programmers have studied the 
ROM routines and written exten- 
sively about them. But why not 
let your computer tell you when 
and where it exits to one of 
these Return instructions? Pro- 
gram Listing 1, a Basic program, 
does just that. 

Exit Identifier Program 

The ROM Exit Identifier pro- 
gram sets its own memory size 



The Key Box 

Basic Level II 
Model I or III 
16K RAM 



(27904) and then loads a 
machine language program in- 
to memory locations 27905 
(6D01H) to 28062 (6D9EH). This 
leaves over 10K for Basic pro- 
grams and almost 5K (in a 16K 
system) in high memory for Sys- 
tem programs. 

The program loads Jump (195 
or C3H) instructions into each of 
the 21 exit points, and prints a 
letter (A-U) in the lower right cor- 
ner of the screen whenever it en- 
counters the corresponding ex- 
it. In addition, you can specify 
that an audio amplifier con- 
nected to the cassette port emit 
a beep whenever a chosen exit 
occurs. 

Upon running the program you 
discover that 16815 (D) is called 
whenever Ready appears on the 
screen. In fact, the program itself 
becomes a useful utility: The 
computer summons you with a 
beep after completing a calcula- 
tion or loading a cassette tape 
and returning to the command 
mode. It continues to work even 
after you delete the Basic pro- 
gram, as long as nothing over- 
writes the protected memory 
locations from 27905 to 28062 or 
changes the Jump instructions 
in the dedicated RAM area 16806- 
16868. You may find, however, 
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that some utility programs load- 
ed previously work improperly 
because they use the ROM exits 
that this program changes. Pro- 
gram Listing 2 is a disassembled 
version of the ROM Exit Identifier 
program. 

Scroll Control 

Let's use this information to 
enhance our computer's opera- 
tion. One of the things that an- 
noys me about the TRS-80 is the 
rapid scrolling when I list a long 
Basic program. I wrote an As- 
sembly program to list one line 



at a time and proceed to the next 
line only when I press a partic- 
ular key. By holding down that 
key I get the complete list in the 
usual fashion. 

The first problem is to find an 
exit from the ROM before or 
after a line of Basic is listed. The 
ROM Exit Identifier program 
shows a jump to the RAM ad- 
dress 16863 (T). The program 
must intercept the computer's 
operation when it jumps to that 
location, and put it into an end- 
less loop until the appropriate 
key is pressed. 



ADDRESS 


DECIMAL 


ASCII 


OPCODE 


SOURCE 


CODE 


27905 


245 




F5 


PUSH 


AF 


27906 


62 


•A 


3E11 


LD 


A, 65 


27908 


195 




C37F6D 


JF 


28531 


27911 


245 




F5 


F'USH 


AF 


27912 


62 


>e 


3E42 


LD 


A, 66 


27914 


195 




C37F6D 


JP 


7803, 


2791/ 


215 




F5 


PUSH 


AF 


77918 


62 


>c 


3E13 


LD 


A, 67 


27970 


195 




C37F60 


JP 


2803! 


27973 


215 




F5 


PUSH 


AF 


27921 


6 7 


>0 


3E14 


LD 


A, 68 


27926 


195 




C37F6D 


JP 


780 31 


77929 


215 




F5 


PUSH 


AF 


27930 


62 


t 


3E45 


LD 


A, 69 


27932 


195 




C3/F60 


JP 


78 031 


27935 


215 




F5 


F'USH 


AF 


27936 


6? 


■ 1 


3E16 


LD 


A, 70 


77938 


195 




C37F6D 


JF' 


78031 


7/711 


715 




F5 


PUSH 


AF 


27942 


62 


■G 


3E47 


1 D 


A, 71 


27944 


195 




C3/F6U 


JP 


28 031 


27947 


215 




1 5 


PUSH 


AF 


27948 


6 2 


H 


3E18 


! D 


A, 72 


27950 


195 




C37F 6D 


JP 


78031 


27953 


715 




F5 


PUSH 


AF 


2/954 


6 2 


-I 


3E49 


LD 


A, 73 


27956 


195 




C37F6D 


JP 


2803! 


2/959 


215 




F5 


PUSH 


AF 


7/96 


62 


J 


3E4A 


LD 


A, 74 


27962 ' 


195 




C37F6D 


JP 


28031 


27965 


215 




F5 


PUSH 


AF 


77966 


62 


K 


3E4B 


LD 


A, 75 


?7 96ti 


195 




C37F6D 


JF' 


? B 3 1 


27971 


713 




F5 


PUSH 


AF 


27972 


62 


L 


3E 1C 


LD 


A, 76 


27974 


195 




C37F6D 


JP 


28031 


27977 


715 




F5 


PUSH 


AF 


27978 


62 


M 


3E1D 


1 D 


A, 77 


27980 


195 




C37F6D 


JP 


780 3) 


27983 


215 




F5 


PUSH 


AF 


27984 


6? 


N 


3E4E 


LD 


A, 78 


2/986 


195 




C37F6D 


JP 


28031 


27909 


715 




F5 


PUSH 


M 


27990 


6 2 


■-a 


3E4F 


LO 


A, 79 


27992 


195 




C37F6D 


JF' 


28031 


27995 


215 




F5 


F'USH 


AF 


27996 


67 


•F 


3E50 


ID 


A, 80 


27998 


195 




C3/F 6D 


JP 


28031 


280 01 


215 




F5 


PUSH 


AF 


28007 


62 


-0 


3E51 


LD 


A, 81 


78001 


195 




C37F6D 


JP 


28031 


78 7 


745 




F5 


F'USH 


AF 


280 08 


6 7 


R 


3E52 


LD 


A, 82 


28010 


195 




C37F6D 


JP 


28031 


28013 


7 45 




F5 


F'USH 


AF 


28014 


6 2 


S 


3F53 


LD 


A , 83 


280 14 


195 




C37F6D 


JP 


2 6 3 1 


28019 


7"5 




F5 


PUSH 


AF 


28 2 


62 


>T 


3L54 


LD 


A, 84 


78 27 


195 




C37F6D 


JP 


28031 


28025 


215 




F5 


PUSH 


AF 


28026 


62 


LI 


3E55 


LD 


A, 85 


28078 


195 




C37F6D 


JP 


28031 


28031 


5 


2 ? 


32FF3F 


LD 


( 16383 >,A 


78 31 


251 


D 


FE44 


CP 


68 


78 36 


32 




2017 


Jk 


NZ, 28061 


28038 


19/ 




C5 


PUSH 


bc 


28 39 


11 




0E63 


ID 


C, 99 


78011 


6 


C 


065B 


LD 


B, 91 


28043 


6 2 


■ 


3E01 


LD 


A, 1 


280 45 


71 I 




D3FF 


OUT 


255 ,A 


28017 


16 




10FE 


DJNZ 


78017 


28019 


6 


c 


6 56 


1 D 


e, 91 


28051 


6 7 


> 


3E02 


LD 


A, 2 


28053 


211 ' 




D3FF 


OUT 


255 ,A 


28 55 


16 




10FE 


DJN7 


78 55 


780 57 


13 




0D 


DFf 


C 


28058 


37 




20ED 


JP 


NZ, 28041 


28060 


193 




CI 


POP 


BC 


28061 


7 1 1 




n 


PUP 


AF 


28062 


201 


Program 


C9 

Listing 2 


RET 





Next, we must know when a 
particular key has been pressed. 
In a memory-mapped system 
such as this, the keys directly 
control the contents of certain 
addresses. For Models I and III 
these locations are from 14337 
(3801 H) to 14464 (3880H). We 
need a table telling which 
address is controlled by which 
key and what value is present at 
that location when the key is 
pressed. Why not let the com- 
puter do the work for us? Care- 
fully type the following line 
while in the command mode: 

>CLS: FOR I = TO 7: X(l) = 14336 + 2 

fl: PRINT@128-|,X(I): NEXT: FOR J =0 
TO 32000: FOR I =0TO 7: PRINT® 128* 
l+8,PEEK(X(l)),: NEXT l,J 

Now press the various keys (ex- 
cept Break) and see what hap- 
pens. In particular, note that the 
Enter key causes a one to ap- 
pear at address 14400, whereas 
it is zero otherwise. 

Armed with this information, 
we can write a short Assembly 
program such as the one in Pro- 
gram Listing 3. The program has 
two parts. The first loads a JP, 
6E0FH into the ROM exit at 
16863 and then returns to Basic. 
This runs only once when the 
program is initially loaded into 
memory. The second part, start- 
ing at 6E0FH (28175), is the loop 
halting the list until the Enter 
key is pressed. 

You can assemble the pro- 
gram using EDTASM or enter it 
directly into memory locations 
6E01H through 6E16H using 
T-Bug. To run the program, set 



the memory size to 28160, and 
use /28161 (6E01H) as the sys- 
tem mode entry point. You can 
relocate the program by chang- 
ing the address of the LD HL, 
6E0FH instruction to the ap- 
propriate value. 

Alternately, you can POKE the 
program into memory using the 
Basic Program Listing 4. The 
Basic program also sets the 
memory size (28174) and tests to 
see if there is a jump instruction 
at 16863. Return at the end of the 
program with the appropriate 
Jump so that this utility is com- 
patible with any others in use. 

Caution: wheneveryou insert a 
patch in the interpreter as we 
have done here, the routine you 
write might change the value of a 
register used by the interpreter. 
Although Listing 3 uses the AF 
and HL registers without causing 
any difficulty, save the values of 
any registers that your program 
uses by PUSHing them into the 
stack before you begin and POP- 
ing them back just before you 
return. Listing 2 does this with 
the AF and BC registers. 

With the aid of these programs 
and a little practice, you should 
be well on your way toward mak- 
ing your computer do things that 
would be difficult, slow, or even 
impossible using only the ROM 
Basic interpreter. ■ 

J.C. Sprott is a Professor of 
Physics at the University of Wis- 
consin. He is the author of an 
electronics textbook and the 
principal investigator in a 
plasma physics research group. 



6E01 


11 1 




ORG 


6E01H 


;MEM SI2E 28160 


61 1 3EC3 


110 




LD 


A, 0C3H 


(JUMP TO START 


6E03 32DF41 


00120 




LD 


■ 16 863) , A 


! ON ROM EXIT 


6E06 210F6E 


00130 




LD 


Ml. , 6E0FH 


; AT 16863 ■ 


6E09 22E041 


110 




1 D 


( 16 1)6',; , HL 




6E0C C3191A 


15 




JF' 


6681 


! RETURN TO BASIC 


6F0F 3A4038 


00 160 


START 


ID 


A, f 14400 ) 


JSrpUP.F ENTER KEY 


6E12 FE01 


17 




CP 


1 


!SEE IF PRESSED 


6E14 20F9 


18 




JR 


NZ.S 1 API 


;goto st am if not 


6E16 C9 


1 9 




RET 




(OTHERWISE RETURN 


I! 


2 




END 






S0000 TOTAL 


ERRORS 














Program Listing 3 


' 



10 POKE 16561,12: POKE 16562,110: CLS 

20 PRINT "SCROLL CONTROL" 

30 FOR 1=28175 TO 28182: READ X: POKE I,X: NEXT 

40 IF PEEK(16864)+256*PEEK(16865) =28175 THEN 60 

50 FOR 1=0 TO 2: POKE 28182+1, PEEK(16863+I) : NEXT 

60 FOR 1=16863 TO 16865: READ X: POKE I,X: NEXT 

70 DATA 58, 64, 56, 254, 1,32, 249*201,195, 15, 110 



Program Listing 4 
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EDUCATION 



Unless you know the road signs! 




James W. Wood 
424 North Missouri 
Atwood, IL 61913 



My fellow teachers at At- 
wood Hammond High 
School are astonished: My stu- 
dents are eager to learn. Why? 
With TRS-80 computers and my 
math, chemistry and physics 
programs, learning is challeng- 
ing, rewarding and fun! Several 
teachers are afraid of the gray 
plastic monster and others are 
jealous of its ability to captivate 
students. But the driver educa- 



te Key Box 

Extended Color Basic 
Color Computer 
16K RAM 



tion teacher saw its potential 
and suggested the program 
Signs. 



Signs runs on a 16K Extended 
Color Basic TRS-80 computer. 
The program contains high reso- 



Program Listing 

e DIM AS(21), A(21):REM JAMES W. WOOD, 424 N. MISSOURI, ATWOOD, 
ILL, 61913, NOV, 1981 

1 A$(l)="STOP":A$(2)="RAILROAD":AS(3)="HAZARD":AS(4)="YIELD":AS( 
5)= n SCHOOL ZONE":AS(6)="N0 PASSING ZONE" : AS (7) ="NO RIGHT TURN": A 
S(8)="SERVICES OR FACILITIES" : AS ( 9) '"DISTANCE OR DIRECTION" : AS ( 1 
0)="CONSTRUCTION":AS(11)="TWO LANES MERGING TO ONE' 

2 A$(12)="SLOW VECHICLE":AS(13) ^"CROSSROAD" : AS ( 14) ="DO NOT ENTER 
":AS(15)="TRAFFIC LIGHT AHEAD" : AS ( 16) ="ROAD CURVES TO RIGHT":AS( 
17)="MERGE":A$(18)="SIDE ROAD": AS (19) ="NO U-TURN" : AS ( 20) ="CROSSW 
ALK":A$(21)="GUIDE" 

3 CLS:PRINT"YOU WILL BE SHOWN ROAD SIGNS .": PRINT"TYPE THE LETTER 
IN FRONT OF":PRINT"THE NAME OF THE SIGN .": PRINT: INPUT" YOUR NAME 

";NAS 

4 PRINT: INPUT"PRESS 'ENTER' TO CONTINUE" ;Q$ 

5 CLS:GOTO200 
10 CLS 
50 F0RQ=1T015: PRINT" 

";+AS(16) ; 
60 F0RQ=1T05:PRINT@C 
170 KS=INKEYS 

180 A$=INKEY$:IFAS=""THEN180 
190 RETURN 
200 N=RND(21) 
220 IF A(N)=1 THEN 200 
230 ON N GOSUB 5000 , 2000 ,6000 , 4000 , If 



";+CHRS(64+Q) ;+" 
•32-13, CHRS(80+Q) ; 



\-+AS(Q) :NEXTQ:PRINT" 
";+A$(16+Q) ; : NEXTQ 



1 , 3 1 



\, 7000,196 



i ,26 



1,17 



000,11000,12000,13000,14000,15000,16000,10000,18000,8000,9000,21 

000 

235 FORTI=1TO400:NEXTTI 

240 GOSUB10 

250 IF ASC(AS)-64=N THEN A(N) =1 : CLS: PRINT@260 , "GOT IT RIGHT " ; NA 

S:C=C+1 ELSE CLS : PRINTS260 , "MISSED THAT ONE "; NAS : IC=IC+1 : PRINT: 

Program continues 



lution graphics for 21 road 
signs. The high school driver ed- 
ucation student should recog- 
nize the signs by their color and 
shape. Some colors are wrong 
(the Color Computer cannot dis- 
play red and white on the same 
graphics page), but our driver 
education teacher was pleased 
with the program's ability to 
drill students on road sign rec- 
ognition. 

The program shuffles the 
signs and asks the student to 
identify them. If he answers cor- 
rectly he will not be asked to 
identify that sign again. If he an- 
swers incorrectly the sign will 
reappear. It should take stu- 
dents no more than 15 minutes 
to learn all signs on the road test 
using Signs. ■ 

James Wood teaches math 
and science at Atwood Ham- 
mond High School. His hobbies 
are photography and ham radio. 
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Get your TRS-80™ up and running 
with special system & disk drive values like these . . . 



Complete TRS-80 Model III 
microcomputer system with disk drives 

A.M. Electronics Model III with48K RAM,twoTandon 
40-track double-density disk drives, A.M. Electronics 
controller board, DOS and manuals, complete and 
ready-to-run! $1895.00 

Prepaid shipping when order is pre-paid. 

A.M. Electronics "Multiplier" 

Tired of unreliable double density operation? With 
Multiplier, you can upgrade from a single-density 
without doubling your problems $99.95 

Your Choice: 
TeacorTandon 5 1 /i-inch disk drives, complete! 

40-tracksinglesidediskdrive with powersupply, case 

and extender cables $250.00 

80-tracksinglesidediskdrivewith powersupply, case 
and extender cables $340.00 

Memory Chips 

16K 200 nanosecond RAM chips $2.00 each 



New! Teac double-head 
5 1 /»-inch 40-track disk drive! 

Complete with power supply, case and extender 
cables $340.00 

New! Tandon "Thinline" 
8-inch disk drive, complete! 

For TRS-80 Model II, complete with dual case, power 
supply, and cables $695.00 

New! Hard disk drives for Model III — 
Ready to plug in and run! 

6.5 Megabyte drive $1995.00 

9 Megabyte drive $2195.00 

14 Megabyte drive $2395.00 

(DOS ex\ra) 

TRS-80 Model III Commented 

The definitive guidebook to Model III ROM . $15.00 

Shipping costs additional except where otherwise noted. 
rhe drives* ^Mt"-' 



^38 




Ann Arbor: 3446 Washtenaw Ave., Ann Arbor, Ml 48104 (313) 973-2312 

Open M-F 10-6, Sat. 10-5. Telex: 220-821-HPC 

Fowlerville*: 111 North Grand, Box 1071, Fowlerville, Ml 48836 (517) 223-7281 

Attention Dealers, OEM's & Distributors: Call us for details on our attractive pricing. 

'Authorized Radio SnacK Dealer. ™TRS-80 trademark Tandy Corp. Prices subject to change without notice 



Program continued 

PRINT' IT WAS *";AS(N);" '" 

256 FOKTI=1TO300:NEXTTI 

260 IF021THEN 50000 

270 GOTO200 

1000 REM: SCHOOL ZONE 

1010 PMODEl,l:PCLS 

1020 COLOR2.1 

1030 LINE(116,24)-(196,92) ,PSET:LINE-( 196,164) ,PSET:LINE-(36 , 164 

) ,PSET:LINE-(36,92) ,PSET:LINE- (116 ,24) ,PSET 

1040 PAINT(116,28) ,2,2 

1045 SCREEN1,0 

1050 RETURN 

2000 REM: RAILROAD 

2010 PM0DE1,1:PCLS 

2020 C0L0R3,1 

2030 CIRCLE(128,96) ,75,3 

2040 PAINT(128,24) ,2,3 

2050 COLOR3,l 

2060 LIN£(168,32)-<128,80) ,PSET:LINE- (88,32) ,PSET 

2070 LINE(68,48)-(112,96) ,PSET:LINE- (68 ,144) ,PSET 

2080 LINE(88,160)-(128,112) ,PSET:L1NE-(168,160) ,PSET 

2090 L1NE(188,48)-(144,96) ,PSET:LINE- (188,144) ,PSET 

2100 PAINT(80,44) ,3,3 v..Vi;-- 

2105 SCREEN1,0 .J'iV 

2110 RETURN . 'jvv 

3000 REM: NO PASSING 

3010 PMODE1 , 1 : PCLS 

3020 COLOR2,l 

3030 LINE(56,36)-(232,88) ,PSET:LINE-(56 , 142) ,PSET: LINE-(56 ,36) ,P 

SET 

3040 PAINT(64,52) 

3045 SCREEN1,0 

3050 RETURN 

4000 REM:YIELL 

4010 PMOOE1 , 1 : PCLS 

4020 COLOR4,l 

4030 LINE(20,10)-(200,10) ,PSET:LINE-(110,170) ,PSET:LINE-(20,10) , 

PSET 

4040 PAINT(24,12) ,4,4 

4045 SCREEN1,0 

4050 RETURN 

5000 REM: STOP 

5010 PMODEl,l:PCLS 

5020 COLOR4,l 

5030 LINE(84,24)-(156,24) ,PSET:LINE-(192 ,60) ,PSET:LINE-(192,124) 

,PSET:LINE-(156,160) ,PSET:LINE-(84,160) ,PSET:LINE-(48,124) ,PSET: 

LINE-(48,60) ,PSET:LlNE-(84,24) ,PSET 

5040 PA1NT(88,30) ,4,4 

5045 SCREEN1,0 

5050 RETURN 

6000 REM:HAZARD 



MASTER ELECTRONICS, INC. 

,««i^U^«/"TRS-80" g>«Ue*> - * F-723 
CAN SET YOU UP IN A 





G^- "'' : S 



v FULLY STOCKED 
|j I Nc Model ll's 

Model Ill's 

ALL- PRINTERS 

AND— MORE!! 

* PLUS * 
THE ALL NEW: 



nd the 8.5 meg. Hard Drive! 



CALL US NOW!! 



E: 1-800-531-7323 



TEXAS CALL COLLECT: 512/689-5536 

MASTER ELECTRONICS, INC. 

154 NORTH 5th 

RAYMONDVILLE, TX 78580 



,-- 146 



6010 ?MODEl,l:PCLS 

6020 COLOR2,l 

6030 LINE(116,12)-(202,92) ,PSET:LIN£-(116,168) ,PSET: LINE-(28,92) 

,PSET:LINE-(116,12) P PSET 

6040 PAINT(116,14) ,2,2 

6045 SCREEN!, 

6050 RETURN 

7000 REM: NO RIGHT TURN 

7010 PMODEl,l:PCLS2: 

7 020 COLOR3,2 

7030 LINE(68,28)-(190,28) ,PSET:LINE- (190 ,148) ,PSET:LINE-(6B,148) 

,PSET:LINE-(68,28) ,PSET 

7035 COLOR4,2 

7040 CIRCLE(128 ,88! ,60 

7050 CIRCLE(128,88) ,48 

7060 PAINT(128,35) ,4,4 

7070 LINE(106,46)-(166,116) ,PSET:LINE ( 94 ,54) - (154 ,126) ,PSET 

7080 PAINT(104,52) ,4,4 

7090 LINE(108,72)-(108,112) ,PSET:LINE-(120,112) ,PSET:LINE- (120 , 8 

8) ,PSET 

7095 LINE(138,84)-(148,84) ,PSET:LINE-(148,88) ,PSET:LINE - (160 ,76) 
,PSET:LINE-(148,64) ,PSET:LINE- (148,72) ,PSET:LINE-(128,72) ,PSET 

7096 PAINT(112,100) ,3,4:PAINT(140,80) ,3,4 
7100 SCREEN1,0 

7110 RETURN 
8000 REH: NO U-TURN 
8010 PMODEl,l:PCLS2 
8020 color.!,;; 

8030 LINE(68,28)-(190,2B) ,PSET:LINE-(190,148) ,PSET:LINE- (68,148) 

,PS£T:LINE-(68,28) ,PSET 

8040 CIRCLE(128, 88) ,32,3,1, .5,1 

8050 CIRCLE (128 ,88) ,42,3,1, .5,1 

8060 LINE(160,88)-(160,114) ,PSET:LINE-(170,114) ,PSET:LINE-(170 , 8 

8) ,PSET 

8070 LINE(86,88)-(86,94),PSET:LINE-(80,92) ,PSET:LINE-{92,114) ,PS 

ET:LINE-(102,92) , PSET: LINE- ( 96 ,94) ,PSET: LINE-(96 , 88) ,PSET 

8080 PAINT(92,110) ,3,3 

8090 COLOR4.2 

8100 CIRCLE(128,88) ,60 

8110 CIRCLE(128,88) ,50 

8120 PAINT(128,30) ,4,4 

8130 LINE(104,44)-(176,108) ,PSET:LINE( 92,52) -(168,120) , PSET 

8140 PAINT(104,52),4,4:SCREEN1,0:RETURN 

9000 rem s Crosswalk 

9010 PMODE 1,1: PCLS 

9020 COLOR2,l 

9030 LINE(116,12)-(202,92) ,PSET:LINE- (116,168) , PSET: LINE- ( 28,92) 

,PSET:LINE-(116,12) ,PSET 

9040 PAINT(116,14) ,2,2 

9050 COLOR3,2 

9060 CIRCLE(108,48) ,10 

9070 LINE{116,56)-(140,68) ,PSETsLINE-{144, 84) ,PSET:LINE-{140#88) 

,PSET:LINE-(130,70) ,PSET:LINE-(142,128) ,PSET:LINE-(138,130) ,PSET 

:LINE-(120,96) ,PSET:LINE-(108,140) ,PSET 

9080 LINE-(104,140) ,PSET:LINE-(110,92) ,PSET: LIN£-( 104 ,80) ,PSET-L 

INE-(88,88),PSET:LINE-(84,84) , PSET: LINE- (100 ,72) , PSET: LINE-(108, 

60) ,PSET:LINE-(116,S6) , PSET: LINE- (108,60) , PSET: LINE- (116 , 56) ,PSE 

T 

9090 PAINT(108,42) , 3 , 3 : PAINT( 116 ,60) ,3,3 

9100 LINE(56,104)-(100,108) ,PSET,BF 

9110 LINE(144,104)-(176,108) ,PSET,BF 

9120 LINE(96,144)-(136,148) ,PSET,BF 

9130 SCREEN1,0: RETURN 

10000 REM:MERGE 

10010 PMODE1,1:PCLS:COLOR2,1 

10020 LINE(116,12)-(202,92) ,PSET:LINE- ( 116 , 168) , PSET: LINE- (28 ,92 

) ,PSET:LINE-(116,12) ,PSET 

10030 PAINT(116,14) ,2,2 

10040 COLOR3,l 

10050 LlNE(116,32)-(92,56) ,PSET:LINE- (108,56) , PSET: LINE-(108 ,140 

),PSET:LINE-(124,140),PSET:LINE-(124,112) ,PSET:LINE-( 140 ,128) ,PS 

ET:LINE-(152,116) ,PSET:LINE-(124 ,92) , PSET: LINE- (124 ,56) ,PSET:LIN 

E-(140,56) ,PSET:LINE-(116,32) ,PSET 

10060 PAINT(116,37) ,3,3 

10070 SCREEN1,0: RETURN 

11000 REM:2LANES MERGE TO 1 

11010 PMODEl,l:PCLS:COLOR2,l 

11020 LINE(116,12)-(202,92) , PSET: LINE-(116, 168) ,PSET:LINE-(28,92 

) ,PSET:LINE-(116,12) ,PSET 

11030 PAINT(116,14) ,2,2 

11040 COLOR3,l 

11050 LINE(92,44)-(108,140) , PSET, BPsLINE(120,44)-<132, 84) , PSET, B 

F:LINE( 132,100) -(144,136) , PSET, BF: LINE (120 ,84) - (132 ,100) , PSET: LI 

NE(132,84)-(144,100) , PSET: PAINT<128, 88) ,3,3 

11060 SCREEN1,0 

J.i07 RETURN 

12000 REM: SLOW VECHICLE 

12010 PM0DE1,1:PCLS 

12020 COLOR4,l 

12030 LINE(102,8)-(144,8) ,PSET:LINE-(224 , 128) , PSET: LINE- (196, 156 

) ,PSET:LINE-(40,156) ,PSET:LINE- (16 ,128) ,PSET:LINE-(102,8) ,PSET 

12040 LINE(124,32)-(196,128) , PSET: LINE- (48,128) ,PSET:LINE- ( 124 ,3 
2) ,PSET 

12041 PAINT (104, 16) , 4 , 4 : PAINT ( 124 , 40 ) , 2 , 4 

12044 SCREEN1,0 

12045 RETURN 

13 000 REM : CROSSROAD 

13010 PMODEl,l:PCLS:COLOR2,l 

13020 LINE(116,12)-(202,92) ,PSET:LINE- (116 ,168) ,PSET:LINE-(28,92 

) ,PSET:LINE-(116,12) ,PSET 

13030 PAINT(116,14) ,2,2 

13040 COLOR3,2 

13050 LINE(104,40)-U28,140) , PSET, BF:LINE(60 , 80) -( 168,104) ,PSET, 

BF 

13060 SCREEN1,0 

13070 RETURN 

14000 REM: DO NOT ENTER 

14010 PMODEl,l:PCLS:COLOR4,l 

14020 CIRCLE(128,96) ,70,4 

14030 LINE(53, 21)-(204, 170) , PSET, B 

14040 LINE(72,80)-(184,112) ,PSET,B 

14050 PAINT(120,32),4,4 

14060 PAINT(76,84) ,2,4 

14065 PAINT(68,36) ,2,4 

14070 SCREEN1,0 

14080 RETURN 

Program continues 
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Program continued 



15 000 REM: TRAFFIC LIGHT 
15010 PM0DEl,l:PCLS:C0LOR3,l 

15020 LINE(116,12)-(202,92) ,PSET: LINE- ( 116 , 16 8 J , PSET: LINE- ( 28 , 92 

) ,PSET:LINE-(116,12) ,PSET 

:.Sa ; .0 LINE(92,48) (140,136) , PSET, B 

15060 CIRCLE (116, 64) ,10 

15070 CIRCLE(116,92) ,10 

15080 CIRCLE(116,120) ,10 

15090 PAINT(116,18) ,2,3 

15100 PAINT(96,52) ,3,3 

15110 PAINT(116,60) ,4,3 

15120 PAINT(116,88) ,2,3 

15130 SCREEN1.0 

15140 RETURN 

160 00 PM0DE1,1:PCLS:C0L0R2,1 

16010 LINE(116,12)-(202,92) , PSET: LINE- ( 116 , 168) , PSET: LINE- ( 28 , 92 

) ,PSET:LINE-(116,12) ,PSET 

16020 PAINT(116,15) ,2,2 

16025 C0L0R3,1 

16030 LINE(84,88)-(84,126) ,PSET:LINE- (104 ,126) , PSET: LINE- ( 104 ,88 

) ,PSET 

16040 CIRCLE (128, 88) ,24, 3,1, .5, .75 

160 50 CIRCLE! 128,88) ,44, 3,1, .5, .75 

16060 LINE(128,44)-(128,36) , PSET : LINE- ( 146 , 56 ) , PSET: LINE- ( 128 ,76 

) ,PSET:LINE-(128,64) ,PSET 

16070 PAINT(132,44) ,3,3 

16080 SCREEN1,0: RETURN 

17000 PM0DE1,1:PCLS:C0L0R8,5 

17010 LINE(116,12)-(202,92) , PSET: LINE- ( 116 , 168) , PSET: LINE- ( 28 , 92 

) ,PSET:LINE-(116,12) ,PSET 

17015 PAINT(116,16) ,8,8 

17020 SCREEN1,1 

17030 RETURN 

18000 PM0DE1,1:PCLS:C0L0R2,1 

18010 LINE(116,12)-(202,92) , PSET: LINE- (116,16 8) , PSET: LINE- (28 , 92 

) ,PSET:LINE-(116,12) ,PSET 

10020 PAINT (116, 16) ,2,2 

18030 C0L0R3,1 

18040 LINE(104,40)-(128,140) , PSET, BF : LINE (60 , 

BF 

18050 SCREEN1,0: RETURN 

19000 PM0DE1,1:PCLS:C0L0R3,1 

19010 LINE(80,20)-(170,170) , PSET,BF : SCREEN1 , 

20000 PMODEl,l:PCLS2:COLORl,2 

20010 LINE(40,30)-(210,160) , PSET ,BF : SCREEN1 , 

21000 CLS0:FORXX-lTO12iPRINT@3 8+3 2 *XX, STRINGS 

TURN 

21010 LINE(40,30)-(210,160) ,PSET ,BF : SCREEN1 , 1 

50000 CLS:PRINT"YOU NEEDED"IC+C; "TRIES FOR 21 

"TRY AGAIN ? (Y/N) ";NA$ 

50010 AS=INKEYS:IF A$-"Y* THEN RUN ELSE IF A$="N" THEN END ELSE 

50010 



)-(104,104) ,PSET, 



: RETURN 

(20,207) ; :NEXTXX:RE 



: RETURN. 

SIGNS" : PRINT: PRINT 



BASIC 
HANDLING" 



DSC Publishing 

2 Dogwood Drive 

PO Box 769 

Danbury, CT 06810 

Phone Order 
(203) 748-3231 




the HOW TO, SHOW & TELL, STEP by 
STEP book. Written for TRS-80 and all 



The breakthrough book for non-programmers... 



solve in house problems by writing your own 



the desire to get beyond the cassette and into 
disk data storage and file manipulation. "DOS 
Random Access & File Handling" is the plain 
speaking, easy to read 150 page book for 
learning HOW TO WRITE SPECIAL PROGRAMS 
for inventories, mailing lists, work schedules, 
record keeping and more. Your acquaintance 
with Level I and Level II basic and this self- 
instruction tutorial will assure quick progress. 



Please send me a copy of "DOS Random Access 
& Basic File Handling" for 29.50 + 1 .50 shipping. 
Model I & III D Model ll/CPM □ 
Also send the compatible 8" program disk for 
32.50 + 1.50 shipping CPM □ or Model II □ 
or the 5V 4 " disk for Model I and III for 28.50 + 
1.50 shipping n 

Overseas add 8.00 per book and disk 
airmail. 

Name 

Address 

City 

State 



Zip 



Master Charge D 
Expiration Date _ 
Card # 



VISA D 



Check Q Money Order D 
COD (2.00 extra) □ 
Signature . 



'Dealer Inquiries Invite 



Phone Orders (203) 748-3231 
CT. orders add 7.5% sales tax. 




Model II 

26-4002 



t Megabyte 

ird Disk 

(Primary) 
26-4150. 




We have the Largest Inventory in the Central 
United States. Discount prices on all 
software and accessories for your TRS-80 
computer needs. 



BUY 

DIRECT 

Toll Free Order: 

1-800-835-9056 

Kansas Residents: 
1-800-362-9091 



* No out of state Taxes 

* Immediate Shipment 

* Several Payment Methods 

* Direct Buying 



P.O. Box 607 - 1023 N. Kansas fREE Ci 

Liberal, Ks. 67901 

TRS-80 is a Registered Trademark of Tandy Corporation 



•See List ol Advertisers on page 386 
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IT 



provides you with more information on your TRS-80* than any other single source 

gives you 20-30 new programs to use in each of 12 yearly issues 

reviews, equipment and software so you know what or what not to buy 

gives you the truth about the TRS-80 — its good points and its limitations 

(80 Micro is not affiliated with Tandy) 

lets you save money— lots of it — by comparison shopping within the ad pages 

clues you in on how other TRS-80 owners are using and updating their systems 

lets you in on what is really happening in the industry 

brings you Wayne Green's outspoken 

and often controversial editorials every 

month 

and best of all it gives you a no risk 

subscription offer- 



Subscribe today— if you are not satisfied with 
the first issue — write "cancel" across your in- 
voice and send it back. The 80 Micro is yours 
to keep. 






SSSS^Putii 




Name 





want 80 Micro 

Bill me $24.97 for a year's subscription 
my DAE □ MC : I VISA 

Check enclosed 



Address 



ard# 



nnsti i tp> 



Canadian 1 year only/US funds $27.97 Foreign Surface 1 year only/US funds $44." 

80 Micro • PO Box 981 • Farmingdale, N.Y. 11737 

*TRS-80 is a trademark of Tandy 



(DRAWN ON US BANK ONLY, foreign Ait. please inquire.) 
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IN CHICAGO 



. . . YOU'VE HEARD ABOUT US . . . 



Ebq 

&ASSI.X 



Emmanuel B. Garcia, Jr. & Associates 

203 North Wabash Ave * Chicago, IL 00601 
312/782-9750 



• serving the TRS-80* community since 1978 

• publisher of "Chicatrug News" (write for sample issue) 
» well-stocked display room 

• quality products only 

• personalized service 

• go*, a technical support 

• repair facilities 

. . . NOW HEAR THIS . . . 

ANNOUNCING THE OPENING OF 

OUR NEW MORRIS, ILLINOIS STORE: 

EbG & Associates 

RADIO SHACK* DEALER STORE #R-619 

531 Bedford Road • Morris, IL 60450 

815/942-9521 

Toll Free No: (800) 621-2141 
FOR ORDERS ONLY 

PREPAID ORDERS SHIPPED PROMPTLY. 
AMERICAN EXPRESS / VISA / MASTERCHARGE & C.O.D. 

ACCEPTED. (Add $2 shipping; $9 per drive or printer.) 

'Trademark of Tandy Corporation .^271 




The ONLY publication devoted exclusive- 
ly to helping you create, build, and main- 
tain a home-based business using your 
micro-system. SUBSCRIBE NOW to what 
may be the most important publication in 
YOUR FUTURE! 

1 Year (12 issues) only $25 U.S., $29 
Canada, $35 World Wide 

J. Norman Goode, Publisher 
Micro Moonlighter Newsletter 

2115-M Bernard Avenue • Nashville, TN 37212 

Visa and Mastercard welcome. Send account number and 

expiration date. 

D Visa Acct # Exp 

D M/C Acct # Exp 

Name 



Address. 
City 



St. 



Zip 



^270 




**rr- c S& 



BASF- 

WORLD STANDARD TAPE 



• PROFESSIONAL 5-SCREW SHELL 

• UNIVERSAL INDUSTRY ACCEPTANCE 

DATA TRAC - C-10, C-20 
MUSI TRAC - C-45, C-90 " 



rja 



A& 



U l ta ne 



O^\„, iaP e:i >e^ra« 



s^'Sd 



qu 



-mm. 

m^?:> 



c ve'Y 
. rat* ' Hve'-i 



^^%KT* 



e no' 



<» 



o<F 



\ose 






a' 
dot 



u o\-cj 






,tne 



proP 6 ' 



',:<'' 






\N* V 



\V 



;ft \C 



*sv°* 



-i 



, ■YOLi'VE TR/ED THE WEST, NOW BUY THE BEST" 



Call: 213/710-1430 for IMMEDIATE SHIPMENT on Credit Card Orders. 



order now... Man to: VORK lO Computer wore 



Please send cassettes checked below: 



LENGTH 

C 10 



1 DOZEN 2 DOZEN 



□ 8.00 □ 14.40 



C-45 



; ; 10 oo 

: ; 13 00 



; | 18 00 
; ■>■■ 00 



C-90 □ 21 75 D 39.00 



Sill) TOTAL 



Cahl residents, add 6% sales ta» 



Shipp-ng I Jtv: S2 2 do; $3 50 
addt: to; . Si 



name 



2457.3 Kittridge St., #801, Canoga Park, CA 91307 



□ Check or MO. enclosed □ Charge lo my Credit Card: 
Q VISA a MASTERCARD Expires date: 



WRITE FOR QUANTITY DISCOUNTS 
Snipped bulk-pack by UPS lo slreel address in Com 
USA only We cannot ship lo P.O. Boxes. 



state/z.p 



sSee List of Advertisers on page 386 




48-K 26-1066 



16-K 26-1062 



TRS-80 MODEL II !| TRS-80 MODEL 1 6 

$ 327Q % 

64-K 26-4002 *S £m M iSF I 128-K 26-6002 

TRS-80 8 4 MEGABYTE HARD DISKS (PRIMARY UNIT) $4000. 



49: 



TRS-80 COLOR 



$. 



* 



*i 



4-K 



309 M55 *525 

1001 16-K 26-3002 32-K 26-3003 



WE HAVE COLOR DISK DRIVES 0— *475 1-2-3 — *3i 5 



WE ALSO CARRY EPSON AND OKIDATA PRINTERS, 

XEROX 820 AND ALTOS COMPUTERS. 

NO OUT-OF-STATE TAXES. T.M. TANDY CORP 

Sold with the manufacturer s limited warranty Copies of such war- 
ranty may be obtained for review from Perry Oil and Gas Co 



DBDDV All D AAC IUA 

PERRY OIL & GAS INC 



Dept. No E-5 137NORTH MAIN ST., PERRY, M CHIGAN 48872 
PHONE (517| 625-4161 MICH 
FOR OUR PRICES, 

PLEASE CALL TOLL FREE 

1-800-248-3823 



DEALERS' INQUIRIES INVITED. 

WE ACCEPT CERTIFIED CHECKS 

CASHIERS CHECKS 

AND MONEY ORDERS 
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Use INSTR as you build this phone log. 



Phonfind 



Robert Eldridge 
3184 Kingsley Place 
Lafayette, CA 94549 



Do you make many business calls? Do 
you find it difficult to sort out the busi- 
ness calls from your personal calls when 
your monthly bill arrives? I tried to log my 
business calls as I made them, but often in 
the heat of business I overlooked this duty. I 
thought, "There must be a better way," so I 
wrote a program for my TRS-80. 

Phonfind 

With the Phonfind program I set up a list 
of numbers and names from my phone di- 
rectory. Now, when I get my phone bill, I 



load Phonfind, key in the phone numbers, 
and find out in seconds who belongs to 
each number. If a number is not in the Phon- 
find list I have to search for it manually; 
when I find the new number I add it to the 
list for future reference. 

The heart of Phonfind is the INSTR com- 
mand, which uses the rapid string compari- 
son functions of the Z80 chip. INSTR per- 
forms them at machine language speed by 
searching a main string for a substring. If it 
finds the substring it returns an integer 
representing the character location in the 
main string where the substring starts. If it 
does not find the substring, it returns a zero. 

For example, searching the main string 
"My wife thinks I'm crazy" for the substring 
"crazy" would return 20, the starting loca- 



Program Listing. Phonfind 



********************************* 

* PHONFIND * 



* A Utility Program by * 

* Robert G. Eldridge * 

* September, 1981 * 
********************************* 



10 

11 

12 

13 

14 

15 

16 

20 CLS 

25 CLEAR3000 

30 DEFINTA-Y:DEFSTRZ:DIMZ(200) 

35 OPEN"I" ,l,"NUMBER/SEQ.BOB n 

39 i Input file of phone numbers to array Z 

40 KK=1 

45 IFEOF(1)THEN60 
50 INPUT#1,Z(KK) 
55 KK=KK+l:GOT045 

60 CLOSE1:GOTO1000 

61 ' Housekeeping complete, begin main menu 

99 i Inkey Subroutine to get character from keyboard 

100 Y$=INKEY$: IFY $=" "THEN100ELSERETURN 

199 i Subroutine to search array z for String ZX 

200 FORX=lTOKK 

210 IFINSTR(Z(X) ,ZX) =V0THENNEXT : GOT023 
220 PRINTrPRINTZ (X) :GOTO240 
230 PRINT-NUMBER OR LABEL NOT IN LIST" 
240 PRINT: RETURN 

999 . 

Begin main program 

1000 PRINTSTRINGS(23,143) ;" SELECT FUNCTION " j STRING$ ( 23 , 143 ) 

1005 PRINT" (L) Lookup Name or Number 
r Number" 

1006 PRINT" (S) Store List on Disk 



!R) Record New Name o 



;P) Print List' 



107 PRINTTAB(13) ; " (C) Change or delete a number or label" 



Program continues 



tion of crazy in the main string. Searching 
the same main string for the substring 
"nuts" would return zero. 

I used the INSTR command twice in the 
Phonfind program. A subroutine (lines 
200-240) uses it to search the main Phon- 
find list for a number or name. The main 
selection menu uses it to branch to dif- 
ferent sections of the program (line 1020). 

The program needs lots of room for string 
data, so line 25 clears string space. 
Because there are no fancy calculations, 
line 30 defines all variables as integers (ex- 
cept Z, which is defined as a string variable). 
I used integers V0 and V1 within routines 
where I wanted speed. Defining them here 
puts them at the top of the variables list, 
where they are available more quickly than 
analyzing the numbers zero and one each 
time they are used. 

Next, string array Z is filled from a se- 
quential disk file. A password protects the 
file from inadvertent deletion from the disk. 
The counter KK keeps track of the number of 
entries in the list. When the list input is com- 
plete, the main selection menu is displayed. 

An INKEYS subroutine (line 100) gets 
keyboard input for function selection. This 
way, there is no need to follow keyboard in- 
put with Enter. The INKEYS subroutine 
returns string ZZ, which is then used in line 
1020's INSTR command. The On. ..GOTO 
command uses the location of ZZ within 
"LRSPC" to branch to the desired program 
section. Notice that V1 (value of one) is 
added to the INSTR value; INSTR would 
return the value zero if you pressed a key 
other than L, R, S, P or C. Since the 
On. ..GOTO command starts branching with 
one we have to add one to the INSTR func- 
tion to coverthis contingency. If you press a 



The Key Box 

Model I or III 

TRSDOS 

32K RAM 

Line printer required 
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JUST FOUND 





$1.50 -*'— 

COmPUTBR SHOPPBR 

The Nationwide Marketplace tor Computer Equipment 
No. 27 March 15, 1982 J10 p* yw 



II1K \ll< KOIH »l(ls 



(SSIllliif 3SI 




Computer Shopper is your link to 
individuals who buy, sell and trade 
computer equipment and software 

among ihemselves nationwide. No 
other magazine fills this void in the 
marketplace chain. 

Thousands of cost-conscious com- 
puter enthusiasts save by shopping 
in Computer Shopper every month 
through hundreds of classified ads. 
And new equipment advertisers offer 
some of the lowest prices in the nation. 

Computer Shopper's unbiased 
articles make for some unique 
reading among magazines and 
there's a "help" column to answer 
difficult problems you may have with 
interfacing, etc. 



For a limited time you can subscribe 
to Computer Shopper with a six 
month trial for only $6. 

You risk nothing, because if you're 
not 100% satisfied after receiving 
the first issue, you may cancel and 
receive a full refund. No questions 
asked! 

If you have a MasterCard or VISA 
charge you may subscribe by calling 
the 24 hour order desk TOLL FREE 
800-327-9920. All other calls for 
information, etc. can only be 
answered at our business office 
from 8 a.m. to 5 p.m. Monday 
through Friday at 305-269-3211. Call 
or send your check or money order 
TODAY while the offer is still good. 



6 



trial, $ 6 



00 CALL TOLL FREE 
24 HR. ORDER DESK 



MC & 

VISA 
ONLY 



800-32 



excep! Florida Maska H< 



mUTSR SHOPPBR 

P.O. Box F319 • Titusville, FL 32780 
305-269-321 1 



^39 



.'$"'■ Lis! of Advertisers on page 386 
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• *FREESHIPPING* • 

WITHIN CONTINENTAL U.S.A. 



LAZYWRITER 



Latest Version Model l/lll 



$164.95 



SUPERSCRIPT by acorn $44.95 

Reg. 32K, Scripsit & L/C Disk 



DOSPLUS .3.4 $129 95 

Specify 3.4S/3.4D/or3.4lll 



-5.1 — Mod lorlll$118.95 



Mod l/lll 



LYNX 



$249.95 



autodial/answer, cables and software 



UNITERM 



by Pete Roberts • Mod l. ; 



$74.95 



Box 

of 10 $30.00 

Datalife 5V4 MD525-01 - Inq. Qty. Discount 



VERBATIM 



EDITOR ASSEMBLER PLUS 

by Microsoft -Mdl I Tape $27.95 • Disk $45.95 



MOREMAXI'S 

MAXI MANAGER Mod l/lll $84.95 
MAXICRAS Mod i/iii $84.95 

MAXI MAILMod ill $84.95 

MAXI STAT Mod l/lll $179.95 



Proofreader by Aspen. . . Mod l-lll -54.95 

Proofedit by Aspen Mod I - III -28.50 

Grammatik by Aspen . . . Mod l-lll - 54.95 
SPECIAL ALL3FORONLYS130.00 



EDASdvm.sosvs Mdl l/lll 



$69.95 



SUPER UTILITY PLUS 2.2 $46.95 

Mdl l/lll specify 40or80track 



Ribbon Reloads 

$3.50 each — $38.00 Dz. (Min. 5) 

AvailableforMX70/80/100 



ICLbvXYZTMPl/or/// 



$37.95 



MICROSOFT Fortran 80 $89.95 
ALPS - $89.95 — Basic Compiler - $1 79.95 



PRINTER STANDS 

Plexiglass 3/16 x 11.8 x 13.5 x 3.3 

Clear $13.50 Bronze -$15.95 



Space Age Stand Holds your printer at an angle wrvch 
allows the user to easily vie* the printing 3/16 x 9.3 x 
13.5 x 8 

Clear $27.50 



Bronze -29.95 



GAMES 



TAPE DISK 

Eliminator 18.45 22.45 

Starfighter 22.45 27.95 

Armored Patrol 18.45 22.95 

Sky Warrior 13.95 19.45 

Stone of Sisyphus 27.95 

Earthquakes. F. 1906 18.45 19.45 

Crush Crumble Chomp 27.95 27.95 

Voyageof Valkyrie 32.95 35.95 

Forbidden Planet 35.95 

Forbidden City 35.95 

Any Big 5 Program 14.95 18.45 

Scarfman 14.95 18.45 



We also carry Ihe lull line of ADVENTURE INT L . 

ACORN. BIG FIVE. BRODFRBUND, AVALON HILL 
MICROSOFT. MISOSYS. AUTOMATED SIMULATIONS 

and most other line software at disco. "it prices 



SEND FOR YOUR FREE CATALOG. 
No credit cards at these low prices Add $2.00 on all 

cod orders Certified Ck/MO/COD shipped immediately 
Please allow 2 weeks for personal checks For extra 
fast service phone in your COD order. Prices subject 
to change without notice. New York State residents 

please add appropriate sales tax 
WeOfterGreat Values & Promot Delivery — fry Us' 



1460325th Road -^ 
Flushing, New York 1 1 354 



10 AM-9 PM 



(212)445-7124 



Sat 
10 AM-5 PM 



"Phonfind saves me lots of time 
when the phone bill comes. . . " 



non-function key, the program branches 
back to the INKEY$ subroutine for another 
keystroke. 

Program Routines 

The Lookup routine (lines 2000-2030 and 
the subroutine starting at line 200) prompts 
for the number 01 name (or piece of either) 
to be looked up in the list. ZX takes the input 
and becomes the substring for the INSTR 
command. Subroutine 200 then searches 
each of the Z array strings for ZX. If found, 
the program displays that Z array element. 
If not found, the program displays the "Not 
in List" message. I used variable V0 within 
this subroutine for speed. 

The Record routine (lines 3000-3040) 
prompts for the new entry and receives the in- 
put directly into the Z array just beyond the 
end of the list. Then it increments the 
counter and returns to the menu. Phonfind 
stores the list on disk as a separate func- 
tion to allow input of new entries or 
changes in one session, then store them all 
at once. 

The Stoie routine (lines 4000-4080) writes 
the Z array back into the sequential file. It 
also checks each entry to make sure it 
starts with a number. If it doesn't, that entry 



is not stored. This keeps the file clean, and 
allows deletion of a record by changing it to 
a non-numeric string (see Change routine). 
Next time you run the program these 
records will be gone. 

The Print routine (lines 5000-5050) allows 
a review of the list's contents. You can 
change it to print the list on your screen. 

The Change or Delete routine (lines 
6000-6050) prompts for the entry to be 
changed, uses the subroutine at line 200 to 
locate the entry, and then prompts for the 
new entry. If you want to delete an item use 
a blank or any non-numeric character as the 
new entry. The Store routine will delete it 
the next time the list is stored to disk. 

Phonfind is not elaborate, but it saves me 
lots of time when the phone bill comes, and 
I no longer painstakingly log every call I 
make. As my list grows, I have to search for 
fewer and fewer numbers each month. By 
using the powerful INSTR command, I get a 
fast, simple program. By writing the pro- 
gram in sections, I have complete flexibility 
as a user. ■ 

Mr. Eldridge is a consultant with Robert 
Eldridge and Associates. His hobbies are 
racquet ball and computers. 



Program continued 

1010 GGSUB100 

1020 ON INSTR (•LRSPC, Y$) +1GOSUB1010 , 200 , 3 000 , 4000 , 5000 , 6000 : GOT 

01000 

2000 * — — — Routine to search array Z for Number or Label 

2010 iNPUT"Enter Number or Label to Lookup" ;ZX 

2020 GOSUB200 

203 RETURN 

3000 ' Routine to add new Name or Number to array z 

3010 PRINT"Enter new Number and Label as one string" 

3020 1NFUTZ(KK+1) 

3030 KK-KK-rl 

3 04 \d RETURN 

4000 ' ---- Routine to Store entire array Z on Disk 

4010 OPEN"0",l, "NUMBER/ SEQ. BOB" 

40 20 FORX^ITOKK 

40 29 '■■-- DON'T STORE ENTRIES WHICH DON'T START WITH A NUMBER 

4030 IFVAL(Z(X) )=V0THEN4060 

40 4 PRINT#1,Z(X) 

4050 PRINT"*"; 

4060 NEXT 

407 CLOSE: PRINT: PRINT"LIST IS STORED" . 

40 80 RETURN 

5000 ' Print Entire List on Line Printer 

5010 LPRINTTAB(20) ; "PHONFIND LIST OF NUMBERS" : LPRINT" " 

5020 PORX*lTOKKSTEP2 

5030 LPRINTTAB(5) ;Z(X) jTAB(45) ; Z(X+1) 

5040 NEXT 

50 50 RETURN 

6000 ' Routine to change or delete an entry 

6010 INPUT"ENTER NUMBER OR LABEL AS NOW EXISTS" ; ZX 

6020 GOSUB200 

6030 PRINT"ENTER NEW STRING AS IT SHOULD BE" 

6040 INPUT" (TO DELETE, ENTER A BLANK) ";Z(X) 

6050 RETURN 
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Now I'm offering my Model I and Model III 

programs for $75 each. 

They've been checked out by thousands of 

TRS-80* users, most of whom get in touch with me, 

Irwin Taranto. Thousands of phone calls later, these 

systems are completely developed, checked out, 

glitch-free. 

When people call, we've heard all the questions 

and we can answer them right off. I don't have to 

get on the phone and work through problems like 

I used to. 

Since I'm getting off so easy, the least I can 

do is drop the price- 50% for General Ledger, 

25% for the rest. 

These are my Model I and Model III programs: 
Accounts Payable It links to the General Ledger, 
calculates and prints checks and makes reports. 
It's an invoice-linked system. 
Accounts Receivable It keeps track of billed 
and unbilled invoices, open and closed items 
and aging. It prints statements and links to 
the General Ledger. 

General Ledger It keeps track of time by month, 
quarter, year and the previous three quarters. 
It even includes a Cash Journal. 
Inventory Control It gives an immediate read- 
out on any item inquiry, including quantity and 
dollar total. 



.■■See I is! ol Advertisers on page 386 



Invoicing It prints your detailed invoices 
and links to Accounts Receivable and the 
General Ledger. 

Payroll It keeps the files, computes pay and 
deductions, prints forms and checks, figures 
taxes, overtime and piecework pay in any state 
tax routine, and prints the 941-A and W-2 forms. 

They're all yours, for $75 each. You also need 
documentation when you run our systems. The 
Osborne books -one for Accounts Payable and 
Receivable, one for General Ledger, one for Payroll- 
cost $20 each. Our invoicing book costs $10. 

Just send me the coupon, or call us toll free. 
We'll ship within 48 hours. 



Please send me the following programs at $75 each: 



~l 



bookH 



Accounts Payable 






Accounts Receivable 




General Ledger 






Inventory Control 






Invoicing 






Payroll 






Add $4.50 per order for handling 

6% tax (California only) 

AMOUNT ENCLOSED 









If you need the books, add $20 each. The invoicing book is $10. 

Mastercharge □ Visa D No Expires 

G Please send me information on other Taranto business 
programs, including TRS-80 Model II accounting systems. 



Your name 

Company name. 
Address 



City /State /Zip. 



Taranto 

W0 & ASSOCIATES, INC. 

The Total System Store, 121 Paul Drive. San Rafael. 
CA 94903. Outside California, toll free (800) 227-2868. 
In California, (415) 472-2670. 



J 



*A trademark of the Tandy Corporation 
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The rest of Programming Pitch I 



Programming Pitch II 



Merton L. Davis 
3A Palmetto Arms 
Camden, SC 29020 

Oops. In Merton L. Davis's ar- 
ticle "Programming Pitch 



last month (p. 142), we made sev- 
eral grievous errors. 

First, a series of administra- 
tive boo-boos led to the dele- 
tion of the Assembly language 



listing. That listing is what you 
see below. 

Second, the second Basic 
listing accompanying that arti- 
cle (Program Listing 2) belongs 



to another sound generation ar- 
ticle submitted by Mr. Davis. 
That article will be published in 
a future issue. 
80 Micro regrets the errors. ■ 









Program Listing 












00100 


; PIANO KEYBOARD AND MUSIC GENERATOR 


7C46 CA4B7C 


00520 


JP 


Z, OCTAVE 


! PROCEED 




00110 


; PROGRAM ENTERED BY BASIC "MUSIC" DRIVER IN MAY ISSUE 


7C49 DD09 


00530 


ADD 


IX, BC 


•TO THIRD BYTE. 




00111 


;0F 80 MICROCOMPUTING 


7C4B 010500 


00540 OCTAVE 


LD 


BC,5 


■NOTE INTERVAL 




00112 


/PROGRAM BY M. 


L. DAVIS 


7C4E 23 


00550 


INC 


HI, 


/POINTS TO 3RD BYTE 




00113 


J 3A 


PALMETTO ARMS 


7C4P 7E 


00560 


LD 


A,(HL) 


;3RD BYTE IN A REG. 




00114 


J CAMDEN SC 29020 


7C50 FE30 


00570 


CP 


30H 






00120 


J 




7C52 CA817C 


00580 


JP 


Z, FOUND 


•CONTINUE UNTIL 


0A9A 


00130 


RETURN EQU 


0A9AH 


7C55 DD09 


00590 


ADD 


IX, BC 


/OCTAVE MATCH IS 


0A7F 


00140 


ENTER EQU 


0A7FH 


7C57 FE31 


00600 


CP 


31H 


•FOUND. 


260D 


00150 


VARPTR EQU 


260DH 


7C59 CA817C 


00610 


JP 


Z, FOUND 






00160 


; 




7C5C DD09 


00620 


ADD 


IX, BC 




7BFE 


00170 


ORG 


7BFEH ;0R 0BBFEH OR 0FBFEH 


7C5E FE32 


00630 


CP 


32B 




7BFE CD7F0A 


00180 


KYBRD CALL 


ENTER ; ARGUMENT IN HL 


7C60 CA817C 


00640 


JP 


Z, FOUND 




7C01 23 


00190 


INC 


HL 


7C63 DD09 


00650 


ADD 


IX, BC 




7C02 5E 


00200 


LD 


F,,(HL) ;TO POINT DE TO 


7C65 FE33 


00660 


CP 


33H 




7C03 23 


00210 


INC 


HL ; FIRST BYTE OF 


7C67 CA817C 


00670 


JP 


Z, FOUND 




7C04 56 


00220 


LD 


D, (HL) ;NOTE STRING. 


7C6A DD09 


00680 


ADD 


IX, BC 




7C05 EB 


00230 


EX 


DE,HL /POINTER IN HL. 


7C6C FE34 


00690 


CP 


34H 




7C06 DD218A7C 


00240 


LD 


IX, NOTES ; TABLE POINTER 


7C6E CA817C 


00700 


JP 


Z, FOUND 




7C0A 012800 


00250 


LD 


BC,40 ;NO. BYTES NAT. TO SHARP 


7C71 DD09 


00710 


ADD 


IX, BC 




7C0D 117800 


00260 


LD 


I)E,120 ;NO. BYTES A TO B 


7C73 PE35 


00720 


CP 


35H 




7C10 7E 


00270 


LD 


A,(HL) ; FIRST BYTE IN A REG. 


7C75 CA817C 


00730 


JP 


Z, FOUND 




7C11 FE41 


00280 


CP 


41H ;ADD TO IX UNTIL 


7C78 DD09 


007 40 


ADD 


IX, BC 




7C13 CA3B7C 


00290 


JP 


Z, SHARP ;NOTE A TO G IS 


7C7A FE36 


00750 


CP 


36H 




7C16 DD19 


00300 


ADD 


IX, DE ; FOUND AND THEN 


7C7C CA817C 


00760 


JP 


Z, FOUND 




7C18 FE42 


00310 


CP 


42H ; PROCEED TO FIND 


7C7F DD09 


00770 


ADD 


IX, BC 




7C1A CA3B7C 


00320 


JP 


Z, SHARP ; SECOND BYTE 


7C81 DD6604 


007 80 FOUND 


LD 


H, (IX+4) 


; RETURN WITH NOTE 


7C1D DD19 


00330 


ADD 


IX, DE ; MATCH. 


7C84 DD6E03 


007 90 


LD 


L,(IX+3) 


/PERIOD IN HL. 


7C1F FE43 


00340 


CP 


43 H 


7C87 C39A0A 


00800 


JP 


RETURN 




7C21 CA3B7C 


00350 


JP 


Z, SHARP 




00810 ;****TABLE OF 


NOTE DESIGNATION VS PERIOD**** 


7C24 DD19 


00360 


ADD 


IX, DE 


7C8A 41 


00820 NOTES 


DEFM 


'AN0 ' 




7C26 FF.44 


00370 


CP 


44ii 


7C8D 9207 


00830 


DEFW 


1938 




7C28 CA3B7C 


00380 


JP 


Z, SHARP 


7C8F 41 


00840 


DEFM 


'AN1' 




7C2B DD19 


00390 


ADD 


IX, DE 


7C92 C903 


00850 


DEFW 


969 




7C2D FE45 


00400 


CP 


45H 


7C94 41 


00860 


DEFM 


'AN2' 




7C2F CA3B7C 


00410 


JF 


Z, SHARP 


7C97 E401 


00870 


DEFW 


484 




7C32 DD19 


00420 


ADD 


IX, DE 


7C99 41 


00880 


DEFM 


'AN3' 




7C34 FE46 


00430 


C? 


461! 


7C9C F200 


00890 


DEFW 


24/ 




7C36 CA3B7C 


00440 


JP 


Z, ;:»Ai<>' 


7C9E 41 


00900 


DEFM 


1 AN4 ' 




7C39 DD19 


00450 


ADD 


IX, DE 


7CA1 7 900 


00910 


DEFW 


121 




7C3B 23 


00460 


SHARP INC 


HL ; POINTS TO 2ND BYTE 


7CA3 41 


00920 


DEFM 


'AN5' 




7C3C 7E 


00470 


LD 


A,(HL) ;2ND BYTE IN 'A* 


7CA6 3C00 


00930 


DEFW 


60 




7C3D FE4E 


00480 


CP 


4EH ; CONTINUE ADDITION 


7CA8 41 


00940 


DEFM 


'AN6' 




7C3F CA4B7C 


00490 


JP 


Z, OCTAVE /UNTIL 


7CAB 1E00 


00950 


DEFW 


30 




7C42 DD09 


00500 


ADD 


IX, BC ;NAT. OR SHARP OR FLAT IS 


7CAD 41 


00960 


DEFM 


'AN7 ' 




7C44 FES 3 


00510 


CP 


53H ; FOUND AND THEN 
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Our Users asked for it, and we made the 
best TRS-80 disk assembler even better! 
Now M-ZAL has: 

■ Recursive MACROS with full symbolic parameter 
substitution 

■ Conditional assembly with unlimited nesting 

■ Text Editor warm-start/ recovery option 

■ Support for all popular source file formats 

■ Load Module inspect/superzap using LINKER 

and the features that made it famous: 

■ True multi-pass assembly 

■ Full Screen Option Menus 

■ ENTRY/EXTERN symbols, relocation, and object 
module linking 

■ 8 character labels with sorted symbol table 

■ Built-in symbol table cross-reference 

■ Nested * INCLUDES (source file chaining/nesting) 

■ Lower case support (Model 3 only) 

■ Over 175 pages of documentation including 
Z-80 Technical Manual 

■ Full Screen Text Editing and much, much more! 

M-ZAL provides a modular, structured development 
environment that makes programming your TRS-80 
a truly enjoyable experience. Order yours today 
(Requires 32k, 2 disk system) 

# 1050-10 Mod 1 $149,00 

*1250-10 Mod 3 $149.00 




Full Screen Text Editor for BASIC: we were the first to 
give the TRS-80 this indispensable ability! A must for 
every BASIC programmer: 

# 1010-20 Mod 1 $24.95 

#1210-20 Mod 3 $29.95 

T-ZAL: custom designed for the Model 3, this tape 
based assembler has many of M-ZAL's most 
desired features. 

#1250-20 Mod 3 only $49.95 

XBUG: for machine language analysis and 
debugging— this tiny (2.5k) but powerful program 
lets you do it all! 

#1020-10 Modi $19.95 

#1220-10 Mod 3 $19.95 

FILEXFER: transfer any disk file between two TRS-80s. 
Use direct cable link or RS modems. Mod 1 and 
Mod 3 can be mixed. RS-232 and disk reqd. 
#1040-10 Mod 1 and 3 $49.95 



JlC. 

WbbSM 



'We've been using M-ZAL heavily to 
over two months now, and it's been 
worth its weight in gold." 




'*. well written 
overdue." 



"During the 
saved more 
time than ia 
product." 



"The editor h 
productive c 



K K 



-Chuck iesier 

'-SOFT 

ware thai is long 

-Bruce Douglass 
•Si: Vicrocomputing 
BASIC Editor Review 

lays of use, M-ZAL 
iyir programmers 

paid for the 

-William Denman 
Author of Asylum 
MED SYSTEMS 

least doubled my 
icity... Having spent a 



good deal of money on so called 
'utilities' that don't work, it's a delight 
to find one that not oni • / jp to it 
lims but surpasses the advertising" 

:. : . /:.,.;■ '■-.-::■■■ „• - . - — BAStCEdltpr user. 




Our choice for the best TRS-80 DOS: 
DOSPLUS 3.4 Mod 1 $149.00 

DOS PLUS 3.4 Mod3 $149.00 



Call or write for more information. 
All products require level II. 
Mail orders specify catalog #. 
Send check, money order, or MC/VISA 
numbers and expiration date to: 

Computer Applications Unlimited 

P.O. Box 214, Dept. ABM Rye, New York 10580 

(914) 937 6286 

N.Y. State residents add applicable sales tax. 
Outside USA and Canada add $7.00 shipping. 
Dealer Inquiries Invited, w ^ ^ 




/^\ 




COMPUTER 
APPLICATIOI 
UNLIMITED tm 



i dlv. ol CAU. Inc. 



^ 120 



TRS-80 is a TM of Tandy Corp. M-ZAL is a TM of CAU, Inc. 

Z-80 is a TM of Zilog, Inc. 



sSee List of Advertisers on page 386 
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7CB0 bfbb 


0097 


DEFW 


15 


7DF.3 43 


02200 


DEFM 


■CF5' 


7CB2 41 


00980 


DEFM 


'AS0 ' 


7DE6 3500 


02210 


DEFW 


53 


7CB5 2507 


00990 


DEFW 


1829 


7DE8 43 


02220 


DEFM 


'CF6' 


7CB7 41 


01000 


DEFM 


'AS1' 


7DEB 1A00 


2 2 3 


DEEW 


26 


7CBA 9203 


01010 


DEFW 


914 


7DED 43 


02240 


DEFM 


'CF7' 


7CBC 41 


01020 


DEFM 


•AS2' 


7DF0 0D00 


02250 


DEEW 


13 


7CBF C901 


010 30 


DEFW 


457 


7DF2 44 


02260 


DEFM 


'DN0' 


7CC1 41 


0104 


DEEM 


'AS3' 


7DF5 AC05 


02270 


DEFW 


1452 


7CC4 E400 


010 50 


DEFW 


228 


7DE7 44 


02280 


DEFM 


'DN1 ' 


7CC6 41 


01060 


DEFM 


'AS4' 


7DFA D602 


02290 


DEFW 


726 


7CC9 7200 


01070 


DEFW 


114 


7DFC 44 


02300 


DEFM 


'DN2' 


7CCB 41 


01080 


DEFM 


■AS5' 


7DFF 6B01 


02310 


DEFW 


363 


7CCE 390B 


01090 


DEFW 


57 


7E01 44 


02320 


DEFM 


■DN3' 


7CD0 41 


01100 


DEFM 


'AS 6 ' 


7E04 B500 


02330 


DEFW 


181 


7CD3 1C00 


01110 


DEFW 


28 


7E06 44 


02340 


DEFM 


'DN4 ' 


7CD5 41 


01120 


DEFM 


'AS7 1 


7E09 5A00 


02350 


DEFW 


90 


7CD8 8E00 


01130 


DEFW 


14 


7E0B 4 4 


02360 


DEFM 


■DN5' 


7CDA 41 


01140 


DEFM 


'AF0' 


7E0E 2D00 


02370 


DEFW 


45 


7CDD D007 


0115 


DEFW 


20 


7E10 44 


02380 


DEFM 


'DN6' 


7CDF 41 


01160 


DEFM 


■AF1 ' 


7E13 1600 


02390 


DEFW 


22 


7CE2 0204 


a i j 7 (3 


DEFW 


1026 


7E15 44 


02400 


DEFM 


■DN7" 


7CE4 41 


.ill?? 


DEFM 


'AF2' 


7E18 1E00 


02410 


DEFW 


30 


7CE7 0102 


81190 


DEFW 


513 


7E1A 44 


02420 


DEFM 


•DS0 1 


7CE9 41 


01200 


DEFM 


'AF3' 


7E1D 5A05 


02430 


DEFW 


1370 


7CEC 0001 


01210 


DEFW 


256 


7E1F 4 4 


02440 


DEFM 


'DS1 ' 


7CEE 41 


01220 


DEFM 


'AF4' 


7E22 AD02 


02458 


DEFW 


685 


7CF1 8000 


0123 


DEFW 


128 


7E24 44 


02460 


DEFM 


■DS2' 


7CF3 41 


01240 


DEEM 


'AF5' 


7E27 5601 


02470 


DEFW 


342 


7CF6 4000 


01250 


DEFW 


64 


7E29 44 


02480 


DEFM 


'DS3' 


7CF8 41 


01260 


DEFM 


'AF6' 


7E2C AB00 


02490 


DEFW 


171 


7CFB 2000 


01270 


DEFW 


32 


7E2E 4 4 


02500 


DEFM 


'DS4' 


7CFD 41 


01280 


DEFM 


'AF7' 


7E31 5500 


02510 


DEFW 


85 


7D00 1000 


01290 


DEFW 


16 


7E33 44 


02520 


DEFM 


•DS5' 


7D02 42 


01300 


DEFM 


'BN0' 


7E36 2A00 


02530 


DEFW 


42 


7D05 BF06 


01310 


DEFW 


1727 


7E38 44 


02540 


DEFM 


'DS6' 


7D07 42 


01320 


DEFM 


'BN1' 


7E3B 1500 


02550 


DEFW 


21 


7D0A 5F03 


01330 


DEFW 


863 


7E3D 4 4 


02560 


DEFM 


'DS7' 


7D0C 42 


01340 


DEFM 


■BN2' 


7E40 1E00 


02570 


DEFW 


3 


7D0F AF01 


01350 


DEFW 


431 


7E42 44 


02580 


DEFM 


' DF ' 


7D11 42 


01360 


DEEM 


'BN3' 


7E45 0206 


02590 


DEFW 


1538 


7D14 D700 


01370 


DEFW 


215 


7E47 44 


02600 


DEFM 


•DF1" 


7D16 42 


01380 


DEFM 


'BN4' 


7E4A 0103 


02610 


DEFW 


769 


7D19 6B00 


01 390 


DEFW 


107 


7E4C 44 


02620 


DEFM 


'DF2' 


7D1B 42 


01400 


DEFM 


'BN5' 


7E4F 8001 


02630 


DEFW 


384 


7D1E 3500 


01410 


DEFW 


53 


7E51 44 


02640 


DEFM 


■DF3 ' 


7D20 42 


01420 


DEFM 


' BN6 ' 


7E54 C000 


02650 


DEFW 


192 


7D23 1A00 


01438 


DEFW 


26 


7E56 44 


02660 


DEFM 


'DF4' 


7D25 42 


01440 


DEFM 


' BN7 ' 


7E59 6000 


02670 


DEFW 


96 


7D28 0D00 


I 4 5 


DEFW 


13 


7E5B 44 


02680 


DEFM 


1 DF 5 ' 


7D2A 42 


01460 


DEEM 


1 BS0' 


7E5E 3000 


02690 


DEFW 


48 


7D2D 5E06 


01470 


DEFW 


.163 


7E60 44 


02700 


DEFM 


'DF6' 


7D2P 42 


02490 


DEFM 


'BS1' 


7E63 1800 


02710 


DEFW 


24 


7D32 2F03 


01490 


DEFW 


815 


7E65 44 


02720 


DEFM 


'DF7 ' 


7D34 42 


01500 


DEEM 


'BS2' 


7E68 1E00 


02730 


DEFW 


30 


7D37 9701 


0] 9,0 


DEFW 


407 


7E6A 45 


027 40 


DEFM 


■EN0' 


7D39 42 


01520 


DEFM 


■BS3" 


7E6D 0D05 


0/760 


DEEW 


1293 


7D3C CB00 


01530 


DEFW 


203 


7E6F 45 


02760 


DEFM 


1 EN1 1 


7D3E 42 


0154 


DEFM 


' BS4' 


7E72 8602 


02770 


DEFW 


646 


7D41 6500 


015 5 


DEFW 


101 


7E74 45 


82780 


DEEM 


' EN 2 ' 


7D43 42 


a 156 a 


DEFM 


' BS5' 


7E77 4301 


02790 


DEFW 


323 


7D46 3200 


01570 


DEFW 


50 


7E79 45 


02800 


DEFM 


'EN3' 


7D48 42 


01580 


DEFM 


'BS6' 


7E7C A100 


02810 


DEFW 


161 


7D4B 1900 


01590 


DEFW 


25 


7E7E 45 


02820 


DEFM 


' EN 4 ' 


7D4D 42 


^ : 6 p y 


DEFM 


' BS7 ' 


7E81 5000 


02830 


DEFW 


80 


7D50 0C00 


01610 


DEFW 


12 . 


7E83 45 


02840 


DEFM 


' EN 6 ' 


7D52 42 


01620 


DEFM 


'BF0' 


7E86 2800 


02850 


DEFW 


40 


7D55 2507 


01630 


DEFW 


1829 


7E88 45 


02860 


DEFM 


'EN6' 


7D57 42 


016 40 


DEFM 


' BF1 ' 


7E8B 1400 


02870 


DEFW 


20 


7D5A 9203 


16 5 


DEFW 


914 


7E8D 4 2 


02880 


DEFM 


'EN 7 ' 


7D5C 42 


01660 


DEFM 


'BF2' 


7E90 1E00 


02890 


DEFW 


30 


7D5F C901 


01670 


DEFW 


457 


7E92 45 


02900 


DEFM 


'ES0' 


7D61 42 


01680 


DEFM 


'BF3' 


7E95 C504 


02910 


DEFW 


1221 


7D64 E400 


01690 


DEFW 


228 


7E97 45 


02920 


DEFM 


'ESI ' 


7D66 42 


017 00 


DEFM 


'BF4' 


7E9A 6202 


82930 


DEFW 


610 


7D69 7200 


01710 


DEFW 


114 


7E9C 45 


02940 


DEFM 


'ES2' 


7D6B 4 2 


01720 


DEFM 


1 BF 2 ' 


7E9F 3101 


02950 


DEFW 


305 


7D6E 3900 


017 30 


DEFW 


57 


7EA1 45 


02960 


DEFM 


'ES3' 


7D70 42 


01740 


DEFM 


'DP 6 ' 


7EA4 9800 


02970 


DEFW 


152 


7D73 1G00 


01750 


DEFW 


28 


7EA6 4 5 


02980 


DEFM 


•ES4' 


7D75 42 


01760 


DEFM 


'BF7' 


7EA9 4C00 


02990 


DEFW 


76 


7D78 0E00 


017 7 


DEEW 


14 


7EAB 4 5 


03000 


DEFM 


■ES5' 


7D7A 43 


017 80 


DEEM 


'CN0' 


7EAE 2600 


03010 


DEFW 


38 


7D7D 5E06 


01790 


DEEW 


1630 


7EB0 45 


03020 


DEFM 


'ES6' 


7D7F 43 


01800 


DEEM 


'CN1' 


7EB3 1300 


03030 


DEFW 


19 


7D82 2F03 


01810 


DEFW 


815 


7E.H5 4 5 


03040 


DEFM 


'ES7' 


7D84 43 


01820 


DEFM 


'CN2' 


7EB8 1E00 


03050 


DEFW 


30 


7D87 9701 


01830 


DEFW 


4 07 


7EBA 45 


03060 


DEFM 


'EF0' 


7D89 43 


01840 


DEEM 


'CN3' 


7EBD 5A05 


03070 


DEFW 


2 370 


7D8C CB00 


01850 


DEFW 


20 3 


7EBF 45 


03080 


DEFM 


' EF1 ' 


7D8E 43 


01860 


DEFM 


'CN4' 


7EC2 AD02 


03090 


DEFW 


6 85 


7D91 6500 


01870 


DEFW 


101 


7EC4 45 


03100 


DEFM 


'EF2' 


7D93 43 


01880 


DEFM 


i CN5 . 


7EC7 5601 


03110 


DEFW 


342 


7D96 3200 


01890 


DEFW 


50 


7EC9 45 


03120 


DEFM 


' EF3' 


7D98 43 


01900 


DEFM 


'CN6 


7ECC AB0 


03130 


DEFW 


171 


7D9B 1900 


01910 


DEFW 


25 


7ECE 45 


03140 


DEFM 


'EF4' 


7D9D 43 


01920 


DEFM 


'CN7' 


7ED1 5500 


03158 


DEFW 


85 


7 DAB 0C00 


01930 


DEFW 


12 


7ED3 45 


03160 


DEFM, 


'EF5 ' 


7DA2 43 


01940 


DEFM 


'CS0' 


7ED6 2A00 


03170 


DEEW 


42 


7DA5 0206 


01950 


DEFW 


1536 


7 EDS 4 6 


03180 


DEFM 


'EF6' 


7DA7 43 


01960 


DEFM 


■CS1' 


7EDB 1500 


03190 


DEFW 


21 


7DAA 0103 


01970 


DEFW 


769 


7EDD 45 


03208 


DEFM 


' EE7 ' 


7DAC 43 


01980 


DEEM 


'CS2' 


7F.E0 1E00 


03210 


DEFW 


3 


7DAF 8001 


C!990 


DEFW 


384 


7EE2 46 


03220 


DEFM 


'FN0' 


7DB1 43 


02000 


DEFM 


■CS3' 


7SE5 C504 


03230 


DEEW 


1221 


7DB4 C000 


02010 


DEEW 


192 


7EE7 46 


03240 


DEFM 


'FN! ' 


7DB6 43 


02020 


DEEM 


'222 4 ! 


7EEA 6202 


03250 


DEEW 


610 


7DB9 6000 


02030 


DEFW 


96 


7EEC 46 
7EEF 3101 


03260 


DEFM 


'FN2' 


7DBB 43 


02040 


DEEM 


'CS5' 


03270 


DEFW 


305 


7DBE 3000 


02050 


DEFW 


48 


7EF1 46 


03280 


DEFM 


'FN3' 


7DC0 43 


2 060 


DEEM 


•CS6* 


7EF4 9800 


03290 


DEEW 


152 


7DC3 1800 


02070 


DEEW 


24 


7EF6 46 


03300 


DEFM 


' E N 4 ' 


7DC5 43 


02080 


DEFM 


'CS7' 


7EF9 4C00 


3310 


DEFW 


76 


7DC8 1E00 


02890 


DEEW 


3 


7EFB 46 


03320 


DEFM 


'FN5' 


7DCA 43 


02100 


DEEM 


'CF0' 


7EFE 2600 


8 3 3 3 


DEFW 


38 


7DCD BF06 


02110 


DEEW 


1727 


7F00 46 


03340 


DEFM 


'FN6 ' 


7DCF 43 


02120 


DEFM 


•CF1' 


7F03 1300 


03350 


DEFW 


19 


7DD2 5F03 


2:?-' 


DEEW 


863 


7F05 46 


03360 


DEFM 


'FN7 ' 


7DD4 43 


02140 


DEFM 


'CF2' 


7F08 1E00 


03370 


DEEW 


30 


7DD7 AF01 


2 1 • , B 


DEFW 


431 


7F0A 46 


03380 


DEEM 


■FSB ' 


7DD9 43 


02160 


DEFM 


'CF3' 


7F0D 30 4 


03 (90 


DEFW 


1152 


7DDC D7 


02170 


DEEW 


215 


7F0F 46 


03400 


DEFM 


'FS1' 


7DDE 43 


02180 


DEEM 


'CF4' 


7F12 4002 


03410 


DEFW" 


576 


7DE1 6B00 


02 2 40 


DEFW 


307 
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DISCOUNT - BUY Dl 

WE SELL THE FULL LINE OF TRS-80 AT WHOLESALE PRICES 





93098 



MODEL II 

26-4002 64K I Drive 
Ask About Hard Drives 

MODEL 16 

26-6001 -128K I Drive 
26-6002 128K 2 Drives 

MODEL III 

26-1062 16K 
26-1066 48K with 
2 Drives, RS232 



COLOR COMPUTER 

26-3001 4K $309 

26-3002 16K Ext. Basic $453 

26-3003 32K Ext. Basic $569 

TRS-80 COLOR COMPUTERS 
*DISK DRIVES* 

26-3022 Disk Drive #1 $498 

26-3023 Disk Drive #2, 3, 4 $338 

PRINTERS 

26-1 158 Daisy Wheel II $1648 

25-1 165 Line Printer V $1558 

26-1 166 Line Printer VI $988 

26-1 168 Line Printer VIII $698 

26-1 167 Line Printer VII $338 

Centronics 739-1 $499 

I K9l H Ov 

PERSONAL COMPUTERS 



PERSONAL COMPUTERS 

PURE RADIO SHACK EQUIPMENT 




WRITE FOR YOUR 
FREE CATALOG 



THOUSANDS OF 

SATISFIED 

CUSTOMERS 




FREE 

* «uu- o 41-0860 

•LARGE INVENTORY 
'FAST DELIVERY 

TM TANDY CORPORATION 
FREE COPY OF WARRANTY UPON REQUEST 

MICRO 
ANAGEMENT 
SYSTEMS, INC. 

PARCEL DIVISON 

DEPT. NO. 4. 

115 C. SECOND AVE. S.W. 

CAIRO, GA. 31728 

GA. 912-377-7120 

LEARN TO 

"DO IT YOURSELF" 

AND SAVE 

ITM 



PERSONAL COMPUTERS 



MODEL III SOFTWARE 

26-1563 Scripsit I & III $79.00 

26-1566 Visicalc I $83.00 

26-1584 Check-Writer 80 $90.00 

26-1552 General Ledger $90.00 

26-1553 Inventory Ctl $90.00 

26-1556 Payroll $180.00 

26-1555 Accts. Receivable. . $135.00 

26-1554 Accts. Payable $135.00 

26-1558 Bus. Mail List $90.00 

26-2201 Fortran III $90.00 

26-1562 Profile $72.00 

26-1592 Profile III Plus $180.00 

26-1565 AAicrofiles $90.00 

26-1569 Visicalc III $180.00 

26-1590 Super Scripsit $180.00 

26-1591 Scripsit Dictionary. . $135.00 

26-1582 Time Manager $90.00 

26-1580 Project Manager $90.00 

26-1581 Personnel Manager. . $90.00 
26-1568 Medical Off. Syst. . . $270.00 
26-2203 Cobol $180.00 

COLOR COMPUTER SOFTWARE 




COIOR COMPUTER 



MODEL II SOFTWARE 

26-4515 Profile Plus $270.00 

26-451 1 Visicalc II $265.00 

26-4512 Profile II $162.00 

26-4501 General Ledger $180.00 

26-4502 Inventory Mgmt $180.00 

26-4503 Payroll $360.00 

26-4504 Accts. Receivable. . $270.00 

26-4505 Accts. Payable $270.00 

26-4507 Mail List II $108.00 

26-4701 Fortran $270.00 

26-4703 Cobol $270.00 

26-4705 Compiler BASIC $180.00 

26-4540 Statistical Analysis . $90.00 
26-4508 Medical Off. System$675.00 
26-4509 Manuf. Inventory. . . $675.00 

26-4513 Job Costing $135.00 

26-4520 Time Accounting. . . $450.00 
26-4621 Personnel Search. . . $270.00 

26-4560 Westlaw $225.00 

26-4531 Scripsit 2.0. $360.00 

26-4534 Scripsit Dictionary. . $180.00 

POCKET COMPUTER SOFTWARE 



**See List of Advertisers on page 386 
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Program continued 








7F9E 2000 


3 978 


DEFW 


32 




7F14 46 
7P17 2001 
7F19 46 


3 4 20 

03430 

03440 


DEFM 
DEFW 
DEFM 


'FS2' 

288 

•FS3' 


7FA0 47 
7FA3 1000 
7FA5 47 
7FA8 1E00 


03980 

23990 
04000 
4 fl 1 B 


DEFM 

DEFW 
DEFM 
DEFW 


'GS6' 

16 

'GS7' 

30 




7F1C 9000 
7F1E 46 


33450 
03460 


DEFW 

DEFM 


144 
•FS4' 


7FAA 47 
7FAD 8004 


04020 

04030 


DEFM 
DEFW 


'GF0' 
1152 




7F21 4800 


03470 


DEFW 


72 


7FAF 47 


04040 


DEFM 


'GF1 ' 




7F23 46 
7F26 2400 


034 80 

03490 


DEFM 
DEFW 


'FS5' 
36 


7FB2 4002 

7FB4 47 


04050 

04 05 


DEFW 

DEEM 


576 
'GF2' 




7F28 46 


03500 


DEFM 


'FS6' 


7FB7 2001 


04070 


DEFW 


2 8 8 




7F2B 1200 


3510 


DEFW 


18 


7FB9 47 


04080 


DEFM 


1 GF3 ' 




7F2D 46 


03520 


DEFM 


'FS7' 


7FBC 9000 


04090 


DEFW 


i 4 4 




7F30 1E00 


03530 


DEFW 


30 


7FBE 47 


04100 


DEFM 


' 28 4 ' 




7F32 46 


03540 


DEFM 


'FF0 1 


7FC1 4800 


04110 


DEFW 


72 




7P35 0D05 


03550 


DEFW 


1293 


7FC3 47 


412 


DEFM 


'GF5 ' 




7F37 46 


03560 


DEFM 


•FF1* 


7FC6 2400 


04130 


DEFW 


36 




7F3A 8602 


03570 


DEFW 


646 


7FC8 47 


04140 


DEFM 


' GF6 ' 




7F3C 46 


03580 


DEFM 


'FF2' 


7FCB 1200 


04150 


DEFW 


18 




7F3F 4301 


03590 


DEFW 


323 


7FCD 47 


04160 


DEFM 


'GF7' 




7F41 46 


03600 


DEFM 


'FF3' 


7FD0 1E00 


4 1 7 


DEFW 


30 




7F44 A100 


03610 


DEFW 


161 




04180 ;TONE 


GENERATOR 


FOR MUSIC 




7F46 46 


03620 


DEFM 


'FF4 ' 




04190 ;***** 






... 


7F49 5000 


03630 


DEFW 


80 


7 ED 2 CD 'F0A 


4 200 MUSIC 


CAI I, 


ENTER [PERIOD IN HI. 




7P4B 46 


03640 


DEFM 


'FF5' 


7PD5 E5 


4 2.18 


PUSH 


HL (SAVE XT 




7F4E 2800 


03650 


DEFW 


40 


7FD6 21FE7F 


3422? 


LD 


HL,DVAR | VARIABLE IN D SEG. 




7F50 46 


03660 


DEFM 


'FF6' 


7FD9 CD0D26 


04230 


CALL 


VARPTR ; POINTER IN DE 




7F53 1400 


03670 


DEFW 


20 


7 8 DC FB 


04240 


EX 


DE,HL (NOW IN HL 




7F55 46 


03680 


DEFM 


'FF7 ' 


7FDD 5E 


04250 


LD 


E, (HL) ;LO BYTE IN E 




7F58 1E00 


03690 


DEFW 


30 


7FDE 23 


04260 


INC 


HL ; AND 




7P5A 47 


03 70 


DEFM 


'GN0' 


7FDF 56 


04270 


LD 


D,(HL) ;HI BYTE IN D 




7F5D 4004 


03710 


DEFW 


1088 


7FE0 El 


04280 


POP 


HL ;GET PERIOD 




7F5F 47 


03720 


DEFM 


'GN1 ' 


7FE1 0E01 


04290 


LD 


C,01 j TO TOGGLE A 




7F62 2002 


03730 


DEFW 


544 


7FE3 IB 


04300 


DEC 


DE ;TEST FOR REST 




7F64 47 


03740 


DEFM 


'GN2' 


7FE4 7A 


043 1.0 


LD 


A,D ;GO IF VARIABLE IN 




7F67 1001 


03750 


DEFW 


272 


7FE5 H3 


04320 


OF 


E ;D EQUALS 1 




7F69 47 


03760 


DEFM 


'GN3' 


7FE6 13 


04330 


INC 


DE [RESTORE DECREMENT 




7F6C 8600 


03770 


DEFW 


136 


7FE7 2806 


4 3 40 


JR 


Z, DELAY ;SKIP TONE 




7F6E 47 


037 80 


DEFM 


' GN4 ' 


7FE9 3E0 3 


04?5fi TONE 


LD 


A, 03 [TOGGLED FROM 2 TO 


1 


7F71 4400 


03790 


DEFW 


68 


7PEB A9 


04360 


XOB 


C ;BY VALUE IN C 




7F73 47 


03800 


DEFM 


•GN5' 


7FEC 4F 


04370 


LD 


C,A ;SAVE TOGGLE 




7F76 2200 


03810 


DEFW 


34 


7FED D3FF 


043 80 


OUT 


(0FFH) ,A [VIBRATE 




7F78 47 


3 820 


DEFM 


'GN6' 


7FEF E5 


04390 DELAY 


PUSH 


HL ;EAVE PERIOD 




7F7B 1100 


03 83 


DEFW 


17 


7FF0 2 P. 


04400 


DEC 


HL .-DELAY FOP. 




7F7D 47 


03840 


DEFM 


'GN7' 


7FF1 7C 


24 410 


LD 


A,H (LENGTH OP 




7F80 1E00 


03850 


DEFW 


30 


7FF2 B5 


04420 


OB 


L [PERIOD. 




7F82 47 


03860 


DEFM 


'GS0' 


7FF3 20FB 


04430 


JR 


NZ,DELAY+1 ;ELSE 




7F85 0204 


03870 


DEFW 


1026 


7FF5 El 


04440 


POP 


HL ;GET PERIOD 




7F87 47 


03880 


DEFM 


•GS1' 


7EE6 IB 


04450 


DEC 


DE .AND CONTINUE TONE 




7F8A 0102 


3 8'iB 


DEFW 


513 


7FF7 7A 


04460 


LD 


A,D ;UNTIL END OF 




7F8C 47 


03900 


DEFM 


■GS2' 


7FF8 B3 


04470 


OR 


E .DERATION. 




7F8F 0001 


03910 


DEFW 


256 


7FF9 20EE 


04480 


JR 


NZ,TONE (ELSE, 




7F91 47 


3 920 


DEFM 


•GS3' 


7FFB C39A0A 


04 4 90 


JP 


RETURN (BACK TO BASIC 




7F94 8000 


03930 


DEFW 


128 


7PFE 44 


04500 DVAB 


he em 


'D' 




7F96 47 


03940 


DEFM 


'GS4' 


7FFF 00 


0453 


DEFB 







7F99 4000 


01950 


DEFW 


64 


7EPE 


4520 


END 


KYBRD 




7F9B 47 


03960 


DEFM 


'GS5' 


00000 TOTAL 


ER RC RE 










aRUeS 
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ay IS NO 

has established itself as the best protection aga 
r interruptions to most mini /micro-computers. 



age regulated output 
_j1 tells computer when AC is off 
Highjow and charge LED indicators 
Low battery audible alarms and UPS shutdown 
High start up capability for hard disk 
Zero crossing DC feature that handles any 
type of computer power supply 
New three stage sense circuit that protects 
from all types of power failure-including rapid 
uctive kickback 



%$m 



•afiftSS 



mm 

mm. 



V" ^ '"V- 5UN RESEARCH, INC. 
-^ '* ft &L BOX 210 OLD BAY ROAD 
^\ T eK ^ NEW DURHAM ,NH 03855 

*-'"*' "SflOTWX 510-297-444* ^285 



Microcomputing, Jun&/Jui 




The Journal of Microcomputer Applications 



Numerical analysis, statistics, simulation, information 
retrieval, engineering design, engineering economics, proj- 
ect planning & management, personal finance, scientific & 
engineering applications. Subscribe now $16 for 6 issues. 
Send check, money order or company purchase order to: 
ACCESS, P.O. Box 12847, Research Triangle Park, NC 27709 



To: ACCESS, P.O. Box 12847 

Research Triangle Park, NC 27709 
Here's my $16. Sign me up for 6 issues. 

Name 

Address 

City 

State _ 



Published by I. EDS Publishing Inc. 



Zip_ 



COLOR COMPUTER SOFTWARE 



BASIC AID 



HELP FOR THE 
BASIC PROGRAMMER 



Ai last, the development tools you need! Ail available instantly at power-up Look and see 
what Basic Aid can do 

MERGE COMMAND: Insert programs stored on cassette into your Basic program You 
can even assign new line numbers to the tile you read in Create your own tape library 1 

MOVE COMMAND: Lets you renumber any part of your Basic program GOTO's. 
GOSUB's. etc automatically changed 

AUTOMATIC LINE NUMBERING: You'll love this Never type in another line number 

PLUS 45 common Basic commands available as single key Control characters. Comes 
with convenient, easy to remove, plastic keyboard overlay All ol this in a convenient ROM 
cartridge that uses almost none ot your valuable memory CARTRIDGE $34 95 

COLORCOM/E SMART TERMINAL PROGRAM 

We didn't wait for the competition to catch up with us 1 We've added even more features to 
COLORCOM/E. our superb Smart Terminal program 

• Complete upload & download support • Send all 127 ASCII characters 

• On line cassette reads & writes • Word mode eliminates split words 

• Automatic capture of files • Off line AND on line scrolling 

• Pre-enter data before calling • Selectable RS232 parameters 

We've got the best cassette and upload/ download support available. And you can con- 
veniently print any portion of the received buffer you want CARTRIDGE $49.95 



EDITOR ASSEMBLER DEBUGGER 



*6 



95 



CCEAD: This 8K Basic Program supports cassette files, has full cursor control, line 
insertion/deletion, and much more Two pass assembler supports full 6809 instruction 
set & addressing modes, lists to screen or printer Debugger allows memory examine 
/modify, program execution If not delighted return within 2 weeks for a full refund. You 
get fully commented Basic source & complete instructions. Requires Ext Basic & 16K 
CASSETTE $6.95 

STRIPPER: The Stripper takes off all that excess fat in your Basic Programs Three valu- 
able commands: ( 1 ) Delete Remarks: (2) Pack Lines: (3) Delete Spaces Fully automatic, 
is not fooled by GOTO's, GOSUB's. etc. Your programs will run faster and take up much 
less memory CASSETTE $7.95 

CUSTOM CARTRIDGES: Put YOUR Basic program into a convenient ROM Cartridge 
It's easy' Runs instantly at power-up, frees up memory Use for Ad displays, schools, etc 
Call or write for info FROM $41 .65 



Send check, money order. 

or Visa/MC Number; 

Include $1 for postage and 

handling: Visa/MC: Phone 

for fast service. 




P.O. Box 10234 
Austin, Texas 78766 
(512)837-4665 

S 154 



J^W gnatneetina, finding microcomputing horizons 

^ * for TRS-80® Model l/lll and PMC®-80/81 



MORE THAN AN 
EXPANSION INTERFACE! 




f.XPAND your computer with the HOLMES 
expansion mainframe and one or more plug- 
in modules. 

• Mainframe includes case, power supply, 
connectors (2 mainframe styles available). 

- Single/Double density disc module 

• State-of-the-art LSI data separator 

• 5" & 8" drives, single and double density 
(optional) 

• Compatible with standard hardware & 
software 

- 80 Column Video Module 

• 80 character x 16 lines for TRS-80® monitor 

• 80 character x 25 lines for standard monitor 

• 80 x 25 mode supports Model II video 
functions 

• Software/patches for many popular 
programs 

- RS-232 / Modem Module 

• Software compatible with RS systems 

• Supports standard operating modes 

- Other modules are being developed. 

• A single-module case is available to 
support only ONE module. 

• Due to the number of options available, 
please call or write for prices. 



SPEED UP 
YOUR COMPUTER 

and add a printer 




The SPRINTER 11™ plugs into the Z-80 
socket in your computer rase with no 
soldering. 

• Select "NORMAL" or 4 MHz 
operation via the "OUT 254" software 
command (or add a switch for hardware 
control) 

• Automatic slowdown for disc & I/O 
operations 

• Wait function allows use with slow 
ROM's. 

• Includes MS FZ-80B MP. 

• Tor $ 24.50 we'll install a standard 
parallel printer port on your Sprinter 
II.™ 

SPRINTER II ™ >99.50 

printer option s 24.50 

printer cable $ 19.50 



48 K Memory 
INSIDE your Keyboard 




IM-2™ 

The INTERNAL MEMORY™ plugs 
inside your computer to give you 48k of 
reliable memory. 

• simple installation 

• easily removed 

• guaranteed 4 Ml 1/ operation 

• extremely reliable 

• compatible 

• thousands in use throughout the 
world! , 

IM-1 (32k) *86.00 (66.00 less RAM) 

IM-2 (48k) *1 39.50 (99.50 less RAM) 

See reviews ol the INTERNAL 
MEMORY™ in 80 Microcomputing ® 

(Dec. '81) and 80 US Journal (March '82) 



All products are completely assembled and tested and come with a one-year warranty and 

Please add V3.00 shipping in U.S. & Canada; all others add 15"; 

3555 South 3200 West Salt Lake City, Utah 84119 



Dealer Inquiries Invited 



prices subject to change without notice. 



a 30-day "no questions asked" return privilege 

shipping & handling 

(801) 967-2324 

^t53 Send S.A.S.E. for more information 



VISA' 



^See List ot Advertisers on page 386 
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If you liked MICROPROOF, then you'll love SON OF MICROPROOF: 



ELECTRIC WE 




T.M. 



The ultimate spelling checker. 



IMPROVED: 

• One-step proofing and correcting. 

• Lists errors to screen or printer. 

• Can display errors in context. 

• Can display dictionary to locate con 

• New precise symbolic dictionary will 

• Remarkably compact (50,000 word 
one 5 inch disk). 

• Even FASTER than MICROPROOF 
available). 

• Simple Grammatical Checking (Opt 1 

• Hyphenates automatically (Optional 
some Word Processing programs). 



! M 



rme 
Fe 



uin 



able for 



SLLECT APPROPRIATE RESPONSE: 




CORRECT MISSPELLED WORD: 
LEAVE WORD "AS IS": 

DISPLAY WORD IN CONTEXT: 
DISPLAY DICTIONARY: 
ADD WORD TO DICTIONARY: 
EXIT: 


ENTER CORRECT WORD 
HIT<ENTER> KEY 

? 

@ 
! 


WORD: (Your error) 
RESPONSE: 





EASY TO USE: Prepare your text on any Z-80 based micro- 
computer, using any of a number of popular word process- 
ing programs. When you are finished, enter the appropriate 
command, and ELECTRIC WEBSTER proofreads your 
document, displaying misspellings and typos on the screen. 
Then correcting ELECTRIC WEBSTER can display each 
error separately, requesting you to enter the correct , 
spelling for each. You are also given the option of displaying 
errors in context or adding words to ELECTRIC WEB- 
STER'S 50,000 word vocabulary. If you do not know the 
correct spelling you may also ask ELECTRIC WEBSTER to 
look it up for you and display the dictionary. Finally, 
ELECTRIC WEBSTER corrects your document. All in less j 
than a minute. 

LOW PRICES: Standard MICROPROOF is available for 
$69.50 (TRS-80). Standard ELECTRIC WEBSTER is avail- 
able for either $89.50 (TRS-80®Model I or III, Applet or 
$149.50 (CP/M7TRS-80 Model II and all others), The op- 
tional correcting feature can be added at any time for an 
additional $60. Correction feature can be ordered with 
patch to integrate with your word processing software. For 
each patch, optional Grammatical Checking feature, or 
optional Hyphenation feature, add $35. (Integration patch 
not necessary for Wordstar.™) 



SPEED is the single most important factor in a dictionary 
program. All dictionary programs will find your potential 
errors but if the program is too slow, you are not likely to use 
it. ELECTRIC WEBSTER'S speed is outstanding, ft can 
proofread a several page letter in 20 seconds. 

ELECTRIC WEBSTER'S FULL 50,000 WORD VOCAB- 
ULARY saves you time and allows you greater confidence 
in the lists of potential errors that ELECTRIC WEBSTER 
identifies. The mini-dictionary programs, with their 10,000 
and 20,000 word vocabularies, have many correctly spelled 
words omitted from their vocabularies. Consequently, they 
identify as potential "errors" many words that are actually 
spelled correctly; five to ten times as many such words as 
does ELECTRIC WEBSTER. So, when you use ELECTRIC 
WEBSTER, you will have far fewer extra words to evaluate, 
a major time savings. There will be less need to look up 
words in order to verify that they are in fact spelled correct- 
ly. The extra 80,000 words in ELECTRIC WEBSTER's 
vocabulary assures you confidence in the error lists that 
Electric Webster generates. 

HERE'S WHAT THE REVIEWERS HAVE TO SAY 
ABOUT MICROPROOF: 

"I have already found that the use of (MICROPROOF) has: 
greatly enhanced the quality of my letters and reports. This is a 
very useful product and should be obtained by anyone who ; 
uses a word processor." 

Michael Tannenbaum, CPA 

80 Microcomputing, August 1981 

"The summary review of this program? One word — Excellent. 
I highly recommend itTor anyone using a word processor for 
any need — articles, manuals, reports, and even letters of 
substantial length." 

A. A. Wicks - Program Previews 

Computronics, September 1981 

In a comparative review of proofreading programs (with small- 
er, dictionaries), MICROPROOF was found to be considerably 
faster than all the others, when tested"- against a 400 word 
sample document. } 

Phillip Lemmons 

BYTE Magazine, November 1981 ' 

"(MICROPROOF) operates with good speed and efficiency. A 

1500 word document took 26 seconds to load, process, and 

proof when the program was run on a TRS-8(rModei II under 

CP/M."® 

"Once the program is integrated, it is very friendly and any 

person able to use a word processing program can master it in 

moments." 

Frank Derfler 

Info-World, January 1982 








See your local microcomputer dealer or write to: 



CORNUCOPIA SOFTWARE 



^45 



Post Office Box 5028, Walnut Creek, California 94596 • (415) 524-8098 
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Selling 80 Mi- 
cro will make mon- 
ey for you. Consider the 
facts^ 
Fact #1: Selling 80 Micro in- 
creases store traffic— our dealers 
tell us that 80 Micro is the hottest- 
selling computer magazine on the news- 
stands. 
Fact #2: There is a direct correlation between 
store traffic and sales — increase the number of people 
coming through your door and you'll increase sales. 
Fact #3: Fact #1 + Fact #2 = INCREASED $ALE$, 
which means more money for you. And that's a fact. 

For information on selling 80 Micro, call 800-343-0728 
and speak with Ginnie Boudrieau, our bulk sales man- 
ager. Or write to her at 80 Micro, 80 Pine St., Peter- 
borough, NH 03458. 



nnicro 



80 Pine Street Peterborough, NH 03458 

800-343-0728 




WAYNE GREE 



TEXTEDIT 

| a complete 

'A-ordp."0(;esJ/;g. 
i sy stea to fea 



TEXTEDIT 

A Complete Word 

Processing System 

in Kit Form 

by Irwin Rappaport 



TEXTEDIT is an inexpensive word processor that you can 
adapt to suit your needs, from writing form letters to large 
texts. It is written in modules, so you can load and use only 
those portions that you need. Included are modules that 

perform: 

— right justification 

— ASCII upper/lowercase conversion 
—one-key phrase entering 

—complete editorial functions and much more! 

TEXTEDIT is written in TRS-80" Disk BASIC, and the modules are documented in 
the author's admirably clear tutorial writing style. Not only does Irwin Rappaport 
explain how to use TEXTEDIT; he also explains programming techniques imple- 
mented in the system. 

TEXTEDIT is an inexpensive word processor that helps you learn about BASIC pro- 
gramming. It is written for TRS-80 Models I and III with TRSDOS 2.2/2.3 and 32K. 

BK7387 $9.97 Disk Available order DS7387 $19.97 

•TRS-80 and TRSDOS are trademarks of fhe Radio Shack Division of Tandy Corporation. 



FOR TOLL-FREE ORDERING CALL 1-800-258-5473 
WAYNE GREEN BOOKS • Peterborough, NH 03458 

Use the order card in this magazine or itemize your order on a separate 
piece of paper and mail to: Microcomputing Book Department • Peter- 
borough NH 03458. Be sure to include check or detailed credit card in- 
formation. No C.O.D. orders accepted. All orders add $1 .50 handling first 
book, $1.00 each additional book, $10.00 per book foreign airmail. 
Please allow 4-6 weeks for delivery. Questions regarding your order? 
Please write to Customer Service at the above address. 





Nanos System 
REFERENCE CARDS 

For Models I, II, III and Color 

At last! No more flipping through the pages of the Basic manu- 
al! No more working through the maze of machine language in- 
structions! These cards completely summarize the Basic and 
Assembler manuals! FEATURES (on most cards): 
memory map, eyeball graphics, math instructions, basic com- 
mands, store instructions, basic functions, load instructions, 
basic statements, move instructions, special keys, exchange 
instructions, print using examples, shift instructions, basic 
special characters, compare instructions, basic and assembler 
messages and codes, branch instructions, basic facts, data al- 
teration instructions, reserved words, I/O instructions, ROM 
routines, complete character chart with graphics and space- 
compression codes, hex-dec chart, control code cross-refer- 
ence, assembler instructions commands and operators, screen 
line layout, editor commands & subcommands, condition code 
easy access 

Model I: BASIC only FC1 001 $2.95 

Model I: BASIC and Assembler FC1002 $4.95 
Model II: BASIC and Assembler FC1005 $5.95 
Model III: BASIC only FC1004 $3.95 

Model III: BASIC and Assembler FC1003 $5.95 
Colon BASIC and Extended FC1006 $4.95 



tfS& 




DOS RANDOM ACCESS & BASIC FILE 
HANDLING-By H.J. Muller. This book 
was written for the nonprogrammer. It is 
ideal for the businessman or professional 
who needs to solve and write special pro- 
grams for in-house business problems, or 
the hobbyist who wants to go beyond the 
cassette recorder and into disk storage 
and file manipulation. It is written as a 
self-instruction tutorial and will provide 
anyone with some Level II experience with 
the ability to write special programs for in- 
ventories, mailing list, work scheduling, 
record keeping, research project data ma- 
nipulation, etc. 150 pages. BK1236 $29.50 



tv 



^ 



FOR THE MODEL III 

MOD III ROM COMMENTED —Soft-Sector 
marketing, 1981. This book is not an in- 
struction course on machine language, 
but rather an information source that you 
can use time and time again for writing 
your own program or patching old Mod I 
machine language programs. It contains 
an explanation of ROMs in the latest ma- 
chine from Tandy, with must every loca- 
tion of the 14K ROMs listed, with com- 
ments. BK1235 $22.50. 



Prices do not include shipping and handling charges. Please include $1.50 for first 
book, $1.00 each additional book and $10.00 per book foreign airmail. Sorry no COD 
orders. Use the order card in this magazine to order. Allow 4-6 for delivery. Shipping 
and handling for cards only $1 .00 per order. 

80 Microcomputing Bookshelf • Peterborough, NH 03458 




1 -800-258-5473 
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a complete 
wor^rocesjng 
system in kit 
%0m. 



k WAYNE GREE! 
PUBLICATION . 



,..,, T'sc i,n " 




■TRS-80 and TRSDOS are trademarks of the Radio Shack Di- 
vision of Tandy Corporation. 



TEXTEDIT— A Complete Word Processing System in kit form 

by Irwin Rappaport 

TEXTEDIT is an inexpensive word processor that you can adapt to suit your needs, 
from writing form letters to large texts. It is written in modules, so you can load and 
use only those portions that you need. Included are modules that perform: 
— right justification 
—ASCII upper/lowercase conversion 
—one-key phrase entering 
—complete editorial functions 
—and much more! 

TEXTEDIT is written in TRS-80* Disk BASIC, and the modules are documented in the 
author's admirably clear tutorial writing style. Not only does Irwin Rappaport explain 
how to use TEXTEDIT; he also explains programming techniques implemented in the 
system. 

TEXTEDIT is an inexpensive word processor that helps you learn about BASIC pro- 
gramming. It is written for TRS-80 Models I and III with TRSDOS 2.2/2.3 and 32K. 

isbn 88006 050 6 BK7387 $9.97 Disk Available DS7387 $19.97 

Annotated BASIC— A New Technique for Neophytes. 

BASIC programming was supposed to be simple— a beginner's programming 
language which was so near to English that it could be easily understood. But, in re- 
cent years, BASIC has become much more powerful and therefore much more dif- 
ficult to read and understand. BASIC simply isn't basic anymore. 

Annotated BASIC explains the complexities of modern BASIC. It includes com- 
plete TRS-80* Level II BASIC programs that you can use. Each program is annotated 
to explain in st'jp-by-step fashion the workings of the program. Programs are 
f lowcharted to assist you in following the operational sequence. And — each chapter 
includes a description of the new concepts which have been introduced. 

Annotated BASIC deals with the hows and whys of TRS-80 BASIC programming. 
How is a program put together? Why is it written that way? By observing the pro- 
grams and following the annotation, you can develop new techniques to use in your 
own programs— or modify commercial programs for your specific use. 
Annotated BASIC Volume 1 contains Projecting Profits, Surveyor, Things to Do, Tax Shelter, Introduction to 
Digital Logic, Camelot, The Soundex Code. Deduction, Op Amp, Contractor Cost Estimating. 
BK7384 $10.95 ISBN 0-88006-028-X 

Annotated BASIC Volume 2 contains Rough Lumber List. Trip Mileage, Flight Plan. OSCAR Data. SWR/Antenna 
Design, Supermaze, Petals Around the Rose, Numeric Analysis, Demons. Air Raid, Geography Test, Plumbing 
System Design. BK7385 $10.95 ISBN 0-88006-037-9 

Order Both Volumes and Save! BK738402 $18.95 
Kilobaud Klassroom— 
A practical course in digital electronics 

by George Young and Peter Stark 

Learning electronics theory without practice isn't easy. And its no fun to build an 
electronics project that you can't use. Kilobaud Klassroom, the popular series first 
published in Kilobaud Microcomputing, combines theory with practice. This is a practi- 
cal course in digital electronics. It starts out with very simple electronics projects, and 
by the end of the course, you'll construct your own working microcomputer! 
Authors Young and Stark are experienced teachers, and their approach is simple 
and direct. Whether you're learning at home or in the classroom, this book pro- 
vides you with a solid background in electronics— and you'll own a computer that 
you built yourself! 

Kilobaud Klassroom contains Getting the Ball Rolling, Gates and Flip-Flops Explained, J.K. Flip-Flops and 
Clocked Logic. PC Boards and Power Supplies, Hardware Logical Functions, Voltage. Current and Power Sup- 
plies, Transistors, Diodes and OP Amps, Pulses and More Pulses, Counters, and Registers, Bus Traffic Con- 
trol, ROM and RAM Memories, I/O Circuitry, Parallel and Serial I/O Ports, Computer I/O III, Computer I/O IV. 
Computer I/O V, Processor Connections, Finally. . .The Kilobaud Krescendo. Eproms and Troubleshooting, 
Expansions and Programming, Machine-Language Programming, Assembly-Language Programming, Con- 
necting to the Outside World. i-ii^-»««~ *>j . «.- 

ISBN 0-88006-027-1 BK7386 $14.95 



FOR TOLL-FREE ORDERING CALL 1-800-258-5473 
WAYNE GREEN BOOKS • PETERBOROUGH NH 03458 

Use the order card or itemize your order on a separate piece of paper and mail to Wayne Green Books Att: Sales • Peterborough NH 03458. 
Be sure to include check or detailed credit card information. (Visa, Master Charge or American Express accepted.) 

No COD. orders accepted. All orders add $1.50 for the first book, postage and handling; $1.00 each additional book; $10.00 per book foreign air mail. 
Please allow 4-6 weeks after publication for delivery. Questions regarding your order? Please write to Customer Service at the above address. 
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ANNOTATED BASIC — A NEW TECHNIQUE FOR NEO- 
PHYTES.— BASIC programming was supposed to be 
simple— a beginner's programming language which 
was so near to English that is could be easily 
understood. But, in recent years, BASIC has become 
much more powerful and therefore much more difficult 
to read and understand BASIC simply isn't basic 
anymore. 

Annotated BASIC explains the complexities of 
modern BASIC. It includes complete TRS-80" Level II 



BASIC programs that you can use. Each program is an- 
notated to explain in step-by-step fashion the workings 
of the program. Programs are flowcharted to assist 
you in following the operational sequence. And— each 
chapter includes a description of the new concepts 
which have been introduced. 

Annotated BASIC deals with the hows and whys of 
TRS-80 BASIC programming. How is a program put 
together? Why is it written that way? By observing the 
programs and following the annotation, you can devel- 
op new techniques to use in your own programs— or 
modify commercial programs for your specific use. 
Annotated BASIC Volume 1 BK7384 $10.95 
Annotated BASIC Volume 2 BK7385 $10.95 
Order Both Volumes and Save! BK738402 $18.95 



—GAMES 



INTRODUCTION TO TRS-80 LEVEL II BASIC AND 
COMPUTER PROGRAMMING— by Michael P. Zabin- 

ski. Written by an experienced educator, this is the 
book for those beginners who want to learn about com- 
puters without having to become an expert. It has prac- 
tical programs, useful line-by-line comments, excel- 
lent flowcharts accompanied by line numbers and over 
200 exercises which help the reader assess progress, 
reinforce comprehension, and provide valuable prac- 
tical experience. BK1219 $10.95." 

50 BASIC EXERCISES— by J. P. Lamoitier. This book is 
structured around the idea that the best way to learn a 
language is through actual practice. It contains 50 
completely explained exercises: statement and 
analysis of the problem, flowcharts, programs and ac- 
tual runs. Program subjects include mathematics, 
business, games, and operations research, and are 
presented in varying levels of difficulty. This format 
enables anyone to learn BASIC-rapidly, checking their 
progress at each step. BK1 192 $12.95". 

THE BASIC HANDBOOK — SECOND EDITION — by 
David Lien. This book is unique. It is a virtual 
ENCYCLOPEDIA of BASIC. While not favoring one 
computer over another, it explains over 250 BASIC 
words, how to use them and alternate strategies. If a 
computer does not possess the capabilities of a need- 
ed or specified word, there are often ways to ac- 
complish the same function by using another word or 
combination of words. That's where the HANDBOOK 
comes in. It helps you get the most from your com- 
puter, be it a "bottom-of-the-line" micro or an oversized 
monster. BK1174 $19.95." 

LEARNING LEVEL II — by David Lien. Written especial- 
ly for the TRS-80, this book concentrates on Level II 
BASIC. It explores every important BASIC language 
capability. Updates are included for those who have 
studied the Level I User's Manual. Sections include; 
how to use the Editor, dual cassette operation, printers 
and peripheral devices, and the conversion of Level I 
programs to Level II. BK1 175 $15.95." 

BASIC BASIC (2ND EDITION)— by James S. Coan. This 

is a textbook which incorporates the learning of com- 
puter programming using the BASIC language with the 
teaching of mathematics. Over 100 sample programs 
illustrate the techniques of the BASIC language and 
every section is followed by practical problems. This 
second edition covers character string handling and 
the use of data files. BK 1026 $11.50." 

ADVANCED BASIC-- Applications including strings and 
files, coordinate geometry, area, sequences and series, 
simulation and graphing and games. BK100G $10.75." 

"No C.O.D. orders accepted. All orders add $1.50 for the first book, $1.00 each addi- 
tional book, $10.00 per book foreign airmail. Please allow 4-6 weeks for delivery. Ques- 
tions regarding your order? Please write to Customer Service at the following address. 



INTRODUCTION TO PASCAL— by Rodnay Zaks. A 

step-by-step introduction for anyone wanting to learn 
the language quickly and completely. Each concept is 
explained simply and in a logical order. All features of 
the language are presented in a clear, easy-to- 
understand format with exercises to test the reader at 
the end of each chapter. It describes both standard 
PASCAL and UCSD PASCAL— the most widely used 
dialect for small computers. No computer or program- 
ming experience is necessary. BK1189 $14.95." 

PROGRAMMING IN PASCAL — by Peter Grogono. The 
computer programming language PASCAL was the 
first language to embody in a coherent way the con 
cepts of structured programming, which has been 
defined by Edsger Dijkstra and C.A.R. Hoare. As such, 
it is a landmark in the development of programming 
languages. PASCAL, was developed by Niklaus Wirth 
in Zurich; it is derived from the language ALGOL 60 but 
is more powerful and easier to use. PASCAL is now 
widely accepted as a useful language that can be effi- 
ciently implemented, and as an excellent teaching 
tool. It does not assume knowledge of any other pro- 
gramming language and therefore suitable for an in- 
troductory course. BK1140 $12.95." 



40 COMPUTER GAMES FROM KILOBAUD MICROCOM- 
PUTING— Forty games in all in nine different categories. 
Games for large and small systems, and even a section 
on calculator games. Many versions of BASIC used and 
a wide variety of systems represented. A must for the 
serious computer gamesman. BK7381 $7.95." 

BASIC COMPUTER GAMES-Okay, so once you get 

your computer and are running in BASIC, then what? 
Then you need some programs in BASIC, that's what. 
This book has 101 games for you from very simple to 
real buggers. You get the games, a description of the 
games, the listing to put in your computer and a sam- 
ple run to show you how they work Fun. Any one game 
will be worth more than the price of the book for the fun 
you and your family will have with it. BK1074 $7.50." 

MORE BASIC COMPUTER GAMES— Edited by David 

H. Ahl. More fun in BASIC! 84 new games from the peo- 
ple who brought you 8AS/C Computer Games, in- 
cludes such favorites as Minotaur (battle the mythical 
beast) and Eliza (unload your troubles on the doctor at 
bargain rates). Complete with game description, list- 
ing and sample run. BK1182 $7.50.* 

WHAT TO DO AFTER YOU HIT RETURN-PCC's first 
book of computer games... 48 different computer 
games you can play in BASIC. . .programs, descrip- 
tions and many illustrations. Lunar Landing, Ham- 
murabi, King, Civel 2, Qubic 5, Taxman, Star Trek. 
Crash, Market, etc. BK1071 $16.50*. 



—BUSINESS— 



THEORY Z— How American Business Can Meet the 
Japanese Challenge— by William Ouchi. Why are the 
Japanese catching up and surpassing American in- 
dustrial productivity? What allows Japanese in- 
dustrialists to offer guaranteed lifetime employment 
to their workforce? This book will help you understand 
the theory Z managerial philosophy and its implica- 
tions for the American corporate future. Examples are 
given of the American industrial giants already 
operating under Z-style management, and the impact 
of this style on the quality of their executives and 
workers is explored. A must for the alert businessman, 
large or small. BK1226 $12.95* 

SO YOU ARE THINKING ABOUT A SMALL BUSINESS 

COMPUTER— by Richard G. Canning and Nancy C. 
Leeper For a well-organized manual on the process of 
selecting the right computer system for your small 
business, this text can't be excelled. Designed to in- 
troduce the novice in data and word processing to the 
real benefits of computerization, the book is filled with 
money- and time-saving tips, photos of equipment, 
lists of suppliers, prices, explanations of computer ter- 
minology, and helpful references to additional sources 
of information. Everyone contemplating a first com- 
puter installation should have this book. BK1222 
$14.00' 

PAYROLL WITH COST ACCOUNTING — IN BASIC— by 

L. Poole & M. Borchers, includes program listings with 
remarks, descriptions, discussions of the principle 
behind each program, file layouts, and a complete 
user's manual with step-by-step instructions, flow- 
charts, and simple reports and CRT displays. Payroll 
and cost accounting features include separate pay- 
rolls for up to 10 companies, time-tested interac- 
tive data entry, easy correction of data entry errors, 
job costing (labor of distribution), check printing 
with full deduction and pay detail, and 16 differ- 
ent printed reports, including W-2 and 941 (in CBASIC). 
BK1001 $20.00." 

SOME COMMON BASIC PROGRAMS— Published by 
Adam Osborne & Associates, Inc. Perfect for non- 
technical computerists requiring ready-to-use pro- 
grams. Business programs, plus miscellaneous pro- 
grams. Invaluable for the user who is not an experi- 
enced programmer. All will operate in the stand-alone 
mode. BK1053 $14.99 paperback. 

PIMS: PERSONAL INFORMATION MANAGEMENT 
SYSTEM- -Learn how to unleash the power of a per- 
sonal computer for your own benefit in this ready-to- 
use data-base management program. BK1009 $11.95.* 

-MONEYMAKING— 



HOW TO MAKE MONEY WITH COMPUTERS— In 10 in- 
formation-packed chapters, Jerry Felsen describes 
more than 30 computer-related, money-making, high 
profit, low capital investment opportunities. 
BK 1003 $15.00 ' 

HOW TO SELL ANYTHING TO ANYBODY— According 

to The Guinness Book ol World Records, the author, 
Joe Girard, is "the world's greatest salesman." This 
book reveals how he made a fortune— and how you 
can, too. BK7306$2.25." 

THE INCREDIBLE SECRET MONEY MACHINE-by 

Don Lancaster. A different kind of "cookbook" from 
Don Lancaster. Want to slash taxes? Get free vaca- 
tions? Win at investments 9 Make money from some- 
thing that you like to do? You'll find this book essential 
to give you the key insider details of what is really in- 
volved in starting up your own money machine. BK1 071 
$5.95.* 



Use the order card in this magazine or itemize your order on a separate piece of paper 
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MICROCOMPUTING CODING SHEETS Microcom- 
puting's dozen or so programmers wouldn't try to work 

without 'hose handy scratch Dads, which help prevent 
the little errors that can cost hours and hours of 
programming time Available for programming is 
Assembly/Machine Language (PD1001), which has col- 
umns lot address, instruction (3 bytes), source code 
(label, op code, operand) and comments; and for 
BASIC(PD1002) which is 12. columns wide. 50 sheets to 
a pad $2.39.' 



Z-80 SOFTWARE GOURMET GUIDE AND COOKBOOK 

— by Nat Wadsworth. Scelbi's newest cookbook! This 
book contains a complete description ot tee powerful 
Z-80 instruction yet and a wide variety of programming 
information. Use the author's ingredients including 
routines, subroutines and short programs, choose a 
time-tested recipe and start cooking! BK1045 $16.99." 



Z-80 



TRS-80 ASSEMBLY LANGUAGE by Hubert S. Howe, 
Jr. This book incorporates into a single volume all the 
pertinent facts and information you need to know to 

program and enjoy the TRS-80. Included are clear 
presentations of all introductory concepts, completely 
tested practical programs and subroutines, details of 

ROM and RAM and disk operating systems, plus com- 
prehensive tables charts and appendices Suitable for 
the tirst time user or more experienced use's. BK1217 
S9.95.' 

PROGRAMMING THE Z-80 - by Rodnay Zaks. Here is as- 
sembly language programming for the Z-80 presented as 
a progressive, step-by-step course. This book is both an 
educational text and a self-contained reference book, 
useful to both the beginning and the experienced pro- 
grammer who wish to learn about the Z-80. Exercises to 
test the reader are included. BK1122 $15.95.* 

INSIDE LEVEL II— For machine language program- 
mes. This is a comprehensive reference guide to the 
Level II ROMs, allowing easy utilisation of the 
Sophisticated routines they contain. It concisely ex- 
plains set-ups, calling sequences, variable passage 
and I/O routines. Part II presents an entirely new com- 
posite program structure which unloads under the 
SYSTEM command and executes in both BASIC and 
machine code with the speed and efficiency of a com- 
piler. Special consideration Is given to disk systems. 
BK1 183 $15.95.* 



Z80 




• Z-80 ASSEMBLY LANGUAGE PROGRAMMING — 

BK1177— by Lance A. Leventhal. This book thoroughly 
covers the Z-80 instruction set, abounding in simple 
programming examples which illustrate software de- 
velopment concepts and actual assembly language 
usage. Features include Z-80 I/O devices and interfac- 
ing methods, assembler conventions, and compari- 
sons with 8080A/8085 instruction sets and interrupt 
structure. $16.99.* 



6809 



6809 MICROCOMPUTER PROGRAMMING AND 
INTERFACING -by Andrew C. Staugaard, Jr. Getting 
involved with Tandy's new Color Computer? If so, this 
new book from the Blacksburg Group will allow you to 
exploit the awesome power of the machine's 6809 
microprocessor. Detailed information on processor ar- 
ete tec i ere, addressing modes, register operation, data 
movement, arithmetic logic operations. I/O and inter- 
facing is provided, as well as a review section at the 
end of each chapter. Four appendices are included 
covering the 6809 instruction set, specification sheets 
ot the 6809 family of processors, other 6800 series 
equipment and the 6809/6821 Peripheral Interface 
Adapter. This book is a must for the serious Color Com- 
puter owner. BK1215 $13.95.' 



NANOS SYSTEM 
REFERENCE CARDS 

' i'S*»"a6 yi;'„;-i ,] For Models I, II, III and 

color computer 

At last! No more flipping through the pages of the 
Basic manual! No more working through the maze of 
machine language instructions! These cards com- 
pletely summarize the Basic and Assembler manuals! 
FEATURES INCLUDE: 

memory map, eyeball graphics, math instructions, 
basic commands, store instructions, basic functions, 
load instructions, basic statements, move instruc- 
tions, special keys, exchange instructions, print using 
examples, shift instructions, basic special characters, 



compare instructions, basic and assembler messages 
and codes, branch instructions, basic facts, data 
alteration instructions, reserved words, I/O instruc- 
tions, ROM routines, complete character chart with 
graphics and space-compression codes, hex-dec 
chart, control code cross-reference, assembler in- 
structions commands and operators, screen line 
layout, editor commands & subcommands, condition 
code easy access 

Designed as a fold-up, accordion-style card, fits in your 
pocket. Panels organized for optimum speed for 
reference. 

Model I: BASIC only FC1001 $2.95 

Model I: BASIC and Assembler FC1002 $4 95 

Model II: BASIC and Assembler FC1005 $5 95 

Model III: BASIC only FC1004 $3.95 

Model III: BASIC and Assembler FC1003 $5.95 

Color BASIC and Extended FC1006 $4.95 



ALL NEW— FOR 80 OWNERS 

ENCYCLOPEDIA FOR THE T° 



* 



ENCYCLOPEDIA FOR THE TRS-80** is 

the newest peripheral for your micro- 
computer. This ten-volume reference 

series contains programs and articles 
especially selected to extend the docu- 
mentation that comes with the TRS-80. 
Volumes of the Encyclopedia are being 
issued one-at-a-time, approximately six 
weeks apart. This means that each new 
volume will reflect the latest develop- 
ments in TRS-80 microcomputing. 
Encyclopedia for the TRS-80 is avail- 
able in two editions. The deluxe 
COLLECTOR'S EDITION has a hand- 
some green and black hard cover with a 
dust jacket, A soft cover edition is also 
available. 

To order single hard cover volumes of 
the Encyclopedia please specify: 

Volume 1 EN8101 $19.95* 

Volume2 EN8102 $19.95* 

Volume 3 EN8103 S19.95" 

Volume4 EN8104 $19.95" 

Volume 5 EN8105 $19.95* 

Volume 6 EN8106 $19.95* 

Volume7 EN8107 S19.95" 

To order single soft cover volumes of the 
Encyclopedia please specify: 

Volume 1 EN8081 $10.95* 

Volume2 EN8082 $10.95* 

Volume 3 EN8083 $10.95* 

Volume 4 EN8084 $10.95* 

Volume 5 EN8085 $10.95* 

Volume 6 EN8086 $10.95* 

Volume 7 EN8087 $10.95* 



■ ENCYCLOPEDIA 
FOR THE TRS-80* 



1 

4 



.1 



SPECIAL INTRODUCTORY OFFER 

Order the entire set (the first ten volumes) 
of the Encyclopedia for the TRS-80 and 
receive the tenth volume FREE! 

10 Volume deluxe hard cover 
COLLECTOR'S EDITION —a $199.50 
value. 

EN8100 $164.00 postpaid 

10 Volume soft cover edition, a $109.50 
value. 

EN8080 $83.00 postpaid 



ENCYCLOPEDIA LOADER is the 

software companion to the 
Encyclopedia for the TRS-80. This 
special series of cassettes will 
allow you to load selected pro- 
grams from the Encyclopedia in- 
stantly. Hours of keyboarding time 
and the aggravating search for 
typos is eliminated "by using the 
Encyclopedia Loader. 

Encyclopedia Loader for Volume 1 
of the Encyclopedia of the TRS-80 
is available at a Special Introduc- 
tory Price of $12.95 (a $14.95 
value). To take advantage of this 
offer specify: 

EL800111 $12.95* 



Additional Encyclopedia Loaders 
will be available as each volume 
of the Encyclopedia for the TRS- 
80 is issued. To order specify 
Encyclopedia Loader: 



Volume2 


EL8002 


$14.95* 


Volume 3 


EL8003 


$14.95* 


Volume 4 


EL8004 


$14.95* 


Volume 5 


EL8005 


$14.95* 


Volume 6 


EL8006 


$14.95* 


Volume 7 


EL8007 


$14.95* 



"No C.O.D. orders accepted. All orders add $1.50 for the first book, $1.00 each addi- 
tional book, $10.00 per book foreign airmail. Please allow 4-6 weeks for delivery. Ques- 
tions regarding your order? Please write to Customer Service at the following address. 
"TRS-80 is a trademark of Radio Shack Division of Tandy Corp. 
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• UNDERSTANDING AND PROGRAMMING MICRO- 
COMPUTERS— BK7382 — A valuable addition to your 
computing library. This two-part text includes the best 
articles that have appeared in 73 and Kilobaud 

Microcomputing magazines on the hardware and soft- 
ware aspects of microcomputing. Well-known authors 
and well-structured text helps the reader get involved. 
$10.95* 



• SOME OF THE BEST FROM KILOBAUD MICROCOM 

PUTING — BK731 1 —A collection of the best articles that 
have appeared in Kilobaud MICROCOMPUTING. Includ- 
ed is material on the TRS-80 and PET systems, CP/M, the 
8080/8085/Z-80 chips, the ASR-33 terminal. Data base 
management, word processing, text editors and file 
structures are covered too. Programming techniques 
and hard-core hardware construction projects for 
modems, high speed cassette interfaces and TVTs are 
also included in this large format, 200 plus page edition 
$10.95.' 



DON'T (or How to Care for Your Computer)— by Rod 

nay Zaks. In plain language, with numerous illustra- 
'ions. t his book tells all the do's and don't's of the care, 
preservation and correct operation of the small com- 
puter system. Specific chapters cover each piece of 
hardware and software, as well as safety and security 
precautions and help for problem situations. Have 
your computer work right the first time and keep it 
working. No technical background required. For all 
computer users. BK1237 $1 1.95. 

YOUR FIRST COMPUTER — by Rodnay Zaks. Whether 
you are using a computer, thinking about using one or 
considering purchasing one, this book is indispen- 
sable. It explains what a computer system is, what it 
can do, how it works and how to select various com- 
ponents and peripheral units. It is written in everyday 
language and contains invaluable information for the 
novice and the experienced programmer. (The first edi- 
tion of this book was published under the title "An In- 
troduction to Personal and Business Computing".) 
BK1191 $8.95* 

MICROPROCESSOR INTERFACING TECHNIQUES 

— by Austin Lesea S Rodnay Zaks— will teach you how 
to interconnect a complete system and interface it to 
all the usual peripherals. It covers hardware and soft- 
ware skills and techniques, including the use and de- 
sign of model buses such as the IEEE 488 or S-100. 
BK1 037 $17.95.* 



A- an mi mysthrm: 




SPECIAL INTERESTS 



MOD III ROM COMMENTED— Soft-Sector marketing, 
1981 This book is not an instruction course on 
machine language, but rather an information source 
that you can use time and lime again for writing your 
own program or patching old Mod I machine language 
programs. It contains an explanation of ROMs in the 
latest machine from Tandy, with most every location of 
the 14K ROMs listed, with comments. BK1235 $22.50. 



HOBBY COMPUTERS ARE HEREMf you want to come 
up to speed on how computers work— hardware and 
software— this is an excellent book. It starts with fun- 
damentals and explains the circuits and the basics of 
programming, along with a couple of TVT construction 
projects, ASCII, Baudot, etc. This book has the highest 
recommendations as a teaching aid. $4.95." BK7322 



THE NEW HOBBY COMPUTERS-This book takes it 
from where Hobby Computers Are Here! leaves off, with 
chapters on Large-Scale Integration, how to choose a 
microprocessor chip, an introduction to programming, 
low-cost I/O for a computer, computer arithmetic, check- 
ing memory boards... and much, much more! Don't 
miss this tremendous value! Only $4.95.* BK7340 



AN INTRODUCTION TO MICROCOMPUTERS, VOL. 

—The Beginner's Book— Written for readers who know 
nothing about computers— for those who have an in- 
terest in how to use computers— and for everyone else 
who must live with computers and should know a little 
about them. The first in a series of 4 volumes, this book 
will explain how computers work and what they can do. 
Computers have become an integral part of life and 
society. During any given day you are affected by com- 
puters, so start learning more about them with Volume 
0. BK1130S7.95.- 



VOL. I— 2nd Edition completely revised. Dedicated to 
the basic concepts of microcomputers and hardware 
theory. The purpose of Volume I is to give you a 
thorough understanding of what microcomputers are. 
From basic concepts (which are covered in detail), 
Volume I builds the necessary components of a 
microcomputer system. This book highlights the dif- 
ference between minicomputers and microcomputers. 
BK1030 $12.99.* 

NEW 

INTRODUCTION TO WORD PROCESSING by Hal 

Glatzer. This book explains in plain language what a 
word processor can do, how to use one, how it improves 
productivity— especially in businesses that handle lots 
of words— and how to buy one wisely. No technical 
knowledge required, for all first-time users and those 
considering purchasing a word processor. BK1238 $12.95 

NEW 

A USER GUIDE TO THE UNIX SYSTEM by Jean Yates 
and Rebecca Thomas. Here at last is a clearly written 
book that allows you to use the Unix operating system 
easily, and at a fraction of the time it previously took. If 
you're using, evaluating or simply curious about this sys- 
tem, this is your book. BK1242 $15.99 



THE CUSTOM TRS-80 AND OTHER MYSTERIES- by NEW^ 

Dennis Kitsz. More than 300 pages of TRS-80customiz- 
ing information. With this book you'll be able to ex- 
plore your computer like never before. Want to turn an 
8 track into a mass storage unit? Individual reverse 
characters? Replace the BASIC ROMs? Make Music? 
High speed reverse video Levy; I and Levei II? Fix it if 
it breaks down? All this and much, much more. Even if 
you have never used a soldering iron or read a circuit 
diagram, this book will teach you how! This is the 
definitive guide to customizing your 80! BK1218 
$29.95.* 



WORDSTAR MADE EASY by Walter A. Ettlin. Now Word- 
Star is as simple to learn as it is easy to use. This book 
teaches WordStar in 14 easy lessons, saving hours of 
hard work, it comes with a convenient pull-out Command 
Card. BK1239$7.95 



TRS-80 DISK AND OTHER MYSTERIES - by Harvard C 
Pennington. This is the definitive work on the TRS-80 
disk system. It is full of detailed "How to use," infor- 
mation with examples, samples and in-depth explana- 
tions suitable for beginners and professionals alike. 
The recovery of one lost file is worth the price alone. 
BK1181 $22.50 • 

MICROSOFT BASIC DECODED AND OTHER MYS- 
TERIES— by James Farvour. From the company that 
brought you TRS-80 DISK AND OTHER MYSTERIES. 

Contains more than 6500 lines of comments for the dis- 
assembled Level II ROMs and six additional chapters 
describing every BASIC subroutine, with assembly 
language routines showing how to use them. Flow- 
charts for all major routines give the reader a real in- 
sight into how the interpreter works. BK1 186 $29.50. ' 



BASIC FASTER AND BETTER AND OTHER MYS- 
TERIES— by Lewis Rosenf elder. You don't have to 

learn assembly language to make your programs run 
fast. With the dozens of programming tricks and 
techniques in this book you can sort at high speed, 
swap screens in the twinkling of an eye, write INKEY 

routines that people think are in assembly language 
and add your own commands to BASIC. Find out how 
to write elegant code that makes your BASIC really 
hum, and explore the power of USR calls. BK1221 
$29.95.* 

THE CP/M HANDBOOK (with MP.'M)— by Rodnay Zaks. 
A complete guide and reference handbook for CP/M— 
the industry standard in operating systems. Step-by- 
step Instruction for everything from turning on the 
system and inserting the diskette to correct user 
discipline and remedial action for problem situations. 
This also includes a complete discussion of all ver- 
sions of CP/M up to and including 2? MP/M and 
CDOS. BK1 187 $14.95.* 

PRICES SUBJECT TO CHANGE WITHOUT NOTICE 



KILOBAUD KLASSROOM- by George Young and Peter 
Stark. Learning electronics theory without practice isn't 
easy. And it's no fun to build an electronics project that 
you can't use. Kilobaud Klassroom, the popular series 

first published in Kilobaud Microcomputing combines 
theory with practice. This is a practical course in digital 
electronics. It starts out with very simple electronics 
projects, and by the end of the course you'll construct 
your own working microcomputer! 

Authors Young and Stark are experienced teachers, 
and their approach is simple and direct. Whether you're 
learning at home or in the classroom, this book provides 
you with a solid background in electronics— and you'll 
own a computer that you built yourself! BK7386 $14.95 



TOOLS & TECHNIQUES FOR ELECTRONICS-by A A. 

Wicks is an easy-to-understand book written for the 
beginning kit-builder as well as the experienced hob- 
byist. It has numerous pictures and descriptions of the 
safe and correct ways to use basic and specialized tools 

for electronic projects, as well as specialized metal- 
working tools and the chemical aids which are used in 
repair shops. $4.95 * BK7348 



"No C.O.D. orders accepted. All orders add $1.50 for the first book, $1.00 each addi- 
tional book, $10.00 per book foreign airmail. Please allow 4-6 weeks for delivery. Ques- 
tions regarding your order? Please write to Customer Service at the following address. 



Use the order card in this magazine or itemize your order on a separate piece of paper 
and mail <c 80 Microcomputing Book Department • Peterborough NH 03458. Be sure to 
include check or detailed credit card information. 



FOR TOLL FREE ORDERING CALL 1 -800-258-5473 
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HARDWARE 



The Key Box 

HSP-30 Printer 



These old machines produce great print. 



Singer Printer Interface 



R. Mailhot 
Don Dejarnette 
1909 6th Avenue East 
Tuscaloosa, AL 35401 



Back in the Neanderthal age 
of computers (circa 1971) 
the Singer Company produced a 
line of commercial character 
printers. Slow by today's stan- 
dards, these printers produce 
excellent quality solid print not 
found in dot matrix machines. 
They have recently become 
available through surplus deal- 
ers at very attractive prices. 

Interfacing the HSP-30 line of 
character printers presents a two- 
fold problem: modification of the 
circuit to create a linefeed after a 
carriage return and data inversion 
of the strobe and busy lines. 

Solve the first problem with a 



74121 TTL chip and an R-C net- 
work. Mount this chip on the top 
of U-24 (the memory address 
register) of the HSP-30 with the 
following pin connections. 



Pin 21. 
Pin 22. 
Pin 23.. 



74121 Pin Out 


Connect To: 


Pin 14 


U-23Pin14or +5 Volts 


Pin 11 


Through 2.2K Pot to Pin 




14(74121) 


Pin 10 


Through 1MFD. Tantalum 




Capacitor to Pin 1 1(74121 


Pin 5 


U-56 Pin 6 


Pin 6 


E 24 on Circuit Board 


Pins 3,4.7 


E -24 (Ground) 



Pin 7 Data #3 Pin 17 

Pin 8 Ground Pin 35 

Pin 9 Data #4 Pin 18 



Pin 10 Ground.. 

Pin 11 Data #5.. 

Pin 12 Ground.. 

Pin 13 Data #6.. 

Pin 14 Ground.. 

Pin 15 Data #7.. 

Pin 16 Ground.. 

Pin 17 NC 

Pin 18 NC 

Pin 19 NC 

Pin 20 Ground.. 



Pin 36 
Pin 8 

Pin 27 
Pin 11 
Pin 30 
Pin 13 
Pin 31 




Busy Pin 2 

NC 

Out of Paper. Pin 31 
(or Ground) 



Most of the ground connec- 
tions are elective with the excep- 
tion of Pin 23: It must be ground- 
ed or the system will hang. 

Adjust line feed spacing 
through the 2.2K Ohm pot while 
receiving data from the com- 
puter. Place the printer in the Re- 
mote mode. If after about 15 sec- 
onds the print wheel has not 
stopped, switch to the Local 
mode and output a test line to the 
printer. This dumps the 1 K mem- 
ory buffer that may have received 
extraneous characters when you 
turned the computer on. The 
printer has a sensor detecting 
data in memory, and auto- 
matically puts the printer on-line 
when data is received from the 
computer. See Fig. 1 and Photo 1 
for location and wiring diagram. 

Solve the second problem with 
a 7404/7414 inverter chip 



mounted on top of U-29 with the 
following pin connections. 



7404/7414 Pin Out 
Pin 1 
Pin 2 
Pin 3 

Pin 4 
Pin 7 
Pin 14 



Connect To: 

Buss Connector Pin 19 
U-18 Pin 3 

B 5 Connection Nearest 
Buss (see Photo 1) 
Buss Connector Pin ? 
Soldered to U-29 Pin 7 
Soldered to U-29 Pin 14 



Connect the printer to the expan- 
sion interface parallel port 
through seven data lines, the 
data strobe, the busy signal and 
sufficient grounds to isolate the 
data lines. 



Model 1 

Expansion Interlace 37 Pin Printer Buss 

Pin 1 DataStrobe... Pin19 

Pin2 Ground Pin37 

Pin 3 Data#1 Pin 15 

Pin4 Ground Pin33 

Pin5 Data#2 Pin 16 

Pin6 Ground Pin34 

You can now output to the 
printer through all LPRINT and 
LLIST statements and any other 
parallel port statements. ■ 




-■ i :j I9 - B ■ 
PIN J -1MB 
R 5 IEND NEAREST BUS) 

PIN 2 - BJS 



SOLDER TO U29 



Photo 1 
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Fig. 1. 
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ystem for 



by J.M. Keynes 



Program Listing 1 

10 CLEAR100 

20 ONERRORGOTO1510 

30 DEFDBLA-E,G-W:DEFINTF,X,Z 

40 Al$="####, ###.##" 

50 A2$="###, ###.##" 

60 A3$="##.#*" 

70 A4$="##" 

80 A5$="###, ###.##-" 

90 A6$="#####, ###.##" 

92 CLS: PRINT" EVALUATION OF RENTAL PROPERTY .": PRINT: PRINT 

95 PRINT-NOTE: WHEN ASKED FOR A PERCENTAGE ENTER AS INTEGER NOT 

DECIMAL . ' : PRINT : PRINT 

100 PRINT'WHAT IS THE PURCHASE PRICE OF THE PROPERTY" 

110 PRINT: INPUTG 

120 IFX=4GOTO510 

13 CLS: PRINT" WHAT IS THE VACANCY ALLOWANCE? ENTER 15% AS 15 NO 

T .15 

140 INPUTVA 

150 IFX=2GOTO510 

160 CLS:PRINT"HOW MANY UNITS DOES THE PROPERTY HAVE" : INPUTUN 

17 CLS: PRINT" HOW MANY SQUARE FEET OF USABLE SPACE ": INPUTSF 

180 CLS: PRINT" YEARLY GROSS INCOME (ASSUMING 100% OCCUPANCY) 

190 INPUTGI 

200 IFX=1THEN510 

210 CI,S:PRINT"WHAT IS THE EXPECTED EXPENSE RATIO, THAT IS, THE" 

220 CLS:INPUT"YEARLY EXPENSES DIVIDED BY GROSS INCOME, IN % n ;ER 

230 IFX=3THEN510 

240 CLS:INPUT"HOW MANY MORTGAGES WILL THERE BE, 1 OR 2 B ;MN:CLS:I 

FMN>2GOTO240 

250 CLS:PRINT"FOR INTEREST ONLY OR BALLOON MORTGAGES," 

260 PRINT"MONTHS = 1000" 

270 DEFINTI 

280 MT=0 

290 FORI=1TO2:AM(I)=0:T(I)=0:RT(I)=0:Y1(I>=0 

300 CF(I)=0:PT(I)=0:NEXTI 

310 FORI=lTOMN 

320 PRINT: PRINT'FOR MORTGAGE NUMBER ";I;"CIVE THE FOLLOWINC" 

330 INPL'T"TOTAL AMOUNT OF THE MORTGAGE" j AM ( I) 

340 INPUT" THE TERM, IN YEARS" ;T ( I ) : T ( I) =T ( I) *12 

350 INPUT" THE INTEREST RATE, IN % ";RT(I) 

360 MT=MT+AM(I) 

370 NEXTI 

3 80 IFX"=5GOT051B 

390 CLS:PRINT*DESCRIBE DEPRECIATION METHODS" 

40 INPUT" ALLOCATION TO BUILDING IN % "jDl 

410 INPUT-ALLOCATION TO PERSONAL PROPERTY IN %";D2 

4 20 IFD1+D2>=100THENPRINT*TOO MUCH* :FORF3=1TO1000: NEXTF3:COTO40 
430 PRINT'WHAT METHOD OF DEPRECIATION IS TO BE USED" 

4 40 PRINT'FCR THE BUILDING. INPUT SL , DDB, 125%, OR 150%" 

450 INPUTDB$:IFY^10THEN880 

460 INPUT'TERM OF BUILDING DEPRECIATION, IN YR3"|YB 

470 PRINT'WHAT METHOD OF DEPRECIATION IS TO BE USED" 

480 PRINT"FOR PERSONAL PROPERTY, INPUT SL , DDB, 125% OR 150% 

490 INPUTDP$: IFY-11THENGOTO850 

500 INPUT*TERM OF PERSONAL PROPERTY DEP* IN YRS"/YP 

510 CLS:PRINT§26S,*I"M THINKING 

520 VS=VA*CI/100 

530 ER(1)=ER*(GI-VS)/100 

540 OI=GI-VS-ER(l) 

550 IFMN-0THEN730 

56 DEFDBLI:M1=0:M2=0:PT(1)=0:PT(2)=0:IT(1)=0:IT(2)=0 

570 FORX=lTOMN 

580 IFT(X)=1000THENIT(X)=AM(X}*(RT(X)/100) :GOTO700 

Program Listing 1 Continues 



"I'll buy the Empire State Building and the 
World Trade Center within 48 hours with 
no cash." 

You have seen the ads by a multitude 
of these so-called multimillionaires 
who, for a consideration, will make you 
wealthy overnight by arranging your pur- 
chase of single or multi family real estate 
for no money down. They even suggest 
that you can do so with a credit rating 
worse than Chrysler's! Nice looking 
young men who are well dressed and well 
scrubbed, conducted free (?) seminars. 
They wouldn't think of putting a con on 
you! The super secret information they 
sell will allow you to purchase half the 
damn city for no money down. Why, in no 
time at all, you will go about fleecing all 
those unsuspecting sellers out of their 
property, and, in many cases, you will 
wind up with bundles of cash in your 
pocket along with that choice piece of real 
estate. 

I recently wont to one of these semin- 
ars. It was well attended. The average age 
of the potential pigeons was about 50. The 
pitch was excellent. . . .in fact, the jokes 
were identical to those I heard while attend- 
ing a get-rich-quick commodity options 
seminar last year. The young man knew 
little of what owning rental property is 
really like, but he knew enough to sell his 
product to many that night. The price to 
become an instant real estate baron (or 
baroness) was, I think, $75.00. I find it ad- 
mirable that these multi-millionaires are 
willing to share their secrets for such a 
paltry sum 

So much for '•Rentalscam." Your com- 
puter will allow you to examine, quickly 
and accurately, the real potential of any 
rental property you may be considering. 
The program in Listing 1 deals with the 
real world. A few basic rules will en- 
hance the value of the program. 

KEYNES LAWS: 

• It's 3x the work you think it will be. 
If you are buying less than about 10-15 
units, plan on being your plumber, 
carpenter, and manager. If you are unwil- 
ling to work up a sweat, look for another 
investment. You can't afford manage- 
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WORD PROCESSING 

THE SUPER "COLOR" WRITER II 

The Word Processor that re-wrote the book on Word Pr 
The Super "Color" Writer is a FAST, machine code, full featured, 
character (screen) oriented word processing system for the TRS-80(" 
Color Computer and ANY printer. The video display is styled after ■ 
professional phosphor (green characters on black background) display 
for hours of use without eye fatigue (optional orange on black). The unique 
print WINDOW frees you from 32, 51 or 64 character lines FOREVER! This 
window can be moved anywhere in the text file, up, down, left or right to 
display the text as it will be printed without wasting paper. You can create 
or edit Super "Color" Terminal files. ASCII files, BASIC programs or 
Editor/ Assembler source listings. It's simple enough for beginners with 4K 



System Size 
TAPE: Text space 
ROMPAK: Text space 

ISK: Text space 

ight Justify 
Video Window 

dit any ASCII File 



2.5K 15K 



ER "COLOR" 

. Smart Terminal, High-speed Data . 

r "Color" Terminal turns the Color Computer into a Super-smart 

with all the features of VIDEOTEX(TM) plus much more. 

NICATE with Dow Jones & CompuServe and with computers like 

the TRS-80(TM) MODEL I, II, III, APPLE etc., via moden or RS-232 direct! 

Save the data to tape or print it! Reduces ON— LINE cost to a minimum! 

FEATURES 

10 buffer size settings from 2-30K • Buffer full indicator 'Lprints buffer 
contents»Full 128 ASCII keyboard •Compatible with Super "Color" Writer 
files • UPLOAD & DOWNLOAD ASCII files, Machine Language & Basic 
programs* Set RS-232 parameters •Duplex: Half/Full • Baud Rate: 110, 



WM ' WW'WP 



ASCII files, Machine 
copying any tape. 



The Disk version offers all the features listed above plus Host ability in full 
duplex • Lower case masking • 10 Keystroke Multiplier (MACRO) buffers 
on disk to perform repetitive log-on tasks and send short messages (up to 
.255 bytes) •Programmable prompts for send next line •Selectable 



Wi-mmmmm^ 



commands automatically, PROGRAMMABLE text file chaining, 
PROGRAMMABLE column insert & delete, and right hand 

USTIFICATION with punctuation precedence, the choice is clear but 

lore's still more! 
The Super "Color" Writer takes full advantage of the new breed of "smart 

irinters" with Control codes 1-31, 20 Programmable control codes 0-255 



Line Printer IV, VII, VIII drivers. 

CHECK THESE FEATURES!! 

HIGH SPEED & normal operations • 32K Compatible • Windc .. 

• HELP table • 1 28 character ASCII & graphics • Memory left • Lower case 

• Full cursor control • Quick paging • Scrolling • Word wrap around • Tabs 

• Repeat all functions • Repeat last command • Insert character & line • 
Delete character, delete to end Of line, line to cursor, line & block • Block 
move, copy & delete • Global Search, Exchange & Delete • Merge or 
Append files • Imbed Control Codes in text • Underline • Superscripts • 
Subscripts* Headers, Footers & 2 Auxiliary footnotes on odd, even or all 
pages definable position • Flush right • Non-breakable space • 4 centering 
modes: 5, 8.3, 10 & 16.7 (CPI)»Full page & print formatting in text "Single 
sheet pause • Set Page length • Line length. Line spacing, Margins, page 
numbers»Titlepages»Printerbaud:110,300,600,1200,2400 "Linefeeds 
after CR • Soft & hard formfeed • Works with 8 bit printer fix • and more! 

SUPER "COLOR" WRITER DISK 

The Disk version of the Super "Color" Writer works with theTRS-80C Disk 
System and has all the features listed above plus many more! Use with up 
to four Disk Drives. Includes an extended HELP table you can access at 
any time. Call a directory, print FREE space, Kill disk files and SAVE and 
LOAD text files you've created all from the Super "Color" Writer. Print, 
merge or append any Super "Color" Terminal file, ASCII file, BASIC 
program or Editor/ Assembler source listing stored on the Disk ot tape. The 
Super "Color" Writer Disk version has additional formatting and print 
features for more control over your printer and PROGRAMMABLE 
• chaining of disk files for "hands off" operation. Print an entire BOOK 
without ever touching a thing! 



option • Printer Baud: 110, 300, 600, 1200 & 2400 • Documentation. 

TAPE $39.95 ROM PAK $49.95 DISK $69.95 

Documentation only, $4.00 Refundable with purchase. 

16K RAM KIT $15.99 

PREMIUM 16K 200 Ns Ram for TRS-80 Color Computer. Includes ram test 
instructions and a ONE YEAR GUARANTEE. 32K upgrade 'instructions- 



a ROMPAK or execute tape based pr 
Kit includes 1 socketed P.C. board that hoi 



housing to fit the rom port. $24.95 



2716 2K 5v EPROM $5.95 ea. 



2K Static RAM $19.95 ea. 



Includes comprehensive operators m 

TAPE $49.95 ROM PAK $74.95 

Manual only, $7.00 Refundable with purchase 






Allow 2 extra weeks for personal checks. C.O.D. orders add 
$2.00. When ordering specify computer type and add $2.00 
for S/H. Minn, residents add 5% sales tax. VISA/Master Chg. 

DEALER INQUIRES ARE INVI 






COLOR GAMES!! 
FEATURING GREAT GRAPHICS & SOUND! 

ADVENTURE 3-PAK Requires 16K Extended Basic TAPE $24.95 
This TRILOGY OF 3-D FANTASY GAMES takes you to the WORLD 
UNDER THE CIMEEON MOON. Engage in ritual combat with TooamOath 
Narthokc Monsters and skilled warriors. Advance in rank with play 
experience. Then adventure through DAZMAR'S UNDERWORLD OF 
DOOM to the forbidden ruins of Castle Argaan. Search for the Eye of 
Dazmar while avoiding the sorceror's intricate traps. Survivors must then 
negotiate the perilous peaks of the Ugrek Mountains to the FORSAKEN, 
GULTCH where the wicked idol awaits restoration. 
VEGAS 5-PAK Requires 16K Extended Basic TAPE $19.95 

The THRILLS OF A VEGAS CASINO at home. Five action packed Vegas 
games for up to four players: CASINO CRAPS * 21 * ONE ARMED BANDIT 
* UP & DOWN THE RIVER * KENO. Bank tracks players' winnings from 
game to game • realistic cards • regulation tables * boards • authentic 
sounds • lively graphics • official rules in each game. 

COMBAT 3-PAK Requires 16K Extended Basic TAPE $24.95 

Three action packed two player games featuring lifelike graphics and 
sound of LASER FIRE. CANNONS and PHOTON TORPEDOES. 
2-1-0 TANK COMBAT five terrains • the experienced arcade player can 
design combat scenario. STELLAR BATTLE pilot a Flex-Wing Fighter at 
incredible speeds in enemy space taking out Dorian Tye Fighters 
defending the Imperial Star Fortress. GALACTIC BLOCKADE maneuver 
your craft in a course that boxes your opponent but avoid cosmic dei 
and hostile space probes! 






TRS-80 it a registered trademark of the Tandy Corp. 
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NOW YOUR COMPUTER 
CAN ACT LIKE A 
COMPUTER SHOULD!!! 
WITH OUR 
MAGNETIC 
MAGAZINES, 
YOUR MICRO 
WILL ENTERTAIN, 
EDUCATE, AND 
CHALLENGE YOU. 

On cassette or diskette*, you will receive 6-10 programs every 
month ranging from games, home entertainment, and personal 
finance, to more of our unique "teaching"' programs. 
Our next issue will include: 

1. HOME INVENTORY 

2. Reversi Board Game with Graphics 

3. Generating Music and Sound Effects 

4. Machine Language Programming (I) 

5. Utility of the Month (II) 

You've already missed Stock Market Analysis, Concentration. 
Checkers. Golf, Algebra and Geometry Tests and Football, tr 
Later issues will include Backgammon, Chess, all Tax Sche- 
dules, Baseball, and many more. So don't let another issue 
pass you by! Subscription price for cassette is $50 per year, 
$30 per Vi year and $10 for a trial issue; for diskette $75 per 
year, $45 per Vi year, and $15 for a trial issue. 
-i-lBack issues available on request) 



THE COLOR ACCOUNTANT 



Wilh our complete home accounting system, keeping track of 
your finances can be as easy as PI. 

1. Chart of Accounts Maintenance 

2. Complete Checkbook Maintenance 

3. Tax Deduction Flags 

4. Net Worth Statement 

5. Income I.*ss Expense Statement 

6. Complete Graph Package (graphs any files) 

7. Payments and Appointments Calendar 

8. Home Budget Analysis 

9. Mailing List 

10. Schedule 1040 (Long Form) 

11. Decision Maker 

12. Schedule G (Income Averaging) 

All programs are menu-driven and allow add/change/delete. 
Also, all tiles and statements can be listed to screen or printer, 
and saved to cassette or diskette. The cost of THE COLOR 
ACCOUNTANT is $75 for cassette and $80 for diskette. 
This package requires 16K. THE COLOR ACCOUNTANT 
also comes with 40 pages of documentation. 




the 

programmer's 

program 

Do you know all the innovative ways of using BASIC com- 
mands? The staff at the Programmer's Institute have designed a 
set of programs explaining everything the manuals omit. 
The Programmer's Program leads you step by step through the 
fundamentals of programming your computer. Then you explore 
the finer points... multiple loops , queues, stacks , game program - 
ming , sorts , trees , boolean logic , and memory savers. All these 
methods make your programming tasks easier and more efficient. 
Difficult (and very useful) programs are created before your eyes, 
and designed so you learn at your own speed! The Programmer's 
Program is a must for every owner of a microcomputer. 
($50 cassette, $55 diskette). 



Order both The Programmer's Program and 1 year's subscrip- 
tion, and the total cost is only $75 cassette. $100 diskette. If 
you order now, you will receive a Football Program and 
Computerized Telephone Directory ABSOl.LTr.LY FREE 
with any $75 order. So don't wail . . . order today! 



THE PROGRAMMER'S INSTITUTE 

A Kuturehouse Company 

P.O. Box 3191 Dept. B 

Chapel Hill, N.C. 27514 

(919) 489-2198 MC & Visa Welcome 

Name • 

Address 

City/St 




Programmer's Program C Year Subscription 
Color Accountant Z '/: Year Subscription 
Type of Computer: Z Trial Issue 
□Cassette Diskette 



TRS-80 is a trademark of the Tandy Corp. The Programmer's 
Program, TRC, and The Color Accountant are trademarks 
of the Programmer's Institute. 



* All software available on cassette for MODEL 1, III. 
COLOR. On diskette for MODEL III. ^245 



Program Listing 1 Continued 

590 I(X)=RT(X)/1200 

600 T=(I(X)+1) [(-T(X)) :T=1-T:MP(X)=I(X)*AM(X)/T 

610 MP(X)=INT(MP(X)*100+.5)/100 

620 IT(X)=0:PT(X)=0:RP=AM(X) 

630 F0RZ=1T012 

640 IM=INT(RP*I(X)*100+.5)/100 
650 PM=MP(X)-IM 
660 IT(X)=IT(X)+IM 
670 PT(X)=PT(X)+PM 
6 80 RP=RP-PM 

6 90 NEXTZ 

700 IT=IT+IT(X) :PT=PT+PT(X) 

710 NEXTX 

720 M1=PT(1)+IT(1) :M2=PT(2)+IT(2) 

730 CF=0I-M1-M2 

740 PP=PT(1)+PT(2) 

7 50 AM=AM(1)+AM(2) 
760 RN=CF+PP 

770 EQ=G-AM 

7 80 RT=RN/EQ*100 

790 DP=0 

800 IFDB$="DDB"THENDP=D1*G/YB/50:GOTO850 

810 IFDB$="SL"THENDP=D1*G/YB/100:GOTO850 

820 IFDB$=" 125% "THENDP=Dl*G/YB*. 0125 :GOTO850 

830 IFDB$="150%"THENDP=Dl*G/YB*.015:GOTO850 

840 PRINT: PRINT"ENTER PROPER DEPRECIATION METHOD" :FORY=1TO1000 :N 

EXTY:Y=10:GOTO430 

850 IFDP$="DDB"THENDP=DP+D2/YP/50:GOTO900 

860 IFDP$="SL"THENDP=DP+D2*G/YP/100:GOTO900 

870 IFDP$="125%"THENDP=DP+D2*G/YP*.0125:GOTO90 

880 IFDP$="150%"THENDP=DP+D2*G/YP*.015:GOTO900 

890 PRINT: PRINT"NEED METHOD FOR PERSONAL PROPERTY DEPRECIATION": 

FORY=1TO10 00 : NEXTY : Y=ll : GOT047 

900 TI=RN-DP 

910 PU=G/UN 

920 PF=G/SF 

930 CR=OI/G*100 

940 MR=G/(GI-VS) 

950 ' 

960 CLS 

970 PRINT "COMPUTED GROSS " ; : PRINTUSINGAl$;GI ; 

980 PRINTTAB(3 3) "MTG PMT YR1 #1 #2" 

990 PRINT"VAC ALLOWANCE "; j PRINTUSINGA4$;VA; : PRINT" % ";:PRINTU 

SINGA2$;VS; 

1000 PRINTTAB( 33) "PRINCIPAL ";: PRINTUSINGA2$;PT ( 1) ;: PRINT" " ; : PR 

INTUSINGA2$;PT(2) ; 

1010 PRINT'EXP. RATIO ";: PRINTUSINGA3$;ER; : PRINT" %";:PRINT" "»: 

PRINTUSINGA1$;ER(1) ; 

1020 PRINTTAB( 33) "INTEREST ";: PRINTUSINGA2$; IT ( 1) ;: PRINT" " ; : PR 

INTUSINGA2$;IT(2) ; 

1030 PRINT"OPERATING INCOME " ; : PRINTUSINGA1$;0I ; : PRINTTAB(33) " 

TOTAL ";:PRINTUSINGA2$;Ml;:PRINT" "; :PRINTUSINGA2$;M2; 

1040 FORX=0TO6 3: PRINT" +";: NEXT 

1050 FORY=0TO11:SET(64,Y) :NEXTY 

1060 PRINT"CASH FLOW ";: PRINTUSINGA5$; CF ;: PRINT" ";:PR 

INTTAB(33) "PURCHASE PRICE " ; : PRINTUSINGA6$;G; 

1070 PRINT"PRIN. PAYMENT " ; : PRINTUSINGA5$; PP; 

1080 PRINTTAB( 33) "MORTGAGE TOTAL " ; : PRINTUSINGA6$; AM; 

1090 PRINT"EQU RTN = ";: PRINTUSINGA3$;RT; : PRINT" % ";:PRINTUSI 

NGA5$;RN; 

1100 PRINTTAB( 33) "EQUITY " ; : PRINTUSINGA6$; EQ; 

1110 PRINT'DEPRECIATION " ; : PRINTUSINGA5$;DP; 

1120 PRINTTAB(33) "% RETURN ON INVESTED $ " ; : PRINTUSINGA3$;CR; : P 

RINT" %"; 

1130 PRINT"TAXABLE INCOME " ; : PRINTUSINGA5$;TI ; 

1140 PRINTTAB( 33) "MULTIPLIER (X EARNINGS) " ; : PRINTUSINGA3$;MR; 

1150 FORX=0TO63:PRINT"+"; :NEXTX:FORY=15T029:SET(64,Y) :NEXTY 

1160 PRINT"PRICE PER UNIT = " ; : PRINTUSINGA1$; PU; 

1170 PRINTTAB( 33) "PRICE / SQ FT = " ; : PRINTUSINGA2$; PF ; 

1180 FORX=0TO6 3:PRINT"+"; : NEXTX 

1190 PRINT"D0 YOU WISH TO 1 - SHOW SUMMARY 2 - CHANGE A VALUE 

1200 PRINT" 3 - RERUN THE PROGRAM 

1210 INPUT"ENTER THE NUMBER OF YOUR CHOICE: ";F 

1220 IFFOABS(INT(F) ) ORF>4GOTO1210 

1230 ONFGOTO1240,1380,10 

1240 CLS: PRINT" PRICE"; TAB (33) "" ; : PRINTUSINGA6$;G 

1250 PRINT"GROSS INCOME" ;TAB(33) "";: PRINTUSINGA6 $;GI 

1260 PRINT: PRINT'DEPRECIATION" ;TAB( 20) "% ALLOC. " ;TAB(30) "YEARS"; 

TAB (40) "TYPE „ ,. „ , 

Program Listing 1 Continues 
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Program Listing 1 Continued 

1270 PRINT"BUILDING";TAB(20)D1;TAB(30)YB;TAB(40)DB$ 

1280 PRINT" PERSONAL PROP. " j TAB ( 20) D2 ; TAB ( 30 ) YP; TAB ( 40 ) DP$ 

1290 IFMN=0THENPRINT:PRINT"THERE ARE NO MORTGAGES" :GOTOl3 3 

1300 PRINT: FORXl=lTOMN:PRINT"MTG. #";Xl;"IS $" ; : PRINTUSINGA6$; AM 

(XI) ;: PRINT" AT" ; RT (XI) ; "% " ; : IFT (XI ) =1000THENPRINT"FIRST YEAR I 

NTEREST ONLY":GOTO1320 

1310 PRINT"OVER";T(Xl) ; " MONTHS. 

1320 NEXTX1 

1330 PRINT: PRINT"THE BUILDING HAS"UN; "UNITS AND" ; SF ; "SQUARE FEET 



1340 

NGE 

1350 

1360 

1370 

1380 

1390 

1400 

1410 

1420 

1430 

1440 

1450 

1460 

1470 

1480 

1490 

1500 

1510 

ED. 

1520 

1530 

1540 

fA$: 

1550 

1560 



PRINT: PRINT"DO YOU WISH TO 1 - DISPLAY FIRST YEAR 2 - CHA 

PRINT" A VALUE 3 - RERUN PROGRAM 

INPUTX:X=ABS(INT(X) ) :ONXGOTO950 ,1380 ,10 

CLS:GOTO13 40 

CLS 

PRINT: PRINT"DO YOU WISH TO CHANGE: 

PRINT" 

PRINT" 

PRINT" 

PRINT" 

PRINT" 

PRINT" 



1 - COMPUTED GROSS INCOME 

2 - VACANCY ALLOWANCE 

3 - EXPENSE RATIO 

4 - PURCHASE PRICE 

5 - MORTGAGE INFORMATION 

6 - DEPRECIATION INFORMATION 
PRINT: PRINT"ENTER THE NUMBER OF YOUR CHOICE " ; : INPUTX 
IFXOABS(INT(X) ) ORF>6THEN1460 
ONXGOTO180,130,210,100,240,390 

GOTO1460 
END 

CLS:IFERR/2+l=llTHENPRINT"A DIVIDE BY ZERO ERROR HAS OCCURR 
THIS USUALLY"ELSE1550 

PRINT"MEANS THAT A VALUE WAS NOT ENTERED PROPERLY. iT 
PRINT"MIGHT MEAN THAT THE ERROR OTHERWISE WAS COMPUTED. 
INPUT"LET'S GO BACK AND TRY AGAIN. PRESS ENTER WHEN READY" 
GOTO 10 
PRINT"AN ERROR HAS OCCURRED. LET'S GO BACK AND TRY AGAIN. 
INPUT'PRESS ENTER TO RERUN PROGRAM. " ;A$:GOTO10 



_'.' -. ■ Program Listing 2 

10 CLEAR1000 : GOTO20 

20 CLS : CLEAR : LPRINTCHR$ (30) 

30 U$="#.##" : T$="####.##" : S$="###.##" : V$="##.#" : X$="#### 

##.##" : Z$="######" 

40 PRINT : PRINT : PRINT"YOU HAVE SIX OPTIONS... 

50 PRINT : PRINT 

60 REM USE DOWN ARROW TO ENTER THE FOLLOWING ON NEW LINES 

70 PRINT" 1. INVESTMENT ANALYSIS 

2. COMMISSION SCHEDULE 

3. COVERED OPTION WRITING 

4. USER DETERMINED PRINTOUTS 

5. COMPARE INTEREST RETURN ON COMMERCIAL PAPER VS. A CD 

6. ACTUAL RETURN ON A DISCOUNTED BOND VS A CD OR TREASURY BOND. 
80 PRINT 

90 INPUTMU : IF MU=1 -THEN 1290 ELSE IF MU=2 THEN 1190 ELSE I 

FMU=4 THEN 1570 ELSE IFMU=5 THEN 1940 ELSE IFMU=6 THEN 1640 

100 CLS : PRINT"COVERED OPTION WRITING ANALYSIS." : PRINT : PRIN 

T : INPUT"NO. OF SHARES x 100 , 200 , 300 , 500 , OR 1000. ";N: IF N<100 T 

HEN N=100 

110 INPUT"STOCK PRICE (EXPRESSED AS IN DECIMAL). ";S : E=S*N 

120 INPUT"OPTION STRIKING PRICE", -SP 

130 INPUT"OPTION PRICE (EXPRESSED AS DECIMAL). ";0 : F=0*N 

140 INPUT"DAYS TO EXPIRATION" ; D 

150 INPUT"CURRENT MARGIN RATE";IR 

160 INPUT"COMMISSION DISCOUNT" ;C : 

170 GOSUB 1140 

180 INPUT"DIVIDENDS PER SHARE TO EXPIRATION" ;DD : DD=DD*N 

190 PRINTDD 

200 CLS : PRINT : INPUT"FOR PRINTOUT=2" ; A4 

210 IFA4=2 THEN LPRINT"COMPUTER STUDY OF A COVERED OPTION WRITE" 

: LPRINT"WITH THE FOLLOWING PARAMETERS : " : LPRINT 
220 IFA4=2 THEN INPUT"ENTER STOCK SYMBOL AND OPTION DATA";W$ : L 
PRINT" " : LPRINTW$ 

230 IFA4=2 THEN LPRINTN; " SHARES AT $";S;" PER SHARE." : LPRINT" 
WRITE OPTION FOR $";0;" WITH A STRIKING PRICE OF " ; SP : LPRINT 
240 PRINTN;" SHARES AT $";S; n PER SHARE." : PRINT" WRITE OPTION 
FOR $";0;" WITH STRIKING PRICE OF ";SP Program Listing 2 Continues 



: IR=IR/100 
C=1-(C/100) 



OWESTPR 





odel II 64K $3049 



IHI^HB 




lodel III 16K $829 




Line Printer VII $309 

n „, n . T . Microline 80 $394 

OKIDATA Micro|ine 82 $499 

EPSON MX-70 $369 

EPSON MX-80 $4 79 



$ 




MOST ORDERS 

SHIPPED WITHIN 

ONE BUSINESS DAY 



$ 



VERBATIM DATALIFETM DISKETTES 
5% -inch (box of 10) $25.95 

8 inch Double- Density. $43.95 

• Payment Money OrcMr Casnier s 
Check. Certified Check Personal 
Checks require 3 weeks lo clear VISA 
MASTERCHARGE — Add 3% 

write or call for our complete price list. 
call (602) 458-2477 

■m All prices are mail order only bh 

© &. feej f % M C 



2185 E. FRY BLVD. 



^ 130 



and 

101 W. FRY BLVD. 

SIERRA VISTA, AZ 85635 

TRS-80 is a trademark of Tandy Corporation 



^See List ot Advertisers on page 386 
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DURABILITY 
EXCELLENCE 
NO ACCIDENT WITH 
SCOTCH DISKETTES FROM 
MEDIA TECH 

Top quality 055*" 
at a low price of mm ea. 

Full line of 3M computer supplies, stock 
paper and labels available 

*5 1 A" single side, single density in quantity 
of 50 +. Packaged 10/ctn. 

ORDER TOLL- / 

FREE 
1-800-248-0282 





meDiA 

T€CH 



ASSOC. 

IOC. ^4Q5* 



(517) 676-4205 P.O. BOX 27271 
LANSING, MICHIGAN 48909 



Authorized Distributor 
information Processing Products 



3Mj 



Grafpac-80 is an easy to use. universal 

Graphics program designed to drive any 
dot addressable Crt, printer, plotter. 
Grafpac-80 takes it's data from your disk 
files and is usable from: Basic, Fortran 
Pascal, Fourth, Cobol, etc. 

Grafpac-80 has these features: 

• Circle, Elipse, Sector, Arc 

• Line Relative and Absolute 
•2D and 3D Cordinate Systems 
•Character Generation with 360 

degrees rotation and size control. 
•Over 15 additional commands 
•Pie, Bar, Scatter and X, Y Plots 
•Maps of the USA and the World 
•Various Pictures 

Grafpac-80 is available for: TRS-80 Model 1 , 
2 with 48K and disk, CP/M systems with 48K 
Versions already configured for: Epson MX-80 
with Groftrax, Calcomp 565 x,y plotter, 
Matrox ALT 51 2 SI 00 Graphics board. 
TRS-80, $29.95 CP/M, S59.95 



Call or write. 



M.E.S.C. 
Parkhurst Drive 
Salisbury. MD 21801 
301-742-7333 
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250 IFA4=2 THEN 


LPRINTD;" 


DAYS 


TO EXPIRATION.";" MARGIN RATE AT 


";IR*100; "%" : LPRINT 






260 PRINTD;" DAYS TO EXPIRATION.";" MARGIN RATE AT " ; IR*100 ; " % 


270 PRINT 








280 GOSUB 510 








290 CM=Z+OC 








300 G=CM*C 








310 I=E-F+G-DD 








320 IFS<SP THEN 


340 ELSE 


IFA4=2 THEN LPRINT"THE MAXIMUM RETURN W 


ILL BE REALIZED 


PROVIDED 


THE STOCK" : LPRINT"REMAINS ABOVE ";SP; 


".";" CASH INVESTMENT $" ; 


I : LPRINT"CASH RETURN" , "ACTUAL" , "ANNUA 


LIZED", "BREAK EVEN" 






330 IFS>SP THEN 


PRINT "THE 


MAXIMUM RETURN WILL BE REALIZED N PROVID 


ED THE STOCK" : 


PRINT"REMAINS ABOVE ";SP;" CASH INVESTMENT $";I+ 


DD : PRINT n CASH 


RETURN" , " 


ACTUAL", "ANNUALIZED", "BREAK EVEN" : PP= 


1 : GOTO 410 








340 GR=E-I 








350 J=GR/I*100 








36 K=J/D*365 








370 IFA4=2 THEN 


LPRINT"RETURN ON CASH INVESTMENT OF $";I+DD : LP 


RINT"", "ACTUAL %", "ANNUALIZED %", "BREAK EVEN" : LPRINT"UNCHANGED 

" rJ f K 


3 80 PRINT" RETURNS ON CASH 


INVESTMENT OF $";I+DD 


390 PRINT"", "ACTUAL %", "ANNUALIZED %", "BREAK EVEN 


400 PRINT"UNCHANGED" ,J,K 






410 S=SP : GOSUE 


510 






420 SO=SP*N 








430 ER=SO-I-Z 








440 II=I+Z 








450 AA=ER/II*10E 








460 AB=AA/D*365 








470 BE=I/N 






i 


4 80 IFA4=2 THEN 


LPRINT n EXERCISED",AA,AB,BE 


490 PRINT"EXERCISED" ,AA,AB,BE 




500 GOTO 8 80 








510 IFS<=10 THEN 


Z=33.92 


: GOTO 83 


520 IFS<11 THEN 


Z=34 : GOTO 830 


530 IFS<12 THE** 


Z=36 .25 


: GOTO 83 


540 IFS<13 THEt> 


Z=38 : 


GOTO 83 


550 IFS<14 THEN 


/-39.50 : 


GOTO 


830 


560 IFS<15 THEN 


Z=41.25 : 


GOTO 


830 


570 IFS<16 THEN 


Z=42.90 : 


GOTO 


830 


580 IFS<17 THEN 


Z=44.46 : 


GOTO 


83 


590 IFS<18 THEN 


Z=46.25 : 


GOTO 


830 


600 IFS<19 THEN 


Z=48.00 : 


GOTO 


830 


610 IFS<20 THEN 


Z=49.60 : 


GOTO 


830 


620 IFS<21 THEN 


Z=51.27 : 


GOTO 


83 


630 IFS<22 THEN 


Z=52.72 : 


GOTO 


830 


6 40 IFS<23 THEN 


Z=54.50 : 


GOTO 


830 


650 IFS<24 THEN 


Z=56.23 : 


GOTO 


830 


660 IFS<25 THEN 


Z=57.89 : 


GOTO 


830 


670 IFS<26 THEN 


Z=59.29 : 


GOTO 


830 


680 IFS<27 THEN 


Z=60.43 : 


GOTO 


830 


690 IFS<28 THEN 


Z=61.57 : 


GOTO 


830 


700 IFS<29 THEN 


Z=62.56 : 


GOTO 


830 


710 IFS<30 THEN 


Z=63.75 : 


GOTO 


830 


720 IFS<32 THEN 


Z=65.70 : 


GOTO 


830 


730 IFS<34 THEN 


Z=67.90 : 


GOTO 


830 


740 IFS<36 THEN 


Z=70.15 : 


GOTO 


830 


750 IFS<38 THEN 


Z=72.44 : 


GOTO 


830 


760 IFS<40 THEN 


Z=74.72 : 


GOTO 


830 


770 IFS<42 THEN 


Z=77.01 : 


GOTO 


830 


780 IFS<44 THEN 


Z=79.30 : 


GOTO 


830 


790 IFS<46 THEN 


Z=81.59 : 


GOTO 


830 


800 IFS<48 THEN 


Z=83.88 : 


GOTO 


83'b 


810 IFS<50 THEN 


Z=84.77 : 


GOTO 


830 


820 Z=88.52 








830 IFN=200 THEt- 


Z=Z*1.9 




' 


840 IFN=300 THEh 


Z=Z*2.7 






850 IFN=500 THEh 


Z=Z*4.1 






860 IFN=1000 THEN Z=Z*7 






87 RETURN 








8 80 REM 








890 MR=E/2-F+G 








90 BM=E-F+G-MR 








910 IC=BM*IR/365 


*D 






920 I=MR+IC-DD 








930 GR=E~BM-I 








940 J=GR/MR*100 






Program Listing 2 Continues 
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Man's Most Powerful Means 



Comes to 



Until recently, talking computers existed only in the 
fantasy of science fiction, or at a great cost in industrial 
and university laboratories. Since then, speech units 
have appeared commercially in the $250 to $350 price 
range, but with little sophistication and potentially low 
speech quality. Voice Tech Industries has a unique new 
manual for the Apple and TRS80* personal computers. 
Utilizing our methods and commercially available com- 
ponents, your personal computer can actually speak. 
This product is unique in several ways. Our technology 
is the newest in the industry, the speech quality is su- 
perb, and you can build it yourself for under $50. 00. 

The Voice Tech 30 page manual is both educational 
and informative. It describes how complex speech wave- 
forms are produced from the human vocal cavity and 
how these wave forms are electronically modeled. You 
will learn how advances in LSI semiconductor technol- 
ogy have enabled designers to put a digital model of the 
human vocal tract, a controller, and speech data on 
silicon. Complete, detailed instructions on interfacing 
speech hardware to the Apple and TRS 80* computers 
are given. (The manual contains a coupon through 
which you can order the hardware components speci- 
fied at a 50% discount). Also, professionally written 
software examples are provided that illustrate the fun- 
damental principles and techniques. 

Because speech is truly synthesized, the vocabulary 
is actually limitless. A common software interface can 
be shared among many different applications. Business 
reports can now be delivered verbally, educational pro- 
grams can communicate via sight and sound, message 
centers can audibly report, and the potential for game 
applications is boundless. 

Voice Tech has been in the speech synthesis field 



omputer 



since its inception. Because of our unique background, 
wc have produced a clear, concise, and interesting doc- 
ument that we are now making available to the personal 
computer market. After reading the manual, the hard- 
ware can be added to your system as easily as any other 
standard peripheral. Voice Tech stresses that all prod- 
ucts offered carry a full money-back guarantee. 

To order, just fill out the coupon below and send it 
with your check or money order for $9.95 to: Voice Tech 
Industries, P.O. Box 499. Fort Hamilton Station. 
Brooklyn, N.Y. 112090499. 

And keep your ears open. What you'll be 
hearing is the voice of the future. 

* Apple is a trade mark of Apple Computer Corp. 
TRS 80 is a trade mark of Tandy Corp. 




V'OiCE TfcCH INDUSTRIES ^390 

P 0. BOX 499 

FT. HAMILTON STATION 

BROOKLYN, N.Y. 112090499 

My computer is 
Apple il or ii plus 

TRS 80 Model i □ TRS 80 Model ill 
Enclosed is $_ for 



anuals at $9.95 ea. which includes 
lipping and handling. 
j Keep me informed of future develop- 
nents in the speech industry. 



Address 

City, State, Zip. 

Signature 



CCA DMS 

for 

TRS— 80 MODEL II 

New! Major enhancements to the 
highly rated CCA Data Management System 
are now available on TRS-80 Model II. Ad- 
vanced features like custom screen layouts, 
relational searches, data calculations, 
indexing and data interchange with other 
systems are standard. 

CCA DMS gives you unexcelled pro- 
ductivity aids for data entry, file re-format- 
ting, and report generation. For instance, 
several different reports may be batched, 
and CCA DMS even automates TRSDOS 
multi-copy disk spooling. 

CCA DMS offers unprecedented ver- 
satility and flexibility -up to 64 fields, and all 
may be indexed— any number of custom 
screen layouts or reports for each file— 10 
levels of sorting (Machine language of 
course!) 

CCA DMS costs only $225.00. Order from: 



F/S associates, inc . 

micro data management development 

F/S Associates - 1 1 16-A 8th Street, Suite 1 21 
Manhattan Beach, CA 90266. (213) 374-7544 



Call! Res add 6 -.% Tax 

' TRS 80 is a trademark ol Tandy Corp 
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£f$tt$MI SOFTW 

Finally the some software for 
MOD III as the CPM boys. 
We hove taken the same 
packages an J — 
MOD III. 



liiif 



1. GENERAL LED 

Chart of Accounts 

Trial Balance 

Income Statement 

Dept Income Stateme 

links to other Peachtree' Modules 

2. ACCOUNTS RECEIVABLE 

Open item 
Aged A. R report 
9 Gt codes 
Customer stot"' '" 
Invoicing 
Statement* 

3. ACCOUNTS PAY ABL 

Vendor file 
Enter vouchers 
Print checks check re 
Open voucher report 
Ageing Report 
Cash require 
Posts to GL 



US $250. per M 

SoptJOM 

4450-B GREIG AVENUE 
TERRACE, B.C. 
CANADA V8G1M3 
604-635-6117 

Send for our full line catalogue 
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MONEY DOS 



N 



R 



RET 



Program Listing 2 Continued 

950 K=J/D*365 

96 BB=(BM+I)/N 

970 IFA4=2 THEN LPRI NT "MARGIN RETURNS" 

980 PRINT z PRINT'MARGIN RETURNS" : IFPP=1 THEN 1010 

990 IFA4=2 THEN LPRI NT "UNCHANGED" , J , K 

1000 PRINT"UNCHANGED",J,K 

1010 S=SP : GOSUB 510 

1020 SP=SP*N 

1030 1*1+2 

1040 GR=SP-BM-I 

1050 J=GR/MR*100 

1060 K=J/D*365 

1070 IFA4=2 THEN LPRINT"EXERCISED" , J ,K,BB 

1080 PRINT"EXERCISED",J,K r BB 

1090 RR=G+Z z FY=(K/100)+1 : TT=10000 : F0R0=1T05 : TT=TT*FY 

EX TO 

1100 IFA4=2 THEN LPRINT" " : LPRINT"MARGIN DEPOSIT $";: LPRINT U 

SINGZ$;MR;: LPRINT" $10,000. INVESTED FOR 5 YEARS" : LPRINT"AT 

";K;"% WILL GROW TO $";TT : LPRINT : LPRINT : LPRINT : LPRINT 
1110 PRINT : PRINT"MARGIN DEPOSIT $";: PRINT USINGZ$;MR;: PRINT" 

$10,000 INVESTED FOR 5 YEARS 
1120 PRINT"AT ";K;"% WILL GROW TO $";TT;" 

1130 INPUT"ADVANCE PAPER=2 RETURN TO MENU=1";I0 : IFIO=2 THEN LP 
RINT : GOTO113 ELSE 20 
1140 NO=N/100 
1150 LL=NO*6 

1160 IFF<=2500 THEN 0X= (F* . 013) +12+LL : 0C= ( (0X*1 .1) +1) *1. 07 
ETURN 

1170 OX=F*.009+22+LL : IFF<=5000 THEN 0C= ( (0X*1 . 1) +1) *1. 07 : 
URN 

1180 0C=( (OX*1.15)+1)*1.07 : RETURN 

1190 CLS : PRINT" COMMISSIONS FOR STOCKS (100,200,300,500, OR 10 
00 SHARES)" : PRINT"0R OPTIONS SELLING FOR $1. OR MORE." : : IN 
PUT"N0. OF SHARES?" ;N 

1200 INPUT"PRICE PER SHARE (DECIMAL) ."; S 
1210 GOSUB 510 

1220 INPUT"H0W MANY OPTION PRICES?"; PR : F0RI=1T0PR : PRINT"ENTE 
R OPTION PRICE #";I;: INPUTFD(I) : F=FD(I)*N 
1230 GOSUB 1140 
1240 0C(I)=0C 
1250 NEXTI 

1260 PRINT"COMMISSION ON ";N;" SHARES AT $";S;" IS $":: PRINT US 
INGX$;Z 

1270 Y=N/100 : F0RI=1T0PR : PRINT"COMMMISSION ON ";Y;" OPTIONS A 
T n ;FD(I);" IS $";: PRINT USINGS$;OC ( I) : NEXT 

1280 PRINT@970," n ; : INPUT-RETURN TO MENU=1 MORE COMMISSIONS=2" ; B 
S : IFBS=1 THEN 20 ELSE 1190 

1290 CLS : PRINTCHR$(23) "WILL ROGERS ONCE SAID," : PRINT"OUR PRO 
BLEM IS NOT IGNORANCE" : PRINT"IT'S ALL THE THINGS WE KNOW" : PR 
INT"THAT AIN'T SOI 

1300 PRINT : PRINT"WE ALL KNOW THAT A 10 YEAR TAX EXEMPT BOND Y 
IELDING 9% IS" : PRINT"A PRUDENT INVESTMENT, OR PERHAPS A 20 TREA 
SURY BOND" : PRINT"YIELDING 11% ??? 

1310 PRINT : PRINT : PRINT"T0 EXAMINE THE RESULTS OF THESE OR AN 
Y OTHER INVESTMENT" : INPUT" PRESS 'ENTER' " ; PO 

1320 CLS : PRINT"THIS PROGRAM WILL ALLOW YOU TO DETERMINE THE AC 
TUAL" : PRINT" RESULTS OF YOUR INVESTMENT IN TERMS OF PURCHASING 
POWER. 

1330 PRINT : PRINT"FOR SIMPLICITY, WE SHALL ASSUME A GALLON OF G 
AS NOW COSTS" : PRINT" $1.00 AND WILL INCREASE IN COST AT THE EST 
IMATED RATE OF" : PRINT" INFLATION. 

1340 PRINT : PRINT" IT IS FURTHER ASSUMED THAT YOUR YEARLY DIVIDE 
NDS, INTEREST," : PRINT'ETC. IS RE-INVESTED AT THE RATE OF ORIGI 
NAL INVESTMENT. 

1350 PRINT : PRINT"NOTE : AFTER EACH ENTRY, YOU MUST PRESS ' ENT 
ER 1 

13 6 PRINT 

1370 INPUT"AMOUNT OF YOUR INVESTMENT IN $.";A 
1380 INPUT"NUMBER OF YEARS?" ;Y 
13 90 INPUT" YEARLY RETURN EXPRESSED AS A 
1400 INPUT"YOUR INCOME TAX BRACKET (IN 
1410 RR=(R*T)/100+1 

1420 INPUT"ESTIMATED INFLATION RATE IN %";B : BB=B/100+1 
1430 C=R*T : Z=l : Q=A 
1440 FOR I=1T0Y 
1450 A=A*RR 
1460 Z=Z*BB 
1470 NEXT : 1=1-1 
1480 X=A/Z : W=X/Q : V=(l-W)*100 



i RATE. 
? " ; TB 



;R 

T=(100-TB)/100 



1490 CLS : FORF=1TO1000 ; NEXT 



Program Listing 2 Continues 



THE DATA CONDITIONER 



TREATS YOUR TAPES WITH STYLE 




Copies system and data tapes without compute 

Eliminates noise and minor dropouts 

Signal conditions while loading or saving 

Operates ALL TRS-80 baud rates 

Rugged construction 

AC powered 



^sjiWr 



Exclusively fror 



Commu 

94-tfi5 



CALL 
(808) 677-3380 

OR WRITE 

lications Systems Laboratories 
Leokane St. Waipahn, HI 96797 



ttions 
Systems 

Laboratories 

$69.95 (Post Paid) 

1^361 ;E — B'-, 



write for info on oir new COPY CONDITIONER - drive up to 10 tapedecks from source ieck- $149.95 



COLOR COMPUTER USERS . . . YOUR EXCLUSIVE MONTHLY MAGAZINE 




The RAINBOW is devoted only to the TRS-80 - COLOR 
COMPUTER 1 It is the magazine that will help you get the 
most out of your Color Computer whether you're 

interested in fun and games business applications or 
education. 



the RAINBOW 



HAS A POT OF GOLD FULL OF 

• Programs 

« Hints and Tips 

• Helpful Utilities 
» Hones: Reviews 

• New User Tutorials 

• Software Discounts 



The RAINBOW i 

.'i •rmation 



i a pot ol gold lull ol fabulous 

—P.M., Detroit 



'Trademark ol Tandy Corp 



; wouldn't be without the RAINBOW. Its the best' 

— R P . Seattle 

the RAINBOW 

5803 Timber Ridge Dr. • Prospect, KY 40059 
Subscribe to the RAINBOW today. 
A 12-month subscription is only $16. 

$22.00 U.S. Funds in Canada 
Canadian points please add S? 50 

All subscriptions start with current issue (limited back issues available 
for $2 plus S2 50 postage and handling) 



^296 



wiejs. i.nvm t « mm mu w 312.1; 

Ml • •'•>>>" ■ >•■• II ■• ■>>M l> l>IMI.M> ll ■■■■•111,, ,,,,,,,,,,,,, 



W» a.tH»7EW TV. -3,ggl» E U T> ♦.S3SSPE* 



80 SPACE RAIDERS 
Starship Simulator 
and Combat Came 

This is the most realistic combat space simulation 
available for any computer system anywhere! 
Operator is placed in a rapidly moving ship looking 
out through ;> window into the depths of space. 
Thousands of stars appear in the distance and part 
toward the screen edges as the ship flashes past. 
Forward and aft views available at any time. Ac- 
; urate celestial navigation using both XY2 and 
spherical Coordinates! Comment from Aug '81 80 
Microcomputing: "May be the ultimate Star Trek 
type game and, possibly, the most complex micro- 
computer game ever attempted"! Fast action 
graphics never stop! 

Now available for Model III! 

$24.95 (MasterCard, VISA, check, etc.) 
includes shipping. COD OK 

Specify Model I or III, Level 2 16K 

Bosen Electronics 

1747 West Bowling Ave. Ste. 21 

Taylorsville, UT 84119 

801-968-8469 

Model I and III disks available ^ 294 

Model I $29.95 Model III $28.95 




^See List of Advertisers on page 386 
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FOR THE 




PC BOARDS DOC. 



ONLY $19.95 



THIS EASY TO INSTALL KIT WILL 
DOUBLE THE SPEED OF YOUR MOD 
ELIIICOMPUTER. 

COMPLETE KIT $59.95 

ASSEMBLED & TESTED $99.95 

CALL OR WRITE 
J.E.S. GRAPHICS 
P.O. BOX 2752 
TULSA. OK. 74101 

PHONE 19181 742-7104 '202 



for POCKET COMPUTERS 

Game Pac 1: OLD FAVORITES 

Five proven games, updated with exciting new fea- 
tures. Fun for all 1 PLANET-Land on any planet. ZILCH- 
Bagles. 1-9 digit numbers. HILO -Nifty version of Stars. 
COINS-Computer "learns'' to win. WINNLR You Lose 1 
Includes complete notes and listings $9 

with cassette $14. 
BEGINNERS GUIDE TO PROGRAMMING 

the Sharp/Radio Shack Pocket Computer 

It's fast, fun and easy You'll understand every word 
and be amazed how easily you progress. No other 
method brings positive results so quickly $19 

YOU AND YOUR DOLLARS. ALL ABOUT INTEREST 

99 basic questions answered with 1 /dynamite pro 

grams. Includes variable and fixed rate home loans. 

Also annuities, present and future value, notes and 

contracts, cash flow analysis and much more. $19. 

with cassette $33. 

(Remit in U S funds Add V loi first class delivery Add $3 if outside 
U S Calif, add 6".- sales tax ) 

AND WE HAVE OTHERS! For a copy of our catalog, 
circle our number on your bingo card or write directly. 

HANCO Software (formerly XCEL) 
P.O. Box 4772H, Sylmar, CA 91342 

(213)367-4366 



.-370 



i — SO, NOW FOR 
S« TRS-8' 



INVESTING 



F*R:C3C3F<^>M (*. 1^1 #=» l_ V S E^_ 

FeETT-LJRlNJ FROM l_ I STE 

STOCK CDF^TT I ON 

I MVE£ST I IMC3 



HANDLES CALLS, PUTS, SPREADS, 
AND OUT; COMMISSIONS, RISK, COST 
OF MONEY, DIVIDENDS. TABLES AND 
GRAPHS. PRINTS, STORES TO DISK. 

INDEXED MANUAL A COMPLETE BUIDE 
TO OPTION INVESTING. M/C S< VISA. 
•125. SEND FOR FREE BROCHURE. 
0PTI0NS-80, BOX 471 

CONCORD, MASS 01742 

I * TRADEhARK TANDY CORP # TRADEHARK APPLE COHPUTER, INC 



MONEY 



%e£ .:-,«& 



GOTO 151 



GOTO20 
' : PRINT 



Program Listing 2 Continued 

1500 PRINT : PRINT" TODAY YOUR $";Q;" INVESTMENT BUYS ";Q;" GALLO 
NS OF GAS. 

1510 PRINT : FORF = 1TO1000 : NEXT : PRINT" IN " > I ; " YEARS YOUR INV- 
ESTMENT WILL HAVE GROWN TO $";: PRINT USINGX$;A 
1520 PRINT : FORF=1TO1500 : NEXT : PRINT" IT SEEMS THAT YOU HAVE 

DONE WELL UNTIL YOU BUY SOME GAS " : FORF = 1TO150 : NEXT : PR 

INT : PRINT"WHICH WILL BE $";: PRINT USINGS$; Z ; : PRINT" PER GALL 

ON, 

1530 FORI=1TO1500 : NEXT : PRINT : PRINT"NOW YOU CAN BUY ONLY 

: PRINT USINGZ$;X;: PRINT" GALLONS OF GAS. 

1540 FORI=1TO1500 : NEXT : PRINT : PRINT'WHICH MEANS YOU WILL LO 

SE ";: PRINT USINGV$ ; V; : PRINT" % OF YOUR PURCHASING POWER! 

1550 TR=B/T : PRINT "YOU MUST INVEST YOUR MONEY AT ";: PRINT USIN 

GV$;TR;: PRINT"% TO BREAK EVEN. 

1560 PRINT : PRINT : INPUT"TO EXAMINE ANOTHER INVESTMENT, PRESS 

'ENTER'. MENU=1";LL : IFLL=1 THEN 20 ELSE 1320 

1570 CLS : PRINT"RETURN TO MENU BY PRESSING [ PRINT TEXT WITH A 

@ 
1580 E$=INKEY$ : IFE$="" THEN 1580 ELSE PRINTES; 
1590 IF E$="@" THEN LPRINT R$+"" : R$="" : PRINT 
1600 IFE$="[" THEN R$="" : E$="" : GOTO20 
1610 R$=R$+E$ : GOTO1580 
1620 NEXTT 

1630 PRINT"RETURN TO MENU, PRESS 'ENTER'";: INPUT : 
1640 CLS : PRINT" ACTUAL RETURN ON DISCOUNTED BONDS.' 
1650 INPUT"IF BOND IS TAX FREE ENTER A 1";TF 
1660 INPUT"TOTAL DOLLARS INVESTED";DI 
1670 INPUT"BOND PRICE (A BOND SELLING FOR $560 WOULD BE ENTERED 

AS 56 ";BP : BP=BP*10 
1680 INPUT"MONTHS LEFT TO MATURITY" , -MA : ML=MA/12 
1690 CG=1000-BP 
1700 XX=DI/BP 

1710 INPUT"COUPON RATE";CP : CP=CP*10*ML 

1720 INPUT" TAXPAYERS BRACKET" ; TP : TB= ( 100-TP) /100 : TX=TP 
1730 INPUT'RISK FREE CD INTEREST RATE";IJ : 11= ( I J/100) *ML : PRI 
NTH 

1740 I1=.5*ML 

17 50 CLS : PRINT"RESULTS OF A BOND PURCHASED AT $";BP;" DUE IN " 
;MA;" MONTHS 
1760 PRINT'FOR A TAXPAYER IN THE ";TP;"% BRACKET VS A CD AT " ; I J 

;"% 

1770 PRINT : PRINT"THE BOND", "GROSS RETURN" , "AFTER TAX RETURN" 

17 80 AT=CP*TB : IFTF=1,AT=CP 

1790 PRINT"INTEREST",CP,AT 

1800 TP=TP/100 

1810 NN=CG*.4 : NM=NN*TP : NG=CG-NM 

1820 PRI NT" CAP. GAIN",CG,NG 

183 TN=NG+AT 

1840 PRINT n TCTAL NET",,TN 

1850 R1=BP*II : R2=RI*TB 

1860 PRINT 

1870 PRINT'CD AT ";IJ;"% RETURNS $";Rl;" GROSS OR $";R2;" 

1880 DA=TN-R2 : PR= (DA/R2) *100 

1890 PRINT'EACH BOND WILL YIELD $";DA;" MORE THAN THE CD." 

NT "OR ";PR;"% GREATER RETURN 

1900 TC=(100-TX)/100 : X1=TN/MA*12 : X2=X1/TC : X3=OC2/BP 

1910 PRINT"NET RETURN FOR ONE IN ";TX;"% BRACKET = CD AT " ; 

NT USINGS$;X3*100;: PRINT"% 

1920 IFDI>1 THEN DX=DA*XX : PRINT" $"; DI ; " INVESTED IN BONDS YIEL 

DS $";DX;" MORE AFTER TAXES." : PRINT 

1930 INPUT"M0RE=2 MENU=1";MJ : IFMJ=2 THEN 1640 ELSE 10 

1940 CLS : PRINT : PRINT : PRINT"TKIS ALLOWS YOU TO DETERMINE TH 

E ADVANTAGE OF A SHORT TERM 

1950 PRINT" INVESTMENT IN COMMERCIAL PAPER VS. A CD." : PRINT 

1960 INPUT"PRINT0UT=2";P0 : CLS : INPUT"AMOUNT" ;M1 

1970 INPUT"NUMBER OF DAYS";M2 

1980 INPUT" INTEREST RATE";M4 : M3=M4/100 

1990 INPUT"YIELD ADVANTAGE OVER MONEYMARKET FUNDS IN %";MM : MM= 

MM/100 

2000 MA=M1*MM/365*M2 

2010 Ql=Ml*M3/365 : Q2=Ql*M2 : CLS : PRINT 

2020 PRINT" $"; Ml;" INVESTED FOR ";M2;" DAYS 

; : PRINT USINGT$;Q2 

2030 IFP0=2 THEN LPRINT" $" ;Ml; " INVESTED FOR 

% RETURNS";: LPRINT USINGT$;Q2 

2040 PRINT"DAILY INTEREST RETURN = $";: PRINT USINGX$;Q1 

2050 IFP0=2LPRINT"DAILY INTEREST RETURN = $";: LPRINT USINGX$;Q1 

2060 Z1=Q1/M4 : PRINT"AN ADDITIONAL 1 PERCENT/DAY ON $ ";M1;"=$" 
;: PRI NT USINGS$;Z1 program Listing 2 Continues 



NETI 



PRI 



PRI 



PRINT 

g ";M4;"% RETURNS 

;M2;"DAYS & ";M4; 
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Program Listing 2 Continued 

2070 Il=Zl/8 : PRINT"l/8 OF A POINT = $";: PRINT USINGU$; II ; : PR 

INT" PER DAY 

2080 PRINT : PRINT"CURRENT ADVANTAGE OVER MONEYMARKET FUNDS FOR 

PERIOD=$";: PRINT USINGX$;MA 

2090 IFPO=2LPRINT"MONEYMARKET FUNDS NOW YIELD " ; Yl ; "% " ; " YOUR CO 

MMERCIAL PAPER YIELDS n ;M3 : LPRINT"THE YIELD ADVANTAGE AMOUNTS 

TO $";: LPRINT USINGX$;MA 

2100 IFPO=2LPRINTCHR$(31) : LPRINT" n : LPRINT" CO 

NGRATULATIONS ! 

2110 PRINT@970,""; :INPUT"MORE=2 RETURN TO MENU=1";09 : IF09=1 T 

HEN 20 ELSE 1960 



merit if you are to prosper. 

• If the broker says there is no vacan- 
cy problem. . . figure 10%. 

Even the most desirable rental units 
experience at least a 5% loss from max- 
imum gross income due to such unavoid- 
able things as repainting, recarpeting, 
and other periodic maintenance. The 
average property will likely experience 
about 12%. 

• Buy with nothing down and become 
a slumlord. 

The properties which can be purchased 
for small down payments usually rent to 
people who are at the low end of the 
pecking order, hence the landlord must 
face such additional expenses as unpaid 
damage, getting court orders to evict 
people who refuse to move, renting to 
stockbrokers, bad checks, ad nauseum. 
Many excellent deals can be had from 
sellers who went in with no real idea of 
the work and problems involved. Think 
about it. . .if these units were so profit- 
able, why is the toiler so eager to ac- 
commodate you? 

• They can take everything but your 
wife (lamentably). 

Before you sign up for a big mortgage, 
check the law in your state and you may 
find that you are liable for the mortgage, 
e.g. You default and the mortgage holder 
forecloses. Then he sells at public auc- 
tion. If the price does not pay him in full, 
he may be able to obtain a deficiency 
judgement and seize and attach your 
other assets. . .which could include your 
computer toys as well as loss valuable 
items such as your bank account, car, or 
ski boat. 

• Rent furnished, or, "Last night they 
left. . . with your couch." 

Furnished property will likely show a bet- 
ter current return than one unfurnished. 
This is somewhat of an illusion as the 
furniture must be replaced about every 3-5 
years while the unfurnished unit requires 
no such periodic expenditure. Unfur- 
nished units attract, generally speaking, a 
more stable class of tenant. You need not 



worry about this group disappearing in 
the middle of the night. 

• Disaster will strike at the least pro- 
pitious time. 

Twenty five years ago I bought five units. I 
didn't mind spending my weekends paint- 
ing, fixing, and trying to collect the rent 
from 200 lb. gorillas in a surly mood. Then, 
one night at about 2AM my phone rang. 
"My toilet won't flush," said Mrs. Brooks. 
"Oh S— ," said I. "That is exactly what I in- 
tend to do as soon as you fix it, Mr. 
Keynes." Mind you, I'm not suggesting 
that rental property is bad, only that it 
"ain't no bed of roses." In fact, I did parlay 
my five units into 50 units in ten years, 
and, it was all worth it. (GASP) 

The program in Program Listing 1 does 
not weight the expenses based on the age 
of the building. The older the structure, 
the more likelyhood of unanticipated ex- 
penses. Another factor which will help de- 
termine the worth to you is your tax brack- 
et. The higher your tax bracket, the more 
valuable the depreciation becomes. When 
you apply the program to the property you 
are considering, you may find that the 
chicken pie is in fact... uh... chicken 
feathers. 

When you invest your money in a small 
number of rental units you are not an 
investor. It is a business venture wherein 
you are an active, hard working partner. 
Compare this with the returns available 
from risk free investments (currently 
about 14% from AAA rated tax free bonds) 
before you decide. P.S. My business is 
managing about $200 million in the stock 
and bond markets. If you want to risk 
some money, take a look at First Execu- 
tive Life traded on the over the counter 
market (FEXC). According to Forbes 
Magazine of January 4th, FEXC 
ranked #1 in performance over the last five 
years. As this is written FEXC is at 7 1 /2. 
They have reinvented iife insurance and 
are saving people millions in premiums. 
They recently signed an agreement with a 
major brokerage firm to handle their pro- 
duct. A good product handled by a firm 
with an enormous affluent client base has 
interesting possibilities. ■ 



Data Acquisition 

and Control for the TRS-80* 

S230 ppd. 

The SIARBUCK-8882 is a complete eight channel 
data acquisition and controrsysiem plug 
compatible with the Model i Level li TRS-80 it 
includes 8 protected analog inputs (0-5 Vdc with 
8 ± t bit accuracy). 8 protected digital inputs. 8 
optoisoiaied digital outputs and two joystick 
ports interrupt driven software package allows 
simultaneous data acquisition and storage while 
using the TRS-80 tor any other purpose 1 

Application manual cove's home security energy 
monitoring weather station use appliance 
control graphics and games Pnce includes 
case power supply extra expansion card edge 
connector cable complete software package and 
detailed applications manual Manuals only are 
available tor $5 00 ppd Model m version $250 
ppd To order write or call 

STARBUCK DATA CO. 



p o 



Box 24 Newton MA 02162 

617-237 7695 "205 



Massachusetts residents add 5% sales tax 'TRS-80 
is a trademark of Tandy Corp. 
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PRIZE WINNING 

CHESS 



SFINKS3.0(New) 

Prize winner in Pans in the 1981 Microcomputer 
Chess Championship: Slinks 3 is the fastest and 

strongest chess program ever written! 

FEATURES: Book Openings. Chess Clock. Thinking 

on Opponent's Time. Infinite Levels of Play, and 
Ruthless [laying Ability! 

32 K cassette or disk only S 39 95 
SFINKS1.81 

Prize winner in San Jose in the latest (1980) U.S. 

Microcomputer Chess Championship Slinks 1 81 
beats Saigon II. Mychess and Gambiel 80 hasy lo 
use with many convenience features 

32 K cassette or disk now only 8 24 95 

Please specify cassette or disk and Model I or III 
INCLUDE $2.00 SHIPPING AND HANDLING. 

WILLIAM A. FINK qos, 942.5706 

f'O BOX Ml 2 ,*'/. 12 

I IGHTHOUSI POIN'I R. 13074 5912 : 

Exceptional Dealer Discount* Available ^..i*4 XyWk A ^ < 



The Ultimate Checkbook is designed to help the individual keep 
track ol checks, tax deductions, and deposits as weH as provide tor 
last and easy checkbook balancing and bank reconciliation. How- 
ever, its versatility is such that it can be used effectively as a 
"Mini-Ledger'' tor many small businesses. 



• Menu driven lor easy use 

• Checks can be entered, edited, and deleted quickly 

• In-memory check capacity ot approximately 400 checks 

• Check listings on screen or your printer 

• Running balance displayed when posting checks 

• Oelauits for check numbers and date to speed data entry 

• Check-by-check balance displayed or printed 

• Search routine linds checks quickly and easily 

• Fast MACHINE LANGUAGE multi-key sort 

• Totals checks and deposits by deduction, budget, or deposit 
categories 

System Requirements TRS-80 Models I & III with 48K. 00S « 
Printer (Optional) Please indicate model when ordering. $39 95. 
Please add $2 tor handling and postage: $5 overseas: tor your 
convenience you may phone in VISA or M/C orders. 

SOFTWAREHOUSE INTERNATIONAL 

IkVM MOVtWT/ P.O. BOX 1383 v T.ndyCorp 

Clovis, CA 9361 3; (209) 251 7877 
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384 Micro Systems Software Inc Cover II 

384 Micro Systems Software Inc 315 

380 Micro Tech Exports Inc 33 

125 Micro Works 23 

247 Microcomputer Technology Inc 124,125 

117 Micromintlnc 258 

561 Micromint Inc. . . .' 445 

298 Microperipheral Corp 317 

570 MicroPro International Corp 450 

' Microprogrammers. The 252 

312 Microsette 87 

282 Microsoft Consumer Products 327 

148 Midwest Data Systems 286 

72 Mikee Electronics Corp 291 

137 Miller Computer Services 303 

123 Misosys 168 

578 Moses Engineering 439 

67 Mumford Microsystems 335 

571 National Institute for Rehabilitation Engineering 

'. 439 

128 Nelson Software Systems 316,37? 

590 Nelson Software Systems Inc 445 

255 New Classics Software 339 

232 Nocona Electronics 295 

557 Occupational Computing Co Inc 445 

50 Omikron -.- 49 

195 Omnitek 245,286 

206 Options-60 384 

275 Orange Micro 44 

151 Orion Instruments 399 

25 PC Newsletter' 142 

352 P.M.W: 297 

. 383 P. Tree Enterprises 297 

242 PMC Software 345 

368 P80nul Software Inc 236 

20? Pacific Exchanges 154,242,309,405,426 

122 Pan American Electronics 183 

333 Peggytronics 312 

" Percom Data Company 3 

1 Percom Data Company 28, 29 

2 Percom Data Company 28.29 

3 Percom Data Company 28, 29 

563 Percom DataCompany Inc 444 

272 Peripherals Unlimited 429 

406 Peripheral People 408 

124 Perry OilS Gas Inc 357 

242 Personal Micro Corp. Inc 434, 435 

• Phase I Systems Inc 69 

290 Pickles&Trout 287 

t60 Pioneer Software 294 

377 Plug Bug Systems 115 

73 Plus Computet Technology Inc 127 

575 PocketlnfoCorp 445 



61 Powersoft 153,161 

.11 Practical Peripherals 170,171 

'63 Precision Prototypes ;.. . : . .391 

288 Process Control Tech 259 

560 ProComplt...' 444 

80 Program Store, The 158, 159 

245 Programmer's Institute 378 

143 Progressive Electronics 331 

91 Prosott 37.287 

48 Quality Computer Services 235 

194 Quant Systems 173 

366 Rabco Enterprises 410 

41 Hacet Computes LtrJ 397 

140 Radio Ranch Inc: 132 

264 Rainbow P&P Corp 119 

296 Rainbow, The . .■ 383 

130 Rand's Inc. 379 

' Realty Software Company 426 

573 Realty Software Company 449 

275 Red Baron Computer Products 437 

114 Refware 309 

586 Relational Systems International Corp 449 

145 Remarkable Software 252 

129 Remsoftlnc 240 

303 Richcraft Engineering Ltd 450 

585 Robert J. BradyCo 440 

343 Rogo Computer Products 309 

35 SID 346 

266 STSCInc •. . , 155 

142 Sales Data, Inc 83 

203 Scientific Engineering Lab 154 

510 Scott Tasso 154 

372 SemiDisk Systems. . ., ...98 

16 Shannon Magnetics 121 

• Shelf Boxes 389 

12 Simutek.. 431.433 

213 Sixty Eight Micro Journal 426 

• Snappware 407,409,411,413.415 

84 Soft Sector Marketing 101. 103 

85 Soft Sector Marketing 253 

86 Soft Sector Marketing 255 

87 Soft Sector Marketing 257 

398 Softbyte Computing 32 

379 Softcore Software Company, The 314 

374 Softek Software 329 

43 Software Concepts 58.59 

385 Software Galore 32 

537 Software Options 131,133 

327 Software Support 65 

309 Softwarehouse International 385 

310 Softwarehouse International 108 

562 Soflwork Voyce 446 

1 19 Spectral Associates 341 

106 Speedway Electronics 403 

205 Starbuck Data Company 385 

396 Starware 243 

577 Street Electronics Corp 439 

180 Sturdivanl & Dunn 149 

7 1 Sublogic Communications Corp 293, 383 

285 Sun Research . . .' 366 

391 Swayback Software 32 

574 Switch and Mux Inc 449 

• Synergistic Solar Inc 343 

• Synergistic Solar Inc 446 

10 Syntax Beta 251 

174 Syracuse R&D Center 242 

• TRI Star 233 

588 TAB Books 446 

189" TabSales 144 

70 Taranto & Associates Inc 361 

263 Tatum Labs 292 

335 Tatum Labs 270 

204 Technical Software Systems 384 

59 Texas Computer Systems . . 239 

27 TexasDigital 332 

• Text Edit 369 

144 Thomas V. Lenz 332 

534 ThreeGCompany 132 

81 Total Access 181 

37 Traxx Computer Corp. . . .' 9 

540 Tufts Electronics 276 

522 Two/Sixteen Magazine 307 

64 Universal Software 405 

' University Microfilms 317 

• VRData 442,443 

169 Van Horn Office Supply 138 

390 Voicetech Industries 381 

147 Walonick Associates Inc 299 

• Wayne Green Books 370 

179 Western Operations 145 

212 William A. Fink 385 

192 Wilson Software Division .' ... 149 

569 Windham Software 446 

381 Wizard Electronics Inc 297 

376 World Software Resource 263 

158 XYZT Computer Dimensions Inc 178 

156 York lOComputervvare 357 
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READER SERVICE 

Please help us to bring you a better magazine— 
by answering these questions. 



Reader Service: To receive more Information from any of the advertisers in this issue of 80 Micro , circle the 
number on the postage-paid Reader Service Card that corresponds with the Reaoer Service number on the ad 
in which you are interested. You will find numbers, preceded by a •, near the logo of each advertiser. Com- 
plete the entire card, drop into a mailbox, and in 4-6 weeks you will hear from the advertiser directly 



This card is valid until August 31.1 982 



A. What is youi annual income'' 
Under $20,000 
:-. '. 000-530.000 
■1.000—540,000 
2 4 S4 1.000 -550.000 
1 5 Ove' 550 000 

B It you read any ol the lollowing maga 
zines, please rate their usetulness lo 
you on a scale ol 1 (least) to 5 (most) 

1 Microcompulmg 

2 Desi 

3 E 

4 Popular Computing 

5 Cieblive C 

6 80 u S 

C. Do you own a stringy lloppy? 

[J 2 No, plai ' i Buy 

3 No. don't plan to :. . 

O. How much have you invested in hard- 
ware (including peripherals)? 
Tj 1 Less than St 000 
l]2 $1,000-52.000 
D 3 S2.0L' 
D 4 53.001 -54 000 
[j 5 Over 54.000 

E. What is your level ot education? 

□ I High School 

□ 2 Tiade.Technicai School 

C iiiege 

□ 4 Graduate School 

F Do you have any influence over the use 
or purchase of computing equipment 
lor your company? 

□ i Yes 

a 2 no 

G. Do you own either ol the lollowing? 
Check all that apply 
U 1 PMC-80 
G 2 LNW-80 



BOOKS 



H. What types of programs pub- 
lished in 80 Micro do you actually 
type into your computer? Check 
the 2 categories of most interest. 

' Business 
: .'' Games 
' "lie;. 
4 Education 
ir*phics 
. 6 Hobby 
„ 7 Home Finance/Management 

I Do you have any influence over the 
purchase ol computer systems for an 
educational Institution? 

i. 2 No 
.' 3 Doesn I apply 

J How much have you invested in soft 
ware? 

D ' Less than S'OO 
i I 2 $100-5250 
U 3 5251 -5500 
□ 4 $501-51.000 
U 5 Over $1 -000 

L On a scale ol (no interest) to 5 
(great Interest) please rate your in 
terest in seeing the following types 
ot products reviewed in 80 Micro- 
computing: 

l Business 

2 Games 

3 Utilities 

4 Hardware 

5 Books 

6 Word Processing 

7 Science/Tecnracal 

8 Home/Hobby 

9. Education 



M. II you are not a subscriber, please cir 
cle number 500. 
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Name. 



Address. 
City 



.State. 



.Zip. 



80 Micro • June/July 1982 



80 Microcomputing 
Peterborough NH 03458 



Please send me the 
following 80 Micro products: 



Qty. 


Catalog * 


Title 


Unit Price 


Total 









































































SUBSCRIPTION 



SOmicro 

subscribers save $10 

off the 

newsstand price. 



Shipping and handling charges: 

S 1 .50 1 si book. S 1 .00 each additional book 

(UPS. use street address) 

S 10.00 each book overseas airmail 



Shipping 'handling 
Total 



Enclosed S_ 
Bill: D AE 
Card # 



D MC 



D Check 
DVISA 



D M.O. 



□ Mew subscription 
D 1 year— S24.97 

Enclosed S 

Bill: D MC Q Visa 



□ Renewal 

_ O Check □ M.O. 

D AE Q me 



Exp date. 



Interbank # 



Signature 
Name 



Address 
City 



Card* 

Signature 

Name 

Address _ 
City 



Exp. date. 



Interbank # 



State 



ZiP- 



State 



Zip. 



Please allow 4—6 weeks for delivery 



No C.O.D. orders accepted. 



Canada— S27. 97. I year only, US funds. 
Foreign Surface— 544.97 1 year only. US funds. 
Foreign Air — Please inquire. 



326B8B 
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June 

1-2 The Yankee Group, Cambridge, 
MA. The Second Phase of Office 
Automation, New York, NY. 

1-4 Management Science America 
Inc., Atlanta, GA. Payroll-Person- 
nel Conference, Hilton Hotel, At- 
lanta, GA. 

4-6 San Diego Computer Society, 
Ham-Comp 82, Town and Country 
Convention Center, San Diego, CA. 

5 North Area Repeater Association 

Inc., St. Paul, MN. Amateur Fair: A 
Swapfest and Exposition of Per- 
sonal Computer and Communica- 
tion Equipment, Minnesota State 
Fairgrounds. 

6-8 North Carolina State University. 
Sixth Annual Conference on Com- 
puters and the Humanities, Ral- 
eigh, NC. 

7-10 American Federation of Informa- 
tion Processing Societies Inc., Ar- 
lington, VA. 1982 National Com- 
puter Conference, Astrohall, 
Houston, TX. 

7-9 Technical Education Research 
Centers, Cambridge, MA. Micro- 
computers in Education Work- 
shops, Taft School, Water- 
town, CT. 

7-11 Ken Orr and Associates Inc., To- 
peka, KS. Course on Structured 
Systems Design/Structured Pro- 
gram Design, Washington, DC. 

7-11 MUMPS Users Group, Washing- 
ton, DC. 11th Annual Conference, 
Hilton Hotel, Denver, CO. 

8-11 Ken Orr and Associates Inc., To- 
peka, KS. Course on Structured 
Requirements Definition, San 
Francisco, CA. 

10-11 A/E Systems Report, Newington, 
CT. Third International Confer- 
ence on Automation and Repro- 
graphics in Design Firms, Expo- 
center, Chicago, IL. 

13-17 National Computer Graphics As- 
sociation, Washington, DC. Third 
Annual Conference and Exposi- 
tion, The Anaheim Convention 
Center, Anaheim, CA. 



14-16 VR Information Services, Austin, 
TX. 19th Design Automation Con- 
ference, Caesars Palace, Las Ve- 
gas, NV. 

15-16 The Yankee Group, Cambridge, 
MA. The Second Phase of Office 
Automation, Palo Alto, CA. 

15-18 Ken Orr and Associates Inc., To- 
peka, KS. Course on Structured 
Systems Design, Boston, MA. 

15-18 Integrated Computer Systems, 
Santa Monica, CA. Computer 
Graphics course, Washington, 
DC. 

15-18 Integrated Computer Systems, 
Santa Monica, CA. Distributed 
Processing, Mini and Microcom- 
puter Implementations, Washing- 
ton, DC. 

18-20 Midwest Affiliation of Computer 
Clubs and Franklin University, Co- 
lumbus, OH. Computerfest, 
Phillips Hall, Franklin University, 
Columbus. 

21-25 Ken Orr and Associates Inc., To- 
peka, KS. Course on Structured 
Systems Design/Structured Pro- 
gram Design, St. Paul, MN. 

22-25 Ken Orr and Associates Inc., Tope- 
ka, KS. Course on Structured Sys- 
tems Design/Structured Program 
Design, Dallas, TX. 

22-25 Integrated Computer Systems, 
Santa Monica, CA. Computer 
Graphics course, San Diego, CA. 

28-30 The Interface Group, Framing- 
ham, MA. COMDEXVSPRING '82, 
Atlantic City Convention Hall, At- 
lantic City, NJ. 

28-30 Online Conferences Ltd., London, 
England. Videotex '82, Hilton Ho- 
tel, New York, NY. 

28-3 Ken Orr and Associates Inc., To- 
peka, KS. Course on On-Line/ 
Real-Time Systems Design, Chi- 
cago, IL. 

29-2 Ken Orr and Associates Inc., Tope- 
ka, KS. Course on Structured Data 
Base Design, Denver, CO. 

29-2 Integrated Computer Systems, 
Santa Monica, CA. Computer 
Graphics course, Boston, MA. 



29-2 Integrated Computer Systems, 
Santa Monica, CA. Hands-On Pas- 
cal Workshop, Boston, MA. 

July 

13-16 Integrated Computer Systems 
Santa Monica, CA. Distributed 
Processing, Mini and Microcom 
puter Implementations, Boston 
MA. 

13-16 Integrated Computer Systems 
Santa Monica, CA. Hands-On Pas 
cal Workshop, San Diego, MA. 

20-23 Integrated Computer Systems, 
Santa Monica, CA. Distributed 
Processing, Mini and Microcom- 
puter Implementations, San 
Diego, CA. 

21-23 University of Oregon, College of 
Education. The Computer: Exten- 
sion of the Human Mind, Hilton 
Hotel, Eugene, OR. 



August 



1-4 Nevada-Reno Division of Contin- 
uing Education and Washoe 
County School District. Microcom- 
puter Applications in Educa- 
tion, Cloud's Cal-Neva, Lake Ta- 
hoe, NV. 



Coming 
Next Month 

Games, games and for good measure, a 
few more games. Our third annual 
August games issue has more aliens, 
mazes, puzzles, challenges and adven- 
tures than our first two collections com- 
bined. 

Remember Star Trek 4.0 in last August's 
issue? Well, 80 Micro's resident wampeter, 
Jake Commander, is flowcharting again. 
Star Trek 4.5? That's doubtful, but what- 
ever he turns out promises to be exciting. 
Also worth waiting for is Kalvos 
Gesamte's game debut. A game by Kalvos 
Gesamte? Yep, that's what he said at first. 
If nothing else, it promises to be very inter- 
esting. And that's just for starters. We'd 
love to tell you more, but there's not 
enough room in this little box.B 
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Kerry Leichtman 
and Jake Commander 

80 Micro staff 

Sometime next fall Dartmouth College, 
in Hanover, NH, will go on line with a 
new concept in computer time-sharing 
systems. The system is called Avatar, 
which is, loosely, an acronym for "A Phys- 
ical Realization of a Conceptional Idea/' 
So what's in a name? More importantly, 
Avatar weds the ease of working with a mi- 
crocomputer to the storage, versatility 
and computing power of mainframes. 



Briefly, when the system is up and run- 
ning, an authorized user will be able to sit 
down at a micro terminal and work on it 
and a mainframe at the same time. The 
user benefits from the best aspects of mi- 
cros and macros without suffering the 
drawbacks of either. 

The principal drawback of the main- 
frame is its cost of on-line time, while the 
main drawback of the micro is its compar- 
atively primitive operating systems and 
limited storage capacity. Using the Avatar 
system, a person can edit a file of a mil- 
lion bytes or so on a micro terminal of only 



32K. Like an invisible force, Avatar con- 
stantly supplies the micro with whatever 
file portion is desired by the user— auto- 
matically. As Avatar scrolls one section 
out and another in, it saves and stores the 
new version while the operator is working 
on the next section. In effect, the micro 
user has continuous access to the full 
one-million byte file without having to 
break the file into, say, 20 separate floppy 
disks. 

The Avatar project's general is William 

continued 




Jake Commander (center), 80 Micro technical consultant, and William Arms (right) watch students demonstrate Avatar's micro to 
mainframe capabilities. In photo on right, Zenith Z-19s are waiting to come on line with Avatar. 
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LOAD 
80 

LOADS 
EASY 

ELIMINATE 
TYPING AN 
AGGRAVAT 




wam 



In the April, 1981 issue of 80 Micro we introduced LOAD 
80 to save you the time and trouble of typing our programs 
yourself. LOAD 80 cassette tapes contain dumps of the 
major program listings in 80 Micro. 



If you have not yet ordered any LOAD 80 tapes and wish 
you had, don't worry. We are now offering a "back issue" 
cassette program. You can order any LOAD 80 cassette 
from April, 1981 to date for $9.97. Back issues of 80 
Micro are also available with the LOAD 80 cassettes for 
$3.50. With the complete documentation found in the com- 
panion magazine issue, you should have no difficulty 
loading any of 80's major programs. 



Please send me the following: 

month year month 
Tapes Magazines 



year 



ITEM 


COST 


QTY. 


TOTAL 


I OAD 90 Tapes 
add $1 .50 per tape for postage and handling. 


$9.97 






80 Micro 

add $1.00 per magazine for postage and 
handling 


$3.50 








T 


OTAL 





[J Check Enclosed Bill my: D MC D AE : . VISA 

NAME 

ADDRESS 

CITY STATE 



CARD# 

SIGNATURE 



ZIP. 

EXP. DATE_ 



INTERBANK*. 



Please allow 4-6 weeks for delivery 

LOAD 80 • 80 Pine Street • Peterborough NH 03458 

Attn: Debra Boudrieau 






a problem? 



Here's the ideal way to keep your 
growing collection of 80 Micro in 
order! The 80 Micro Library Shelf 
Boxes. 



. . .sturdy, corrugated, white, dust-resistant boxes will keep 
your issues of 80 Micro orderly and available for constant 
reference. Self-sticking labels are available for the boxes, too, 
not only for 80 but also for Microcomputing, 73 Magazine, CQ, 
QST, Ham Radio, Personal Computing, Interface Age, Byte 
and Radio Electronics. Ask for whichever labels you want 
with your box order. Each box holds a full year of the above 
magazines. Your magazine library is your prime reference: 
Keep it handy and keep it neat with these strong library shelf 
boxes. One box (BX1000) is $2.00, 2-7 boxes (BX1001) are $1.50 
each, and 8 or more boxes (BX1002) are $1.25 each. Be sure to 
specify which labels we should send. Shipping and handling 
charges are $2.00 per order. Call in your credit card orders on 
our toll-free line 800-258-54 73, or use the order card in the back 
of the magazine and mail to: 



micro 



ATTN: BOOK SALES 



Peterborough, 
NH 03458 



Please allow 4-6 weeks for delivery. No COD orders accepted 



Attention: 
European Subscribers 



Due to shipping problems in Europe, we 
are asking our subscribers to send us their 
most recent mailing label from 80 Micro. 
If you are unable to provide us with a 
label, please send us your name and ad- 
dress, and tell us at what point you are 
presently in your subscription. This infor- 
mation is very necessary in order to solve 
a forwarding problem, so we are asking 
for your co-operation in this matter. 
Please direct all information to: Attn: 
Doris Day, 80 Micro, 80 Pine Street, 
Peterborough, NH 03458. 



80 Microcomputing, June/July 1982 • 389 



BO NEWS 



DARTMOUTHconf/rwed 

Arms, Dartmouth's director of computing 

services. Arms's background is in main- 
frames, but as micro technology became 
more capable, he became interested in 
fusing the two technologies together. 
"There is a great tendency," he told 80 Mi- 
cro during a recent visit, "to think of mi- 
cros and time-sharing systems as rivals. 
This should not be the case." 

Another example of Avatar at work: A 
class of 30 students is using a particular 
program to calculate findings in an engi- 
neering project. They are working indivi- 
dually on sections of the project, but will 
pool their results into a final solution. Sup- 
pose one of the students finds a modifica- 
tion to one of the programs the class is us- 
ing. Using micros, the students would 
have to make 30 individual copies of their 
modified programs for the class. Using 
Avatar, they only need to store the new 
program into the mainframe and instantly 
the entire class has access to the newer, 
better program. 

There are three main components to Av- 
atar. First is the terminal. Avatar will use 
Zenith / 19 dumb terminals. The second 
component, the micro, will not have a key- 
board or CRT display. It will be no more 
than a box containing 32K RAM, 24K ROM 
and the various electrical circuitry. 



Twenty-four K is a lot of ROM. Most of it is 
for editing purposes. 

Next is the mainframe. Dartmouth's 
Kiewit Computation Center houses many 
large macro systems. The Avatar system 
user will have access to them all. 

When using the Z-19 as a microcomput- 
er, the keyboard will send its input to the 
box, which will in turn send its output to 
the Z-19'S CRT. When using the Z-19 with 
the mainframes, files will be dumped into 
the micro which will then send them along 
to the terminal. The difference between 
the speeds of displaying information from 
the macro or the micro to the Z-19 is no 
more than a quick blip on the screen. 

In developing Avatar, Arms was at- 
tempting to accomplish many individual 
goals. "When developing a network, high 
speed, low cost and reliability are the 
things you always look for." The wedding 
of macro and micro has distinct advan- 
tages over using one exclusive of the 
other. "It doesn't matter if the CPU is 
miles away, or right in front of you. But it 
can be advantageous having a CPU in 
your terminal," Arms said. 

The program's cost effectiveness comes 
into play when you compare the actual 
time spent on line. Using another hypo- 
thetical example: suppose that when an 
engineering student was modifying his 
program it took three hours. Using the cur- 



rent type of time-sharing system that on- 
line time would have cost him x dollars per 
hour, or 3x. Working on that same pro- 
gram modification under the Avatar sys- 
tem, he would be able to greatly reduce 
that on-line charge. 

He would need the same three hours to 
work on the program, but of those three 
hours maybe only 10 minutes would be 
spent accessing the mainframes. The rest 
of the time would be time spent on the 
Z-19 accessed to the micro. The student 
would be working on the files stored in the 
mainframe but on the micro. Every time he 
called for a program section out of the mi- 
cro's 32K range, Avatar would exchange 
that 32K for another. The transaction 
would not even take one second. But in 
that time, Avatar will have taken the edit- 
ed 32K, saved and stored it, and supplied 
the student with another 32K of program. 

Arms and his colleagues are mainframe 
people who, in the past, cast only a side- 
ways glance at the emergence of the mi- 
crocomputer: first a toy, later an interest- 
ing development, and finally a tool to 
make their megabyte world accessible to 
many, many others. They are more than 
optimistic about Avatar's revolutionary 
time sharing concept. "We combined mi- 
cros to mainframes to provide a good ser- 
vice at a moderate price," Arms explained. 
And it seems they have done just that. ■ 



High Court dodges v-games qu 



It looks like the nation's highest court is 
not yet ready to wade into the controver- 
sy over government regulation of video 
game rooms. 

The U.S. Supreme Court has returned to 
lower court a case involving an arcade or- 
dinance in Mesquite, TX, a suburban 
Dallas community of 67,000 inhabitants. 
Included in the city law governing coin- 
operated amusement establishments are 
provisions requiring youths under 17 to be 
accompanied by an adult when playing 
video games in an arcade (80 Micro news, 
Jan. 1982). 

The High Court's decision to return the 
case to the U.S. Court of Appeals for the 
Fifth Circuit located in New Orleans 
pleased neither side in the dispute. 

"We were disappointed that the court 
did not address the merits of the age 
restriction issue," said Don Sampen, an 
attorney with the Chicago law firm 
representing Aladdin's Castle Inc., 
operator of a chain of some 250 game 
rooms across the country and a sub- 
sidiary of pinball giant Bally Manufactur- 
ing Corporation. He told 80 Micro he felt 



confident Aladdin would prevail, as it did 
the first time, in the appeals court. 

Elland Archer, city attorney for Mes- 
quite, said of the court's dodging the age 
requirement issue: "We would have been 
much more pleased to have an outright 
decision on that one. I really felt it was a 
question that they could consider, but 
they had some question about it." 

In the court's 7-2 decision, it said it 
failed to understand if the lower court's 
opinion rested on state or federal law. If 
the basis of the appeal court's decision 
was state law, the justices opined, they 
lacked jurisdiction to review it. But if it 
rested on federal law, then the High Court 
would have to take a closer look at it. 

"There was no question in my mind," 
Archer said in a phone interview, "that.it 
was decided solely on federal law. [The 
appeals court] simply mentioned the state 
constitution in passing." 

Ironically, that was also the opinion of 
the two justices dissenting with the ma- 
jority decision written by Justice John 
Stevens. 

"[T]here is no reason in this case to 
suspect," Justice Byron White dissented, 



"that the Fifth Circuit's standard for 
evaluating Appellee's Due Process and 
Equal Protection claims under the Texas 
Constitution differed in any respect from 
federal constitutional standards." 

The appeals Court's mention of Texas 
cases, Justice Lewis Powell argued in his 
dissent, does not suggest "an adequate 
and independent state ground for overrul- 
ing the Mesquite ordinance." 

He added: "[T]he inclusion of three cur- 
sory state-law citations in a full discus- 
sion of federal law by a federal court is 
neither a reference to nor an adoption of 
an independent state ground. 

"The Court's view allows federal courts 
overruling state statutes to avoid appel- 
late review here simply by adding cita- 
tions to state cases when applying fed- 
eral law." 

Mesquite's lawyer Archer maintained 
now that the appeals court knows the 
score, it will do what it has to to make its 
earlier decision stand. "My personal opin- 
ion," he said, "is they'll say that they did 
rule on some independent state ground so 
they won't get reversed by the Supreme 
Court. That's what I'd do if I were a judge." 
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TRY OUR ONE DAY PC BOARD SERVICE 



Fa si servii e and high quality al a reasonable pri< e 



— -* _ . . ._—._.-_ ( Use alone or with the "\ _.„ _ _ _ 
FORM LETTER Uaillist.y»tembelow J $39.95 

Create letters and store on disk with provisions for later retrieval 
and additions. Then print vour letters using your mailing list. 

• Same select and purge features as mailing list system. 

• Select either continuous fanfold or "cut sheet" paper. 

• Selectable tabing, test printing, and paging. 

• Allows regular or legal size pages. 

• Greetings are selectable by codes on mailing list. Options 
include Mr. .'Mrs , First/Last Name, global, or user defined. 



1ST SYSTEM 



(Model I or III disk only) 

We proudly present here what many consider to be the most versa- 
tile and powerful mailing list system on the market today. It is 
primarily written in BASIC for ease of modification. The presence 
of embedded machine code gives high speed only where it is 
needed --Beware of all machine code systems. This newly revised 
system performs equally well on the very small lists and the very 
large (many tens of thousands of names). To assist you in 
evaluating our system, we offer our manual alone at essentially 
our own cost ($4.95 + $2.00 P&H). 

• Simple to use. ..even for the novice. 

• Maintain virtually an infinite number of disks all in con- 
tinuous alph. or zip order. ..essential for large lists. 

• Sort 2260 entries (2 full 40 track double density disks) in 
only 32K or an incredible 4640 entries (2 full 80 track 
double density disks) in only 48K!...Made possible with 
our unique date compression techniques. 

• Super fast sort by alph. or zip order (8 sec. for 1000 
entries) ...both orders can exist simultaneously on disk. 

• High speed recovery of entries from disk... speed of sort is 
meaningless if retrieval from disk is slow ours pulls in 

over 11 per sec! . 

• Transfers old files over to our system — ^BBBBSBi LOOK! 

• Zip order is "sub-alphabetized" 

• Less than 5 digit zips have leading 0's appended. 

• Supports 9 digit zips, Canadian zips, and foreign abbrev. 

• Backup data disks are easily updated as entries are 
created, edited, or sorted. ..extremely useful!! 

• Optional reversal of name about comma. 

• Permits telephone, account, and/or serial numbers, etc. 

• Prints on envelopes or on labels, 1, 2, 3, or 4 across. 

• Test label/envelope printing lets you make horizontal and 
vertical adjustments with ease 

• Master printout of your list in several formats (not just a' 
rehash of the labels), extremely useful. 

• Selective printing by specific zips or by zip range. 

• Editing is simple and fast. ..automatic search. Batch 
transfer of edited entries to backup disks. 

• Optionally provides for duplicate labels. 

• Deleted entries have "holes" on disk filled automatically 
and alph. order is still maintained! 

• System adjusts to any DOS. 

• Automatic "repeat" feature for ease of entry. 

• Load and "scroll" through entries on disk. 

• All labels optionally support an "ATTN:" line with pro- 
visions for multiple entries. 

• Plenty of user defined fields with various options for 
simultaneously purging and selecting the printout even 
allows for inequalities. ..powerful and easy to use. 

• All 0's in address labels are replaced by easier to ready 0's. 

• Continuous display of numbers of labels/envelopes printed. 

• Each disk entry automatically "remembers" how many 
mailings have been made for that particular entry. ..Can 
be tied in with purge/select. 

• Extensive use of error traps (both operator and machine 
induced), even recovers from a power failure during a 
printout! recycling on disk errors 

• Hardware requirements S2K, printer, and ! or 2 drives 



PROVEN QUALITY SOFT\ 
FOR YOUR TRS-80* 

*Tandv Corp. Trademark 




Sign (Supplied on tape only) $19.95 

Produce large (reduced 50% here) attention getting signs with your 

printer. ..supports most keyboard characters will print multiple 

lines. ..use alone or interface to your own BASIC program requires 
just over 1 6K and a printer. 
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Prints out calendars (screen or SIIPPR CALEN DAR 

hardcopy) of individual months of r Supplied on W-iqqc 
years ranging from 1583 to* any V tape only J *!"•-« 

time in the future. Standard banker's holidays are 
noted. ..Additionally prints out large "graphics" type wall 
calendars with memos under each day. ..Use as a planning calen- 
dar with optional disk storage. ..Requires 16K and a printer 



Football Scouting Report ( on i y ) $89.95 

Charge local high schools and colleges up to $1000 per season 
for these sophisticated reports. Documentation manual avail- 
able alone for $3.95 + $2.00 shipping and handling. 



Loan Amortization ( ^glt™ ) $29.95 

Achieves pin point accuracy with a built in calendar.. This 
sophisticated program produces an exceptionally professional 
looking printout that includes yearly summaries as well as 
"totals-to-date"... Several options for calculating interest includ- 
ing one that pushes the payment date ahead to the next business 
day if the regular pay date falls on a weekend or holiday. 
Hardware requirements: Model I or III, 16K, and a printer. 



ALPHABETIZER 

(disk only) $29.95 



Interfaces to your own basic FAST SORT 

programs. ..sort with the speed of and 

machine code but with the con- 
venience of basic. Use your disk 
to merge our short basic programs 
(with embedded machine code) with your own basic program. 
Follow simple instructions to set up a sort of string, integer, 
single, or double precision arrays (also ascending or descending 
order ) Also included is a ready to use basic program (already 
merged with the ORDER program). Use it to obtain a printout of 
alphabetized names 

Sample Sort Times 
8 sec for 1000 dbl prec. numbers. .50 sec for 5000 integers 
(Ours is one of the only alphabetizers that both ignores non alph. 
characters and treats upper and lowercase alike. 




■ 



Total (Add $2 00 for Shipping «, Handling) $. 
Check □ COD □ Visa D 

Card No 

Name 



:i 



City, State, & Zip 



Precision Prototypes 

■ 410 E. Roca Refugio, Tx. 78377 (512)526-4758 



sSee Lis! ot Advertisers on page 386 
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Computer theft bill filed in Mass. 

Proposal would make breaking into computer files illegal 



by Steven Frann 

80 Micro Staff 

Will Massachusetts become the 13th 
state to adopt legislation providing 
for the prosecution of computer related 
crime? 

In March the Massachusetts Legisla- 
ture's Committee on Criminal Justice 
heard testimony at the State House in 
Boston on a bill sponsored by Rep. 
Kenneth M. Lemanski (D-Chicopee) that 
would make it illegal for someone "to 
gain, or attempt to gain, access to any in- 
formation of any kind within a computer 
to which such access is unauthorized, by 
any means, electronic or otherwise, from 
any location." Violators of the proposed 
law would be "punished by imprisonment 
in the state prison for not more than 
five years, and by a fine of not more 
than $10,000." 

Lemanski, speaking from a prepared 
statement, said: "Many cases relating to 
computer abuse have been lost because 
many States including our own support 
the rule that electromagnetic impulses 
are not property. House Bill 5562 will 
eliminate this problem entirely by circum- 
venting the question of property and in- 
stead focusing on the actual attempt to 
gain unauthorized entry to the system in 
question. Currently it is highly debatable 
whether or not a crime is being committed. 

"H5562 is purposely flexible. H5562 will 
give prosecutors the base they desper- 
ately need in tracking down on what can 
be potentially devastating abuses." 

Using phone lines to unlawfully gain ac- 
cess to information stored in computers 
would be illegal under this bill. "Many 
computer crimes are difficult to prosecute 
since the criminal was on the system 
rather than actually being physically pres- 
ent at the site of the computer," Leman- 
ski said. 

He noted legislation relating to com- 
puter crime is currently before the U.S. 
Congress. 

Representative W. Paul White (D- 
Boston), House Chairman of the Commit- 
tee, asked Lemanski, "Is it possible under 
present law for a District Attorney to pros- 
ecute this type of crime?" 

"They can prosecute under a general 
class of action, not specifically as a com- 
puter crime. We hope to establish a separ- 
ate crime for computer theft which would 




Rep. Lemanski: Many states have lost computer crime cases because electromagnetic 
impulses are not recognized as property. 

point out the problems that the computer 
industry not only in Massachusetts but 
across the country faces," Lemanski 
answered. 

Following Lemanski's testimony, 
Joseph A. Federici and James W. Stace, 
both of the Data Processing Management 
Association (DPMA), a group with 29,000 
members in computer-related fields 
worldwide and with international head- 
quarters in Park Ridge, IL, appeared 
before the committee in support of the 
bill. Frederici, vice president of govern- 
ment and business relations of the DPMA 
and also Customer Service Manager of 
Bay State Abrasives of Westboro, MA, ex- 
plained the DPMA's position on the issue 
saying, "It is our intent to come up with a 
computer crime bill that will be a model 
for all states to follow." 

The DPMA is currently studying the 
computer crime bills adopted in Arizona, 
California, Colorado, Florida, Georgia, Il- 
linois, Michigan, Montana, New Mexico, 
North Carolina, Rhode Island and Utah 
and the bills pending in Massachusetts, 
Hawaii, Missouri and Pennsylvania. When 



they complete their study they will draw 
up a model bill for presentation to state 
legislatures where a computer crime bill 
has not yet been adopted. 

Stace, who is international director for 
the Boston Chapter of the DPMA and who 
also works for the Commercial Union 
Assurance Companies located in Boston, 
said "There is a definite need for passage 
of the bill." 

In an interview after the hearing, Tom 
Nichols, an aide to Lemanski, echoed the 
legislator's testimony: "We are inten- 
tionally keeping the law vague so that it 
will be refined by judicial review. It is best 
to give the prosecutors some statute to 
which they can resort. As it stands now 
they have to resort to trespassing or lar- 
ceny. This law would make the simple act 
of accessing a computer and breaking 
into files illegal. To a jury that's not con- 
fusing. It's not 'Is it property?' or 'What's 
the nature of electromagnetic impulses?' 
It's 'Did he or did he not break into the 
file?' That's a much simpler question." 

Lemanski anticipates a favorable 
report from the committee. ■ 
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#01103 General Mathematics -1 (Gilder] improve 

your math skills. Speed up your computations. Contains 
15 useful programs to help sharpen your ability. Great for 
educators and students. TRS-80 Level II tape, $14.95 

#01203 Complex Mathematics (Gilder] Simplified! 
Enables you to compute complex mathematical calcula- 
tions using BASIC rather than FORTRAN. Contains 
separate programs. TRS-80 Level II tape, $14.95 




boohs 



tfe* #5406 The SoftSide Sampler: TRS-80 ,m 

Entertainment Programs (ed. Witham) Test your 

nautical skills with Around the Horn, Battleship, and 
many more. . .take part in a nine man wrestling contest 
. . .jump a motorcycle over ten barrels at a time! This is 
just a sampling of SoftSide Magazine's more exciting 
game programs, written in TRS-80 BASIC, which will 
provide many hours of pleasure and fun. $8.95 

>ieW #5534 The BASIC Conversions Handbook 
for Apple tm , TRS-80 ta t and PET*" Users 

(Brain Bank) If you have an Apple II or PET or TRS-80, 

now you can take any BASIC program written for the 
other two machines and convert it to run on your own 
micro. Equivalent commands listed for TRS-80 (Model I, 
Level II), Applesoft BASIC, and PET BASIC, as well as 
variations for the TRS-80 Model III and Apple Integer 
BASIC. Describes various graphics capabilities. $7.95 

#5187 My Micro Speaks BASEX (And Loves It!) 

(VVarme) Make your programs run up to 20 times faster 
with BASEX than with similar programs in BASIC. This 
versatile language for 8080-type microcomputers 
combines the best features of BASIC and executable 
machine language code. An in-depth examination. BASEX 
Compiler/Loader & Sample Programs. Available on 
TRS-80 tape, request #07203, $34.95. $9.95 
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Available at your local computer store 

or order by phone 

1-800-631-0856 



phone (201) 843-0550. ext. 382 



Apple is a registered trademark ot the App e Computer Co., Inc : PET is a regis 
tered trademark of Commodore Business Machines, Inc.; TRS-80 is a registered 
trademark of Radio Shack, Inc.; none of which are affiliated with Hayden BooR 
Company, Inc. 
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#05303 (tape) #05308 (disk] Blackjack Master: A 

Simulator/Tutor/ Game (Wazaney) Create your own 
system for winning at Blackjack without leaving your 
home or risking a penny! Performs complex simulations 
and evaluations of any playing and betting strategies that 
you enter into the computer. 
TRS-80 Level II tape, $24.95 
TRS-80 Level II disk, $29.95 

#07403 Mind Thrust (Sackson and Wazaney) Match 
wits with the computer. Be the first to complete a chain 
across the playing board. Switch sides at any time and 
gain control of your opponent's pieces . . . but remember 
—he'll control yours, as well. TRS-80 Level II tape, $16.95 

#08903 Personal Property Inventory (Southern 

Systems) Now you can develop, maintain, sort, and save 
an inventory of your personal property. Especially useful 
for tax and insurance purposes. Allows for modifications. 
TRS-80 Level II tape, $14.95 




Order Today! 

Department #EM 6214 

Hayden Book Company, Inc. 

50 Essex St., Rochelle Park, NJ 07662 

Please send me the item(s) indicated below by code number: 



^-305 



n My check or money order is enclosed. 

Please charge to my D Visa □ MasterCard Expiration Date. 



Mr./Ms. 

o 


u Address 


Apt.# 


3 City 

S 

w 


^ State/Zip 


* 


£ Visa/MasterCard # 


g Signature 


Residents c • NJ and CA must add sales tax. 
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-See List ol Advertisers on page 386 



80 Microcomputing, June/July 1982 • 393 



SO NEWS 



Greats of Grand Old Game 
play ball in microcomputer 



It's being billed as "The Greatest Base- 
ball Game Never Played." 

On July 14, the greatest American 
League stars of all time will be pitted 
against the greatest players from the Na- 
tional League in a computer all-star game 
to be aired on a national network of more 
than 200 radio stations including some in 
Canada. 

The program for the game is written in 
Apple Pascal and will cook in an Apple III 
microcomputer with 128K of memory, a 
floppy disk drive and a Profile 5 megabyte 
hard disk drive. 

The game is the brainchild of BFV&L 
Promotions Inc. of St. Louis. Vice Presi- 
dent Don Weber told 80 Micro, "This is an 
entertainment piece for the radio audi- 
ence to depict as accurately as possible 
what would have transpired had these 
players played each other." 

Baseball fans chose the rosters for the 
all-time all-star teams through ballots 
published in The Sporting News this 
spring. Editors at that national weekly 
based in St. Louis chose the players ap- 
pearing on the ballot— for each league 10 
outfielders, 10 pitchers, and five candi- 
dates for each of the other positions— 
but there was also room for write-ins. 

"There were a number of obvious 
choices," observed SN's Circulation 
Director Donald Barrows, "but it was dif- 
ficult limiting the ballot to 10. After you 
pick Babe Ruth and a couple of more, you 
can debate what the American League 
outfield will be." 

Barrows added the game will be on a 
batter-by-batter basis rather than pitch- 



mmKmk 



by-pitch. "The geometric multiplication of 
the problem would become too great," he 
said. "And who's to say what Cy Young 
would have thrown Ted Williams. You're 
really in a speculative mode there." 

However, after the computer deter- 
mines the outcome of a pitcher-batter 
confrontation, a pitch-by-pitch version of 
it will be scripted for the game's play-by- 
play commentator, Jack Buck, the voice 
of the St. Louis Cardinals. "Jack Buck will 
know that Ty Cobb got a single off 
Koufax," Barrows explained. "He will 
script Koufax's pitching to Cobb in the 
way that he probably would have pitched 
to him. The input for that will be supplied 
by our editors." 

Weber said it was difficult establishing 
statistics for some aspects of the game. 
Game developers failed to establish field- 
ing statistics for many players, he noted, 
so an error factor was developed based on 
a general standard. 

Other statistics in the game are guess- 
work, Barrows noted: "If you try to make a 
decision, for example, of what percentage 
of the time Ty Cobb hit to left field, center 
field and right field, it's difficult. We've got 
some of that in the program, but for much 
of it we had to call on the expertise of our 
editors— God knows a couple of them are 
old enough to say they saw Cobb play— 
and come up with statistics that are 
perhaps not verifiable. They are subjec- 
tive, but subjective from the best experts 
we can get." 

Although the computer run of the game 
will take place early this month, Weber ex- 
plained, the outcome of the game will be 




Lindsay Nelson will Join Jack Buck when 
present and past stars clash in all-time, all- 
star simulation. 

"one of the best kept secrets since who 
shot J. R." The Midwest promotions man 
added: "We have developed a format for 
maintaining the secrecy of the outcome of 
the game. Even the people doing the tech- 
nical and broadcast work will not know 
the actual outcome. Although there will be 
one real game off the computer, we will 
dummy in other innings so they won't 
know which seventh, eighth and ninth in- 
nings are the legitimate ones." 

Asked if the organizers of the game in- 
tend to market it commercially, Weber 
said: "The possibility is there. It would 
take some refining and graphics. "■ 
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spins off 

Authors with varied backgrounds write game books fast 



by John P. Mello Jr. 

80 Micro News Editor 

There's big money being made in vid- 
eo games — $6 billion in 1981 alone. 
The money being made is not only 
from making the games and machines to 
play them on, but in writing about the 
games and how to win them. 

Since December, publishers have been 
churning out video game books as fast as 
they can whip their authors to write them. 
At least eight books have appeared on the 
market this year and the promise of a 
blockbuster— like Ken Uston's Mastering 
Pac Man which has sold more than a mil- 
lion and half copies— has spurred pub- 
lishers to pressure their video writers to 
pump out more of the genre. 

"I've had to meet excruciating dead- 
lines," said Craig Kubey, author of Scor- 
ing Big at Pac Man: How to Munch the 
Monsters rushed into print by Warner 
Books in January and The Winners Book 
of Video Games issued by Warner in April. 

Kubey told 80 Micro he was finishing 
Winners last November when Warner de- 
cided to market the book's Pac Man chap- 
ters separately. Gathering some addition- 
al material, he wrote the Pac Man book in 
three days. 

The 32-year-old lawyer and former mem- 
ber of Nader's Raiders said Winners has 
been a very demanding project. "It hasn't 
been a matter of me calling my own shots 
and saying, well, I think it will take me two 
months to do this working 40 hours a 
week. It's been, sorry, you've got to do this 
in 12 days because of our scheduling." 

Several times, Kubey said, he had to put 
in 100-hour weeks and all-nighters to meet 
deadlines. Four times he had to travel 
from his home in Davis, CA, to San Fran- 
cisco—a trip of several hundred miles — 
to use an air express service that worked 
on Sundays. "I had to get all the photo- 
graphs and all the illustrations for the 
book," he observed, "in 48 hours, though 
I'm neither a photographer nor artist." 

Kubey said he got the idea for Winners 
on his 31st birthday, July 4, 1980. His 
mother and 18-year-old brother drove to 
Davis to visit him. During the ride, his 
brother, with pen and notebook in hand, 
wrote "The Almost Complete Book of As- 
teroids" and gave it to Kubey as a birthday 
present. The older brother added to the 
joke by creating a professional-looking 
cover with transfer lettering and writing a 



two-page apocryphal description of its 
author. 

Later, another visiting relative, his sis- 
ter from Los Angeles, saw the book and 
suggested he do it for real. He decided to 
take his sister's suggestion to heart. At 
the time, Kubey was working at a 
"menial" job as night librarian at the Uni- 
versity of California-Davis. "I was inter- 
ested in video and in writing," he said, 
"but most of all, I was desperate not to re- 
ject what everyone else would consider a 
foolish suggestion." 

Kubey began contacting agents and 
eventually, one took an interest in his 
idea. When the agent approached Warner 
Books with the proposal, there was in- 
stant enthusiasm for it. 

Michael Blanchet got the idea for 
How to Beat the Video Games while 
walking through a book store. The 22-year- 
old tournament winning game player had 
a part-time job at the time in an arcade in 
Morristown, NJ. "There were books on 
Bridge and card game strategies," he re- 
membered, "but I thought, no one ever 
plays those games anymore. They're all in 
the arcade spending their money. So why 
not a book on video games?" 

While he was writing the book, he com- 
peted in a video games tournament at the 
Willowbrook Mall in Wayne, NJ. He won 
the "Battle Zone" competition, scoring 
73,000 points in three minutes. His ex- 
ploits at the competition were included in 
the Sunday magazine of The New York 
Times. An enterprising agent saw the 
story and approached Blanchet about 
writing a video games book, unaware he 
and the youth were on the same pulse 
train. 

After the agent sold the book to Simon 
& Shuster's Fireside Division, the ambi- 
tious Blanchet suggested he start writing 
a twice-weekly syndicated newspaper col- 
umn on video games. The Tribune Com- 
pany Syndicate Inc. of New York City liked 
the idea and gave Blanchet the go ahead. 
Now 90 newspapers carry the column. 

The Garden State youth was introduced 
to computers and video games by his fath- 
er, who taught computer science in 
grades 9-12 in the Madison, NJ, burrough 
school system. During the summer 
months, Blanchet's father brought the 
school system's Hewlett-Packard system 
home, set it up in his son's room and 



taught him Basic. Soon Blanchet was pro- 
gramming his own computer games. "At 
that time, you didn't have a CRT," he re- 
called. "You only had a printer. Every time 
a situation changed, you had to reprint the 
whole screen. It took up rolls of paper." 

Blanchet has always loved pinball and 
was pumping $20 a week into the ma- 
chines when he found a new love— coin- 
operated video games. "I'd go to 24-hour 
diners, bars, wherever I could find a 
game— at the time, Space Invaders," he 
remembered. "Wherever there was a 
game to play, I'd either drive or get myself 
there somehow to play it." 

He set a goal of 10,000 points for him- 
self. He scored 12,000. "On the grand 
scale, that's nothing. But it was enough 
for me. I was happy at that point." 

I will never claim to you that I am 
a great player," Arnie Katz said, "But 
you don't have to be Kareem Abdul Jabbar 
to coach Kareem Abdul Jabbar. What I'm 
very good at is analyzing the games and 
coming up with strategies." 

Katz, editor and publisher of Electronic 
Games and that magazine's executive 
editor, William Kunkle, have co-authored 
The Player's Guide to Atari VCS Home 
Video Games published by Dell. Katz, 35, 
said his and Kunkle's book grew out of 
their work at their magazine, a 
250,000-circulation monthly founded in 
October 1981. The magazine— which cov- 
ers hand-held, table-top, programmable, 
computer and arcade games— is slanted 
toward news, reviews and strategy, Katz 
explained. "It wasonly natural totakethat 
concept and turn it into a book. There's no 
one writing about electronic games as fre- 
quently and steadily as Bill Kunkle and I. 
For us, the book was really an extension 
of our overall involvment with this exciting 
new hobby." 

He said he and Kunkle's interest in vid- 
eo games goes back quite a few years: 
"We were among the first to purchase the 
Odyssey and Atari when they first came 
out. Bill owns one of the first Odyssey 
units that came out in 72. It had overlays 
that fit over the tv screen." 

But, Katz said, he and Kunkle— who 
both write a column called "Arcade Alley" 
for Video magazine— had another reason 
for writing their book: "We were unpleas- 

continued 
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antly surprised by the quality of the first 
few books that came out on the subject. 
We felt there should be something author- 
itative, well-written and well-researched. It 
was obvious that if that was going to hap- 
pen, it would have to be us, since we have 
thedeepest experience as well asthe jour- 
nalistic credentials." 

Attorney Kubey seemed to share Katz's 
view on some of the video books on the 
market. He maintained the authors of one 
Pac Man book only covered action to the 
"ninth key." "That's like writing a book 
about the American automobile industry 
and not mentioning Genera; Motors," he 
said. 

He claimed the authors tried to get in- 
sights into the game by talking to players, 
but the players they talked to were "medi- 
ocre." The best player they interviewed 
had a score of 115,000, he noted. "With a 
score like that, you don't even get into the 
more sophisticated modes of the game." 
He added his top players had scores ex- 
ceeding two million. 

"I don't want to knock the competition 
because it sounds bad," observed Katz of 
Electronic Games, "but I think it's very 
obvious to anybody that reads the books 
that many of the people attempting to do 
them are not writers and are not familiar 
with the games." Katz, a professional writ- 
er and editor for 12 years, and Kunkle, a 
writer on pop subjects for six years, took 
four months to research and write their 
book. "We didn't want to do a quickie 
book," Katz said. "We took our time. We 
researched thoroughly even though we 



played every game hundreds of times. I 
must say the people at Dell understood 
right from the first the difference between 
a quick book and a good book." 

Asked why he and Kunkle aimed their 
books at Atari, Katz observed: "Most of 
the books that have come out have con- 
centrated on the coin-ops. While we think 
the commercial arcades are very impor- 
tant, they're hardly the whole story. There 
are now approximately 6,000 American 
households with Atari systems and we 
felt it was a better idea— ratherthan being 
the 10th coin-op book— to be the first 
book to really treat a major home system." 

He said he prefers home games to ar- 
cade games: "I like to stretch out and take 
my time and play without a lot of distrac- 
tions, at least the kind you get in an ar- 
cade. At home, no one is standing in line 
behind you. I enjoy the arcades. I'm not 
knocking them. But I enjoy being able to 
sit there and play and play and play with- 
out worrying about monopolizing the 
machine." 

Asked what game systems he owned, 
Katz responded, "You name it." He also 
owns several microcomputers including a 
TRS-80 Color Computer, although he 
doesn't consider TRS-80s very good game 
computers. 

Author Ken Uston also owns a 
squadron of microcomputers and 
game machines. After his Mastering Pac 
Man became a runaway best seller his 
publisher, New American Library, asked 
him to do a book on video games. The re- 
sult was Score: How to Beat the Top Video 
Games, which climbed onto the Walden 



and Dalton chains of book stores bestsel- 
ler lists within three weeks after release. 

His publisher didn't want the former dir- 
ector of operations research for the South- 
ern New England Telephone Company to 
stop there. It asked him to write a book on 
home video games. He bought five game 
units including Atari, Intellivision and 
Odyssey, and the 181 games made for 
them. "It must have cost me 10 grand to 
buy all that stuff," he said. 

Prior to his video game work, Uston, a 
Harvard Business School graduate and 
former vice president of a San Francisco 
stock company, wrote three books on 
blackjack. He's what's known as a "count- 
er." His methods once won him $27,000 in 
45 minutes. They've also got him banned 
from playing blackjack in many casinos 
all over the world. And they've enabled 
him to retire at 37 years old. 

"I've always been interested in video 
games," he said. "I started playing the or- 
iginal Breakout and Odyssey back in '78. 1 
bought a Space Invaders for my house in 
Newport Beach in 1979. I still have the 
damn thing. It cost me $3,000. 1 became to- 
tally hooked on it. My roommates and I 
used to play it three or four hours a day." 

He also became hooked on Pac Man 
last May while playing the game in a bar. 
"I began to do all this research," he noted, 
"not to write a book, but because I was in- 
terested in the game. I probably played 
2,000 games, probably put $500 in the ma- 
chine. I began making diagrams and final- 
ly I got the key to the game which is how to 
solve the ninth key, which means you can 

continued 
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Give Your TRS-8Q* 

a Tremendous Boost with 

RACET computes Software 

RACET computes Utility Software makes the TRS faster, more efficient, 

and easier to use. Our programming aids improve your productivity. 

Our reputation is for products that are professional in design 

and work as advertised!!! 



FIELD PROVEN 
Vh to 30 MEGABYTES On Line for the TRS-80* Model II 

Now you can use RACET's HSDS with the ARM Winchester Disk Drive on the Model II. This cost effective combination provides 15 Megabytes per drive including 

ECC Error Correction Code and an advanced sequencer to further ensure data integrity. An incremental backup to floppy is provided so that only those sectors that 

were changed from the last backup are saved. A full monthly service contract is available at $30 per month per drive. 

The Hard/Soft Disk System (HSDS) Software has more than One Year's FIELD Experience. The latest HSDS version adds several enhancements including 

maintenance of system files on the hard drive, files as large as the disk, the ability to segment the disk as logical drives, definable directory size, and many utilities 

including bulk copies between floppy and hard drives, multiple purge, Superzap, and Directory Catalog System. Full program compatibility with TRSDOS 2.0a is 

maintained. Mixed floppy and hard drive operation is supported. 

HSDS is available for the Cameo, Cynthia Bull. Corvus Data Peripherals, and Santa Clara Systems hard disk systems as well as the ARM Winchester Drive. 

ARM 15 Megabyte Drive Subsystem 53895 • HSDS Software $400 • Cameo 5/5 Cartridge Drive Subsystem $5995 • Cynthia Bull 10/10 Drive Subsystem $7995 

NEW PRODUCT • MODEL II FAST BACKUP UTILITY • $75 

5 to 10 times faster backups!!! Full disk backup (including verify) 55 seconds!!! on two drive system — 2:15 on single drive system. In business, time is money, 
and one BACKUP is worth 1 000 tears! ! 

NEW PRODUCT • INTEGRATED BUSINESS SYSTEM • 

ISAM File Structure — ■ Multi-Company Capability. Modular structure. Each module includes complete user documentation which guides the user through 

installation and allows "practice" using a sample data base. When ready, the user simply names his data base and begins. 

The Integrated Business System program set includes General Ledger, Accounts Receivable. Accounts Payable, Payroll, Inventory, General Journal, Asset 

Management and more, 

Features include: 

• Multiple data base capability 'i'^Sh, '*#:<••:•; 

• ISAM file structure 

• 500 multi-purpose forms withorder. ". 

• Menu driven •/•.''-.. -'.- : [■:'• ■ ■''' ■-'■' :--'.: .:■':. 

• Complete end-of-period processing 

• Easy to follow installation procedures 
Business Programs $250/module Mod III, $300/module Mod II, $795 for all four Mod 
available now. Accounts Payable and Payroll 1st Quarter 1982. 



Multi-company 

Rapid response and fast operation 
No need to have preprinted forms 
User friendly data entry screens 
80- and 132-column printers 
Automated clerical error detection 
$995 for all four Mod II 



General Ledger and Accounts Receivable 



RACET computes UTILITIES and PROGRAMMER AIDS 



Remodel + Proload for Mod I and III $35 Renumber utility with partial renumbers, text moves plus tape merge, A must for tape based systems. Generalized 
Subroutine Facilities (GSF) Mod I $25, Mod III $30, Mod II $50 The STANDARD against which all other sorts are compared! And then compare price!!! Multi-key 
multi-variable and multi-key character string sorts. Includes zero and move arrays and sample programs. DISCAT Diskette Cataloging System Mod I and Mod III 
$50 This comprehensive Diskette Cataloguing/Indexing utility allows the user to keep track of thousands of programs in a categorized library. Machine language 
program works with TRSDOS and NEWDOS versions (please specify). Files include program names and extensions, program length, diskette 
numbers. COMPROC Command Processor Mod I and Mod III $30 Auto your disk to perform any sequence of instructions that you can give from the keyboard!! 
Ideal for setting up dedicated applications. Infinite BASIC Mod I $50, Mod III $60 Extends Level II BASIC with complete Matrix Functions and 50 more string 
functions. Includes RACET in-memory sorts!! Select only those functions you want to optimize memory. Infinite BUSINESS (Requires Infinite BASIC) Mod I and 
III $30 Complete printer pagination controls, hash codes, binary array search, and packed decimal arithmetic (127-digit accuracy). Disk Sort/Merge (DSM) 
Mod I $75, Mod III $90, Mod II $150 All machine language stand-alone Random file sort package. Establish sort specification in a simple BASIC command file. 
Sorts multiple-diskette files. Only operator action is to switch diskettes when instructed. Super fast sort times — improved disk I/O makes this the fastest Disk 
Sort/Merge available. KFS-80 Keyed File System Mod I and III $100, Mod II $175 Machine language BASIC ISAM utility provides keyed and sequential access 
to multiple files. Simple interface to BASIC. Binary tree index system provides rapid access to records. Utility Package Mod II $150 Recover blown diskettes. 
••-: udes Superzap. bulk copies, and other utilities for repair ;:' blown d skettes Complete documentation on diskette structure and guidance for repair. Other 
ut i es nclude Dynan i DEBUG (with single itep, trace, subroutine calling program looping and more), XCR, DISKID, Directory Catalog System, XPURGE. 
Development Package Mod II $125 Includes RACET Superzap. Apparat Disassembler and Model II interface to Microsoft's Editor Assembler Plus'. Purchase 
price includes complete copy of Fditor Assembler + documentation for Mod I and uploading service. Assemble directly into memory, MACRO facility, save all or 
portions of source to disk, extended editor commands. Basic Cross Reference Utility Mod II $50 SEEK and FIND functions for variable, line numbers, strings, 
keywords. 'All' options available for line number and variables. Load from BASIC — call with control 'R'. Output to screen or printer. Maillist Mod I and III $75, 
Mod II $150 ISAM-based maillist. Four keys — no separate sorting. Supports 9-digit ZIP code and up to 30 attributes. 



CHECK. VISA. M/C.C.O D . PURCHASE ORDER 
TELEPHONE ORDERS ACCEPTED (714) 997-4950 

CIRCLE READER REQUEST FOR FREE CATALOG 
•TRS-80 IS A TRADEMARK OF TANDY CORPORATION 



RACET COMPUTES 

1330 N. GLASSELL, SUITE M, ORANGE, CA 92667 
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play the game from now until August if 
you want. 

"Then someone said to me, 'Kenny, Pac 
Man is really big,' and they showed me the 
best seller list and Rubic's Cube was on 
there. Well, I said to myself, what the hell? 
So I sat down and wrote the damn book in 
four days and came out with a $20,000 ad- 
vance. It was just a total fluke. 

"I'm a very fast writer and I'm very in- 
tense," Uston explained. "When I wrote 
the video games book, I just closeted my- 
self for six weeks. I totally immerse myself 
in the subject. I find I do a far more thor- 
ough job that way. That's how I do it. I 
work seven days a week, 16 to 17 hours 
a day. 

"I have not done any of my books on a 
word processor," he added. "To date, I 
have done them strictly by using dozens 
of bottles of Liquid Paper." 

However, his next book— Ken Uston's 
Guide to Home Computers— will be writ- 
ten on word processors for the 10 or 12 
popular computers he's bought to re- 
search the book. 

Six people worked on Consumer 
Guide magazine's How to Win at Pac 
Man, according to managing editor Mat- 
thew White. He said the magazine's staff 
got interested in doing the book because 
they were having a lot of fun playing the 
game outside of work. 

Although the legwork for the book was 
done over a period of five months, he ex- 
plained, the "mechanics" of writing the 
piece published by Pocket Books took one 
month. 

White, who has been interested in video 
games since Space Invaders but wasn't 
fanatical about them until Pac Man, said 
about the book: 

"We were trying to come up with a sin- 
gle pattern method that would be simple. 
But the problems we were having with a 
single pattern was you always had to 
make exceptions here and there de- 
pending on what screen you were playing. 
So instead of doing one single pattern 
through the whole thing, we gave three 
really nice patterns that would work on 
the two different types of machines." 

Patterns, tips, esoterica— that's 
what the authors of these video game 
books say they're offering their readers. 

"This book can offer readers a hell of a 
lot," White said. "It's a way to approach 
the game right at the beginning. When 
this book came out, it was surprising how 
many people didn't know you could play 
patterns with the machine." 



Attorney Kubey said the books offer 
players a better way to learn the games 
than through trial and error: "Learning 
through trial and error is a useful way, but 
a much more efficient way is to learn from 
the trial and errors of others, from the criti- 
cal analysis of others, and from the pro- 
grammers of the games. 

"I have also picked up strategies that 
are unlikely to be figured out by anyone 
himself," he added. "My hottest tip is the 
best player of Defender I've ever heard of 
starts the game by annihilating nine of 
his own 10 guys. This is not the kind of 
stuff you're going to come up with your- 
self because on its face it seems illogical. 
It's like telling someone to start baseball 
by striking out or running to third base." 

"The games are fun on their own hook," 
editor Katz observed, "but obviously it's 
more fun if you play better. We've tested 
our hints on some pretty veteran players 
and they all seem to do better after they 
read the articles." 

Uston the gambler said: "The books 
allow people to learn how to play the 
game much, much quicker. They're able to 
get more fun out of the games because 
they know certain secrets. Most people 
don't have the patience or the quarters to 
work these things out." 

"No one putting out a video game book 
is offering a solution," columnist Blan- 
chet contended. "They're only offering a 
better way. That's the American way. Peo- 
ple get frustrated and they want to know 
the answer." 

If there's a way to raise the hackles of a 
video games writer, it's mentioning the 
growing controversy over government reg- 
ulation of who plays in the arcades. 

"It's getting a lot of attention because 
it's making money and it's all over the 
place." Blanchet said. "It's something 
physical. How many parents are going to 
band together and say, let's drive drugs 
from our town. They just can't do it. Video 
games are something concrete. They're 
something they can fight legally. I think 
it's just a scapegoat." 

He added: "There is always something 
the older generation would call worthless 
activity that kids engage in. If you think 
back to the 50s and 60s, it was Elvis 
Presley. Elvis Presley was going to be the 
downfall of American youth. I'm sure if 
parents could, they would have outlawed 
him. They would have banned him from 
the United States." 

Kubey sees parents' efforts to control 
the playing of arcade games as "well-in- 
tentioned but misguided." He observed, 
"People should understand that video 
games are not against the public interest 



but in the public interest. 

"They're a great break," he continued. 
"Most people on their jobs or at school 
have only a short time to take a break from 
whatever is grinding them down in life. 
They have maybe 10 or 15 minutes. If they 
could rocket to Yosemite and commune 
with nature, they would, but they can't. In 
10 or 15 minutes, you can get away from it 
all by playing video." 

Katz maintained most arcade owners 
try to be a positive force in the community. 
He added: "The very, very small number of 
people who are vocally damning elec- 
tronic gaming are the type of people that 
would be up in arms about any new deve- 
lopment, with anything that's a little un- 
usual that they aren't experienced with. 
There's always people that will react to 
any innovation in such a way it seems 
they feel personally threatened. Not only 
do they want to avoid the games, they 
want everyone else to avoid them, too." 

"We feel," he aoded, "and many psychi- 
atrists agree, that home games are a force 
to keep the family together because they 
provide something everyone can enjoy." 

Uston said in arcades, as in anything 
else, there's good and bad: "I've played in 
some arcades in Manhattan that I 
wouldn't want to go in myself, let alone let 
kids in there. They're just full of people 
who look like pimps and hookers and drug 
-dealers. On the other hand, I was in one in 
Minneapolis that was great — no drink- 
ing, no swearing, no food. It was real 
clean, nice and wholesome." 

He noted arcade games could be detri- 
mental to youngsters: "If they get ad- 
dicted to them and they start spending 
money on them they can't afford or start 
getting into gambling, it could be very bad 
for them. 

"I've got a lot of money, so if I put 500 
bucks into a machine, it's not going to 
hurt me. Some of these kids put $20 in a 
machine. . .that might be their school 
lunch money for a month. 

"I don't see anything bad for me except 
the little knob on my finger from playing 
Pac Man." 

He said the games are outlawed in the 
Philippines. "The president down there," 
he explained, "feels that kids get ad- 
dicted, and it's really bad, kids stealing 
money from their mother's purse to play 
the games." 

But it was White that pointed out what 
may be the real value of the games and 
books in the long run: "They're what's get- 
ting kids and even adults involved in com- 
puters. They stop the imposing aspects of 
computers. They take out some of the 
mystery. And they show how easy these 
things are to use."B 
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S-80--WHY BUY DIRECT? 



Buying a GENUINE TRS-80 direct, literally, means buying from 
the Tandy Warehouses in Fort Worth. For the end user this is not 
possible. However, the closer a retailer is located to the source 
the lower his cost per unit and the closer his buyer can come to 
"almost" buying direct. WE ARE CLOSER so WE SELL LOWER. 
It only takes a FREE phone call to verify this FACT. 

WARRANTY : 

ONLY A GENUINE TRS-80 purchased 
from an Authorized-Outlet can have 
the Radio Shack Warranty. 
BUYER BEWARE OF IMITATIONS. 







SAVE SALES TAX* 
PLUS DISCOUNT 

•TEXAS RESIDENTS ADD ONLY A ':. 



"WE ARE CLOSER" 



FORT WORTH COMPUTERS 



IN TEXAS CALL 817-573-4111 

TOLL FREE ORDER NUMBER: 1 -800 ■ 433 -S-A-V-E 



TM: TRADE MARK OF THE TANDY CORPORATION 



377 PLAZA GRANBURY • FORT WORTH • TEXAS 76048 
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CONVERT YOUR TRS-80 MODEL-I OR III INTO A 

DEVELOPMENT 



SYSTEM 




Now you can develop Z-80 based, 
stand-alone devices such as games, 
robots, instruments and peripheral 
controllers, by using your TRS-80 as a 
development system. The DEVELOP- 
MATE plugs into the expansion con- 
nector of your TRS-80 and adds 
PROM PROGRAMMING and IN- 
CIRCUIT-EMULATION capabilities to 
your system (with or without expan- 
sion interface). 



Complete instructions and sample 
schematics are included to help you 
design your own simple stand-alone 
microcomputer systems. THESE 
SYSTEMS CAN BE AS SIMPLE AS 
FOUR ICs: one TTL circuit for clock 
and reset, a Z-80, an EPROM, and one 
peripheral interface chip. 

When the Ih-Circuit-Emulation 
cable is plugged into the Z-80 socket 
of your stand-alone system, the sys- 
tem becomes a part of your TRS-80: 
You can use the full power of your 
editor/assembler's debug and trace 
program to check out both the hard- 
ware and the software. Simple test 
loops can be used to check out the 
hardware, then the system program 
can be run to debug the logic of your 
stand-alone device. 

Since the program is kept in TRS-80 
RAM, changes can be made quickly 
and easily. When your stand-alone 
device works as desired, you use the 
Developmate's PROM PROGRAMMER 
to copy the program into a PROM. 
With this PROM, and a Z-80 in place of 
the emulation cable, your stand-alone 
device will work by itself. 



The DEVELOPMATE is extremely 
compact Bo!h the PROM programmer 
and the In-Circuit-Emulator are in one 
small plastic box only 3.2" x 5.4". A 
line-plug mounted power supply is 
included. The PROM programmer has 
a "personality module" which defines 
the voltages and connections of the 
PROM so that future devices can be 
accommodated However, the system 
comes with a "universal" personality 
module which handles 2758, 2508 (8K), 
2716. 2516 (16K), 2532 (32K). as well 
as the new electrically alterable 2816 
and 48016 (16K EEPROMs). 

The ' COMPLETE DEVELOPMATE 
81. for Model I, with software, power 
supply, emulation cable, TRS-80 
cable, and "universal" personality 
module $329 

DEVELOPMATE 83. Model III version, 
same as above $329 

PM2 PERSONALITY MODULE for 
2732A EPROM $15 

PM3 PERSONALITY MODULE fo'r 
2764 EPROM $15 

ORION 

INSTRUMENTS 

172 Otis Avenue, Dept. M, Woodside, 
CA 94062 
(415) 851-1172 ^ 151 

Master Charge and VisiL.phone orders accepted 
California residents please add 6' % sales tax 
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Hardware costs 
will dip in '82 



A new wave of competition in the small- 
business computer market will exert 
severe pressure to reduce the cost of 
hardware, predicted Abraham Ostrovsky, 
vice president of the Savin Corporation. 

In a statement, Ostrovsky maintained 
that IBM's growing involvement in the 
market and the expected entry of the 
Japanese will exert strong pressure to cut 
prices. 

Only suppliers with very large volumes 
will be able to remain competitive, the 
Savin executive contended, so it becomes 
more advantageous for all but the very 
largest to purchase the hardware rather 
than manufacture it. 

He noted that of the 150 or 200 
companies now marketing computer 
systems to small businesses, "A majority 
are manufacturing their own equipment. 
Those that can't get volumes high enough 
to compete with the likes of IBM and the 
Japanese are going to be caught in a 
serious crunch before the middle of this 
decade." 



Last hurrah 
for mainframes 

Like a politician who's lost his 
handshake, mainframes will be seeing 
their "last hurrah" by 1990. 

That's the contention of Datamation 
magazine. "Large mainframes," the 
magazine said in a statement, "will be 
pushed aside by microcomputers with 
expanded memory capacity." 

It maintained that in eight years 
mainframes will have become "a mere 
bit player on the data processing 
scene," 



Hardware degree 

A college degree emphasizing computer 
hardware will be offered by the 
Wentworth Institute of Technology in 
Boston. With the start of the program 
this fall, Wentworth becomes one of the 
few college-level technical schools in the 
nation to offer a two-year-degree, 
hardware-oriented curriculum. 
Students completing the curriculum 




Students seeking a college degree in hardware at the Wentworth Institute of Technol- 
ogy will be often seeing the inside of this building, Beatty Hall, the location of the 
school's computer center. 



will be awarded an Associate in 
Engineering degree. Courses in the 
program include: electric circuit theory, 
electronic drafting, digital electronics, 
computer science, Assembly language 
and microprogramming, electronic shop, 
introduction to microcomputers, 
microcomputer systems, solid state 
devices and applications, computer 
laboratory, measurements and 
instrumentation, data 
communications, computer 
architecture, operating systems, and 
programming applications. 

Making the office 
of the future a reality 

If the office of the future is to become a 
reality, software must be easily altered 
by users, according to Seymour 
Rubinstein, president of Micropro 
International Corporation. 

Speaking at a word-processing 
conference held in Florida late last year, 
Rubenstein noted "canned" software 
will never satisfy all the needs of the 
many large and small businesses buying 
small computers. 

He observed: "Even if a product 
seems satisfactory at first, the good 



feeling will vanish as users realize there 
are many things it can't accomplish. The 
only answer is to integrate the entire 
office environment— not just combining 
words and numbers in one program, but 
by taking the unified approach with a 
family of programs." 

Only the experienced 



The job market for entry-level 
programmers appears to be tightening 
up, according to the Boston Globe. 

The newspaper said there are reports 
of fewer job openings for this year's 
college graduates holding degrees in 
computer science. 

The hardest hit, it noted, will be the 
scores of adults switching careers into 
data processing. Many companies have 
implemented hiring freezes on entry-level 
positions. One career counselor told the 
Globe he is beginning to see a potential 
oversupply of programmers looking for 
first jobs. 

Entry-level people, the journal noted, 
won't be the only ones feeling the job 
pinch. New graduates with Masters of 
Business Administration degrees and 
mid- and upper-level data-processing 



400 • 80 Microcomputing, June/July 1982 



managers in the $40,000 salary range are 
also finding fewer openings. 

The counselor added, "The market is 
strongest for people with two-to-four 
years' experience in Fortran, Assembler 
and Cobol, who have design capabilities 
and who have worked extensively in 
applications processing." 



Reaching the 
peak in the v« 



When it comes to business, nothing is a 
sure thing. But the closest thing to it can 
be found in the Silicon Valley, a 30-mile 
strip of industry at the base of San 
Francisco Bay. 

The New York Times reported a 
20-year study of business start-ups 
conducted by the University of Santa Clara 
shows starting a high-technology 
company in the valley may be as near 
a sure thing as the free market system 
can achieve. 

Valley companies, the newspaper 
said, are so successful because of the 
complex network of universities, support 
companies, consultants, scientists, 
managers and investors the area has 
developed over the last 30 years to 
cradle new companies until they are 
ready to stand on their own. 

According to the study, the average 
manufacturing company stands a 75 
percent chance of surviving its first two 
years in business, but in the valley, 
companies stand a 95 percent chance of 



surviving their first six years. 



The flying boxcar of personal computers 
has been released by the 
Hewlett-Packard Company. Some 
observers contend the Palo Alto, CA, 
firm is releasing a biplane in the jet age. 

Called the HP-87, this new micro- 
computer has the largest memory 
capacity of any personal computer on 
the market today. Although the base 
model has 32K RAM, the micro can be 
upgraded to 544K. Its closest competi- 
tion in the memory department is the 
TRS-80 16, which can be upgraded to 
512K. 

However, the new micro has an eight- 
bit microprocessor, a dubious feature, 
according to its critics, in light of the 
new generation of personal micros with 
16- and 32-bit microprocessors. 

The move by Hewlett-Packard appears 
to have surprised at least one executive 
at Radio Shack. Jon Shirley, vice 
president for merchandising at Tandy, 
when asked about the HP-87 was quoted 
in The Wall Street Journal as saying: 
"I'm surprised. An eight-bit machine 
becomes an inefficient machine as it 
addresses larger and larger memory." 

But another analyst quoted by the 
newspaper maintained the added speed 
in the Tandy and IBM computers is not 
an advantage yet because most 
software on the market is written for 



eight-bit machines. 

According to the Journal, Hewlett- 
Packard is positioning its new micro to 
compete with the Apple III and IBM 
Personal Computer. Prices for the HP-87 
range from $3,995 for 32K and one disk 
drive to $7,995 for 544K and two drives. 
An Apple III with 128K and a monitor 
sells for about $3,800; a TRS-80 16 with 
128K and a disk drive for $4,999. 

The Journal also said Hewlett-Packard 
is expected to have Computerland stores 
stock and sell the HP-87. 

For $495, a plug-in CP/M module can 
be bought for the HP-87, allowing it to 
use some 3,000 programs. 

It also has a built-in, nine-inch 
monitor— better than the HP-85 released 
last year but smaller than the Apple's. 

The HP-85 generated $130 million in 
revenue for Hewlett-Packard last year. 

Increased memory in the new HP 
micro allows it to tackle a variety of 
complex scientific problems, including 
financial forecasting with as many as 
200 line items, or linear programming by 
engineers, physicists, or chemists 
incorporating as many as 80 
simultaneous equations and 200 
variables, the Journal reported. 



Atari hustles Coleco 
out of Centuri pact 

When you're number one and you're 

continued 
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Atari you never stop trying harder. 
Coleco Industries Inc. found that out the 
hard way. 

For more than three months, 
Coleco— with an eye toward cutting into 
Atari's 75 percent stake in the $1.2 
billion video game market— has been 
flashing a new video game player and 
boasting about having exclusive rights 
to sell arcade games by Centuri Inc., 
producers of Phoenix, Challenger and 
Vanguard. 

But, according to The Wall Street 
Journal, Coleco never had a contract 
with the arcade game concern, so 
Coleco executives were red faced when 
Atari announced it had signed a four- 
year agreement with Centuri for 
exclusive rights to its existing games 
and any games it develops in the future. 

The Journal reported the Atari-Centuri 
agreement took many Wall Street 
analysts by surprise. At the New York 
Stock Exchange on the day of the Atari- 
Centuri announcement, stock of Warner 
Communications, Atari's parent 
company, closed at $60,125 a share, up 
37.5 cents. Coleco Industries closed at 
$9,875, down 62.5 cents. 

Since the Consumer Electronics Show 
in Las Vegas in January, Coleco had 
been exhibiting a new game machine to 
compete with Atari and Mattel. As part 
of its presentation, Coleco showed 
sample cartridges with Centuri's games. 
It was showing the cartridges, the 
Journal reported, at the Toy Fair in New 
York City on the day Atari and Centuri 
announced their deal. 



Pocket socket lets you 
plug into information 

A pocket-sized microcomputer allowing 
easy access to larger computers via the 
telephone has been developed by a 
Cambridge, MA, couple known for 
inventing the electronic game Merlin. 

Robert O. and Holly Thomis Doyle's 
7.25 by 3.25 inch Telecomputer has been 
hailed as the most user-friendly device 
of its kind to date, according to a report 
in The Wall Street Journal. 

Except for a code word to turn it on, 
the Telecomputer requires no special 
knowledge to use. The system prompts a 
user through a sequence of instructions 




Telecomputer: the data equivalent to the telephone. 



in plain English. If the operator gets 
stuck, there are keys like "Don't Know," 
"Help," and "Go Back." 

Most users accessing data in larger 
computers have to work through a six or 
eight step "log on" process before they 
begin receiving information. The Doyle's 
device stores those procedures in 
memory. Once the user establishes his 
identity via a code number, 
Telecomputer handles the entire 
connection operation. 

Robert Doyle, 45, who has a Ph.D. in 
astrophysics from Harvard University, 
told the Boston Globe he and his wife 
see their micro as the data equivalent of 
the telephone. 

The Telecomputer — which has a 
16-character single line display and tiny 
typewriter keyboard — plugs directly into 
a modular wall plug for a telephone. The 
energy to run the system comes from 
the telephone connection, although the 
power to turn it on comes from a 
PolaPulse battery, the same type used in 
Polaroid cameras. Unlike other terminal 
devices, the Doyle's micro does not need 
an acoustic coupler. It also has a built-in 
modem. 

For phones without a modular plug, a 
device to clamp onto the handset is 
available. The Doyle's company— IXO 
Industries Inc. of Culver City, CA— told 



the Journal it also expects to market a 
printer and RF modulator to enable 
Telecomputer to use a tv as a display 
device. 

According to the Globe, IXO is being 
capitalized at close to $8 million by the 
Doyles, founder of IXO Jeffrey Rochlis 
and Boston and New York venture 
capitalists like Ampersand Inc., the 
Palmer Organization, and New Court 
Securities, and corporate investors like 
General Instrument Corp. and Control 
Data. 

The Globe added this year the Doyles 
expect to sell 40,000 of the devices, 
which will be manufactured in Hong 
Kong and Taiwan. 



Not in the 
computer but in jail 

A woman in Seattle, WA, spent 46 days 
in jail without a hearing because 
authorities failed to enter her name in a 
court computer system. 

According to an Associated Press 
report, Catherine Elizabeth Parrett, 33, 
described as being mentally ill, was 

continued 
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ONVERT YOUR SERIAL PRINTER TO PARALL 



NEW MODEL UPI-3 SERIAL PRINTER INTERFACE MAKES IT 
POSSIBLE TO CONNECT AN ASCII SERIAL PRINTER TO THE 
PARALLEL PRINTER PORT ON THE TRS-80. 

Software compatibility problems are totally eliminated because 
the TRS-80 "THINKS" that it has a parallel printer attached. 
NO MACHINE LANGUAGE DRIVER NEEDS TO BE LOADED 
INTO HIGH MEMORY BECAUSE THE DRIVER ROUTINE FOR 
THE UPI-3 IS ALREADY IN THE TRS80 ROM! SCRIPSIT. PENCIL, 
RSM 2, ST80D, NEWD.OS, FORTRAN, BASIC etc. all work as it a 
parallel printer was in use. 

The UPI-3 is completely self contained and ready to use. A 34 
conductor edge card connector plugs onto the parallel printer 
port of the model I Expansion Interface or onto the parallel 
printer port on the TRS-80 III. A DB25 socket mates with the 
cable from your serial printer. The UPI-3 converts the parallel 
output of the TRS-80 printer port into serial data in both the 
RS232-C and 20 MA. loop formats. 



bd 



SPEEDWAY ELECTRONICS 

Division ol Binary Devices 

11560 TIMBERLAKE LANE 
NOBLESVILLE, IN 46060 
(317)842-5020 

TRS 80 is a trademark ol Tandy • 



,- 106 



VISA MasterCard 




Switch selectable options include: 

• Linefeed afte r Carriage Return 

• Handshake polarity (RS232-C) 

• Nulls cii'or Carriage Return 

• 7 or 8 Data Bits per word 

• 1 or 2 Stop Bits per Word 

• Parity or No parity 

• ODD or EVEN Parity 

UPI-2 for TRS80 Model II 
UPI-3 for TRS8G Model I or 3 
UPI-4 for use with Model 1 and RS Printer 
Interface Cable (no expansion interface required 
Manual only (may be applied to order) 
Ten day return privilege — 90 day warranty 
Shipping and Handling on all orders 
Specify BAUD rate 50^9600 BAUD 



NOW 

AVAILABLE 
FOR 
MODEL II 



$149.95 
$149.95 

$159.95 
$ 5.00 

$ 4.00 




HIPP 



UiidfiMJillD f Em- 



48K,2TANDON 
DISK DRIVES 



(No. RS 232) Instruction Manuals 



Includes DiskController, 
Power Supply, Mounting 
Hardware, Cables and 



RS232 

Instructions 
Included 



$1750 



PRINTE 




iin.refi.mmii 




TANDON DISK DRIVES 



MX80 $425 

MX80F/T 510 

MX100 675 

C. ITOHCOMETI 290 

Printer Cable $26.95 

($20 w/purchase of printer) 



TM 100-1 Single 40 Track Drive 

$210 

TM 1 00? Double 40 Track Drive 
$330 

TM 100-3 Single 80 Track Drive 
$330 

TM 1 00-4 Double 80 Track Drive 
$425 

16K MEMORY KIT $15 

($10 with purchase over $200) 




VISA, MASTERCARD ($100 Mm.) 

Or Certified Check 
90 Day Warranty (Parts & Labor) 

TRS 80 is a Registered Trademark, Tandy Corp. 

Prices Subiect to Change Without Notice 



D ATA— M Al 

P.O. Box81 8. Reseda. CA91 335 

• 265 



FREE SHIPPING IN CONTINENTAL U.S. 
(TRS 80 MOD III EXCEPTED) 

(213) 886-5302 



p'See List of Advertisers on page 386 
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arrested for allegedly shoplifting $50 
worth of cosmetics from a supermarket. 

After the procedural error was 
discovered, the case against Parrett was 
dismissed by Municipal Court Judge 
Stephen R. Schaefer. 

Dynabyte's cutting pieces 

A 23 percent price reduction on its 
Winchester disk-based multi-user 
computer systems has been announced 
by Dynabyte Business Computers of 
Milpitas, CA. 

Dynabyte Vice President of Marketing 
Mike Seashols added in a statement, 
prices on single-user disk-based systems 
have been reduced by as much as 17 
percent. 

Actual reductions, he explained, will 
depend on product configuration, but 
overall the average reduction will be 16 
percent. 

Seashols said an increase in 
manufacturing volume coupled with 
decreases in the price of memory and 
storage media have spurred the price 
cuts. 

In 1980, he noted, users were paying 
$14,000 for a configuration similar to 
Dynabyte's 5710 currently selling for 
$8,995. He went on to observe that a 
year ago Dynabyte was selling a 64K 
memory board for $1,795. Today, that 
board is selling for $595. 

IBM trust case: 
dropped but not ended 

The U.S. Justice Department dropped its 
13-year anti-trust action against 
International Business Machines 
January 8, but controversy continues to 
boil over the case and the computer 
firm's business practices. 

It is believed by business analysts the 
end of the case will hold major 
significance in the computer market for 
years to come. They feel dropping the 
case ensures IBM will continue to 
dominate the market, setting the pace 
for new products and prices. 

Since the federal agency decided to 
drop its anti-trust lawsuit, there have 
been these developments: 

• In testimony before a 
congressional subcommittee, the former 
chief of special litigation in justice 
rapped the agency for dropping the 
case. 



• The presiding judge in the case 
called for an investigation into a 
possible conflict of interest by the 
assistant attorney general responsible 
for terminating the action. 

• The executive commission of the 
European Common Market held hearings 
on alleged monopolistic practices by 
IBM in Europe. 

Lewis Bernstein, who supervised the 
IBM case for more than a decade, told 
members of the House subcommittee on 
monopolies that dropping the action 
violated the public interest. 

Lawyers for IBM contended the case 
lacked merit. William Baxter, the 
assistant attorney general who decided 
to drop the case, told the House panel 
the action rested on shaky factual and 
legal grounds. 

Bernstein explained the government 
maintained IBM smothered competition 
by the subtle timing of new products, 
their pricing and their design. While an 
individual business move might not be 
illegal in itself, he said, a pattern of such 
conduct illustrated an intent to 
monopolize. 

Baxter, a Reagan appointee, was later 
criticized by U.S. District Court Judge 
David N. Edelstein for failing to reveal he 
had represented IBM while practicing 
law in California. The judge called for 
investigations into the matter by 
Congress, the Office of Government 
Ethics and the Justice Department. 
Baxter characterized the legal work he 
did for IBM five years ago as "extremely 
limited" and "essentially irrelevant" to 
his conduct of the government's case. 

Some of the same competitors of IBM 
backing the anti-trust action in the 
United States are involved with a similar 
case before the Common Market's 
executive commission. The commission 
has charged IBM— which did $9.9 billion 
in European business last year — has 
made it impossible for Old World 
customers to use other companies' 
software with IBM computers and 
refused to provide software for non-IBM 
computers. 

According to The Wall Street Journal, 
however, the commission is not 
expected to move swiftly on the case. 
The newspaper said the decision could 
come near the end of this year or the 
beginning of next year. Should the 
commission find IBM guilty, the firm 
could be fined and ordered to alter its 
existing practices. But if IBM appealed 
the commission's decision, the case 
could drag on for another three years. 



Towel, not hat, 
in 256K ring 



Some American semiconductor chip 
manufacturers appear to be conceding 
the 256K dynamic RAM market to the 
Japanese, according to a report in The 
New York Times. 

There is widespread feeling, the Times 
said, that the Japanese will dominate 
the dynamic RAM business in the next 
two decades. 

The newspaper noted U.S. 
manufacturers' dismay is motivated by 
the stunning victory the Japanese have 
won in the 64K RAM market. There 
American companies braced themselves 
to compete with Japan, but that nation's 
manufacturers captured 70 percent of 
the market anyway. 

A tree grows 
in the data base 

Search trees and key words should be 
used when designing ways to access 
data bases. 

In a statement released by the 
Institute for Perception Research and 
Philips Research Laboratories, the 
research groups said many people have 
difficulty getting the information they 
want from a data base. 

"A comparison of the use of a search 
tree with the use of key words shows 
key words lead to the desired goal 
slightly faster, but half the people 
involved in the experiments nevertheless 
preferred to use a search tree," the 
researchers said. 

"This means," they added, "that data 
bases should preferably be accessible 
by both search methods; and these 
should be made as simple as possible." 

The study conducted by the groups 
located in the Netherlands involved male 
and female subjects 21 to 58 years old. 
Occupations varied from scientific 
researcher to waitress. The subjects 
were asked to search for 10 tv programs, 
five with the search tree method and five 
with key words. 

"Many of the subjects," the statement 
said, "could not remember the choices 
they had already made, so that pointless 
repetitions occurred if a program could 
not be found straight away." 

It added: "It was also found that 
subjects often overlooked parts of the 
text on a page. A good page layout is 
therefore very important. "■ 
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TRS-80 MODEL I 

CATALOG 48K, 1 Disk 

Indexes disks and files of any type or 
system. Very fast, 2500 file capacity, 
single and double density. 

$69.50 
EP-GRAPHICS 48K, 1 Disk 

Epson 80 with GRAFTRAX, or 100 
becomes printer/plotter. 512 x 512 or 480 
resolution fills page. Machine language 
major software, call from short BASIC 
program. 

$79.50 



TRS-80 MODELS l/lll 

TUMBLE 48K, 1 Disk 

Control spin, speeds and tilts of moving 
3-D geometric shapes. Real-time, fast 
screen displays teach and entertain. 

$39.50 

GANTT-PACK 48K, 2 Disk 

Projected, elapsed and over-run project 
schedules charted on screen/132 column 
printer. Random entry, automatic organi- 
zation, fast update/edit. Play "what if..." 

$149.50 




LIBRA LABORATORIES 

495 MAIN STREET 

METUCHEN, NEW JERSEY 08840 

(201) 494-2224 ^131 



TRS-80 MODEL II 

STAT-TO-PLOTTER 64K, 1 Disk 

Program merges into R.S. Statistical 
Analysis package. Puts statistical work 
directly to R.S. plotter or other HI-PLOT 
3-7. Publication quality charts. ,£„„ ,-_. 

FILE CARD 64K, 1 Disk 

Look up records by powerful database 
and immediately see/print the text. In- 
finitely long text area for any entry. 
Replaces file card system. <tnoA ^n 

GANTT-PACK 64K, 2 Disk 

Enhanced version, early and late entries, 
expanded capacity. *„„, _„ 

$224.50 



TRS-80 Trademark of Tandy Corporation 
HI-PLOT Trademark of Houston Instruments 
Epson Trademark of Shinshu Seiki Co., Ltd. 
Libra Laboratories' programs copyright 1981, 1982. 




Pilot your tpoc* shuttle through mysterious, 
hostile worlds. Ton skill lovols. 

Blast out of a plasma prison and dock with tho 
mother ship boforo It Is too lato. 

Hordes of allon attack vossois plot to dostory 
tho Earth. 

A largo assortment of fully documented 
machine code subroutines and basic 
programs. 



Buy two or more and 
get 20% off! 

All programs require 16K Ext. Basic or larger. 

UNIVERSAL SOFTWARE 

P.O. Box 718 

K Rosovllle, Ml 4406% ^ 64 A 



96K model 1 

Protect your Investment and enhance 
operation. Replace old 16K RAMS with 
new 64K dynamic RAMS and a BIGMEM 
memory controller. Features Include: 

• 64K keyboard with 48K on power-up 

• plus 2K RAM above ROM 1f desired. 

• Up to 96K with 32K E/I connected, 
t Remaps kybd and video for CP/M* 

• Adds reliability to clock speedup 

• Installs neatly within kybd case. 

• No Increase in power consumption. 

Introductory price $180 complete 

(64K DRAMS, A&T BIGMEM controller, 
internal cable/connector, detailed 
instructions and ppd. shipping). 
NY residents add 7% sales tax. Send 
check or money order to: 

MICR0HATCH 
P.O.Box 501 
DeWItt, N.Y. 13214 

* Trademark of Digital Research ^419 




£HURCM DONATIONS 



Computer Program forTRS 80 Models I, II, & III 



RECORDS, STORES & REPORTS 



Gives printout of collections, totals to date 

as well as individual quarterly reports 

to congregation members. 



For Information, Contact: 



^307 

CUSTOM DATA ^.t^uZ 

505-434-1096 AlamoRoido. NM 88:MO 



DARK CASTLE 
GAME SYSTEM 

for the 
COLOR COMPUTER 



Fully PROGRAMMABLE graphics adventure system 
As weli as solo adventuring, the two player option 
allows one player to become the dungeon's lord and 
direct " s creature: Graph cs show moving .' lews of 
the ev an md the p k kage allows players to create 
and save on tape an unlimited number of dungeons 
three are included 

ALSO 

Sir Eggbert Jumper * 

Invasion of the Termites* 

Alpha Mission* 

Wizard 



cassette-post pd. 
ea. 16K ext. Color Basic 



$12. 95 

"Joysticks. Req 

D. L. Dawson 
4808 Davenport. #2 
Omaha, NE 68132 



^Sferbatim 

flexible disks 

Call Free (800) 235-4137 for 

prices and information. Dealer 
inquiries invited. C.O.D. and 
charge cards accepted. 

VISA- 




PACIFIC 
EXCHANGES 

100 Foothill Blvd. 
San Luis Obispo. CA 
93401. InCal. call 
(800) 592-5935 or 
(805) 543-1037. 

^207 



IBM PC 
IRS-80 • MODEL II 

ADVANCED PRODUCTIVITY SYSTEM 

APS i.s u productivity booster (hut can be 
compared with IBM's SPF system. The 
sophisticated user will settle for nothing less 
Note these features: 

• Menu driven, user friendly general purpose 
architecture 

• Dual screen operation 

• Primary. Line and Function key commands 

• Separate Edit and Browse lubsystems 

• Dynamically adjustable scrolling in all lour 
directions 

• External datasets merge and create 

• Text formatter, similar to IBM's 
SCRIPT/GML formatter, is designed for 
large documents 

• Built-in utilities allow dataset format 
conversions 

All registered users of our products receive full 
maintenance support. For more information 



P.O. BOX 142 
DON Mil 1 S. ONTARIO ^ 
CANADA M3C 2R6 
Registered Trademark ol Tandy Corporati 



19. : > 



■See Lis! ol Advertisers on page 386 
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by Terry Kepner 



"Most programmers use machine 
language for graphics and high speed action." 



Send any questions or problems dealing 
with any area of TRS-80 microcomputers 
to Feedback Loop, 80 Micro, 80 Pine 
Street, Peterborough, NH 03458. 



/am about to convert from cassette to 
a disk drive system for my TRS-80. Can I 
use my tape programs with a disk 
system? 

E.H. 
New Haven, CT 

There are two approaches to using tape 
programs on a disk-based computer sys- 
tem. The first is to ignore disk drives by 
turning on your system in Level II mode. 
This means you will not be able to use 
your disk drives for program and data 
storage. 

The second approach, which lets you 
use tape-based programs with your disk 
drives, is more complex and depends on 
the program you are using. 

Games and simple applications pro- 
grams should be easy to use on a disk sys- 
tem if they are written in Basic. But watch 
out if they have PEEK or POKE com- 
mands. These could complicate, or make 
impossible, running the program in Disk 
Basic. First disable the disk-clock feature, 
then load the programs into Disk Basic us- 
ing the command CLOAD. Once the pro- 
gram is in memory, save it to disk. Pro- 
grams that write and read data on tape 
will require alterations. You will have to 
add CMD'T" before each write or read 
statement. This will allow the programs to 
properly store and read tape data. To get 
the programs to store data on disk re- 
quires rewriting the tape I/O routines into 
disk I/O routines — not an easy task. 

Machine-language programs can be a 
real problem. Many use special loader rou- 
tines to prevent piracy. Some programs 
can be saved on disk using the TRSDOS 
program Tape Disk. Others can be saved 
to disk, but using them will lock-up or re- 
set the computer. It is impossible to pre- 
dict which machine-language programs 
can be put on disk and which ones cannot. 

/ have designed a few good software 
packages. I am sure people would pur- 



chase these packages. Is it a good idea to 
start my own software business? 

G.H. 
Chapel Hill, NC 

That depends upon your goals. If you 
are looking at the business as an addi- 
tional income and your packages are fair- 
ly inexpensive to produce (that is, they will 
not cost you an arm and a leg to pay for 
the initial production run of the documen- 
tation and disks or cassettes) then you 
might be able to start a company. I know 
of two software companies that started 
with less than $400 and are now each pull- 
ing over $10,000 a year. If you mean as a 
full-time business, then you should talk 
with financial experts who understand 
mail order businesses and the problems 
of getting started and staying in business. 

For more information on the computer 
software market and how to break into it, I 
suggest you read these three books: 

How to Sell Microcomputer Software 

$18.50 

The 1982 Software Writer's Market 

$28.50 

Free-Lance Software Marketing 

$30 

All are available from Kern Publications, 
P.O. Box 1029, Duxbury, MA 02332, (617) 
934-0445. 

Where can I buy used equipment? 

P.T. 
Chicago, IL 

There are several places to check. One 
is the local Want-Ads book. These are dis- 
tributed and sold in many states. In the 
Massachusetts booklet, which is printed 
monthly, there are 15-20 ads per month on 
used TRS-80's, Apples, PETs and other 
computers. Look under the headings for 
computers and office equipment. 

Another source, if you live near a big 
city, is the classified ads section of the 
Sunday paper. 

If you know of any local computer 
clubs, attend their meetings and ask 
around. Someone there might want to up- 
grade to a larger machine, or know some- 



one who wants to sell his computer. 

Some computer magazines have a 
classified ad section for their readers. 
There are even publications that specialize 
in used hardware. They are: 

Computer Hotline— Box 1373, Ft. 

Dodge, IA 50501 

Computer Shopper— P.O. Box F, 

Titusville, FL 32780 

Computer Trader— 1704 Sam Drive, 

Birmingham, AL 35235 

Every time I key a long program into my 
computer the power fails and there goes 
all my work. Is there any way to prevent 
program loss if power fails? 

B.L. 
Hollywood, FL 

Yes, but how much it will cost you is de- 
termined by how you define "power fail- 
ure." If you mean the computer itself loses 
power, take it to a repair shop immediate- 
ly. If you mean every time the furnace 
motor turns on there is a short brown-out 
(the lights dim, but do not go out), you 
need surge protection. They cost any- 
where from $50 to several hundred dollars 
(the cost is linked to the quality and power 
rating of the device). Radio Shack sells a 
small plug-in powerstrip for $49. Many 
companies manufacture these devices; 
some are 80 Micro advertisers. 

If you mean the power goes off com- 
pletely (the building lights actually go out, 
leaving you in the dark), you need a battery 
backup power supply. They start at sever- 
al hundred dollars and go uptoathousand. 

For more information contact: 

Sun Research Inc., Box 210, Old Bay Rd., 

New Durham, NH 03855 (603) 859-7110 
Goulde Inc., P.O. Box 43140, St. Paul, MN 
55164 (612) 452-1500 or (612) 681-5450. 
Of course, the simplest and cheapest 
way to keep from losing your entire pro- 
gram is to save it frequently. Then when 
the power goes and your program vanish- 
es, you will have a backup copy. Your only 
loss will be the work done since the last 
backup save. 

/ decided to try designing my own com- 
puter game. After hours of programming I 
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was ready to play my first game — what a 
disappointment! It just did not have the 
impact of those purchased off the shelf. 
What happened? Is the TRS-80 incapable 
of such things? 

P.W. 
Boise, ID 

I am not exactly sure what you mean 
by "off the shelf." If you are comparing 
your TRS-80 with the games made for 
the Atari Game Machines, I ntel livision or 
any of the other color graphic games, 
then no, the TRS-80 cannot compete 
with them (except the Color Computer). 
If you mean the computer games made 
for the TRS-80, I don't understand your 
question. If the games you find impres- 
sive can be purchased off the shelf for 
your computer, then of course the com- 
puter is capable of being impressive. 

Because of the design of the Models I, II 
and III, you cannot have fine-line or color 
graphics on them without hardware modi- 
fications. But, with creative programming 
practices, you can achieve some very nice 
graphic effects. Few programmers have 
mastered the methods used by Leo Chris- 
topherson in his programs Dancing De- 
mon and Voyage of the Valkyrie. Both 
are masterpieces of animation, the likes 
of which I have not seen matched on any 
other computer system. Most program- 
mers use machine language for graphics 
and high speed action; bypassing Basic 
and its speed killing line-by-line interpreter. 

The Color Computer is capable of 
matching the other color graphics com- 
puters in fine detail and color, but requires 
programming skill to do so. I have seen a 
finely written Basic program on the Color 
Computer outperform a poorly written ma- 
chine-language program. 

What happened to the Model I? All of a 
sudden they're not selling it. And does 
that mean Radio Shack will not service 
the one I have? Will a day come when I 
cannot buy programs and peripherals 
for my Model I? 

D.T. 
New Caanan, CT 

That is an involved story. The TRS-80 
Model I was originally introduced by 
Radio Shack in 1977 as an experimental 
machine, one that only the hardcore com- 
puter/electronics hobbyist would want. 
Radio Shack did not expect to sell more 
than 1000 of them the first year. Boy, did 
they underestimate the market. The first 
thousand were sold in a month, and Tandy 
spent the next two years catching up. 
Because the Model I was an experimental 




I BOUGHT IT 

My biggest loss 
of programming 
time using 
Snappware's 
EXTENDED BASIC 
is spent 
inserting 
my diskette." 

SCOTT ADAMS - PRES 0T ADVENTURE INTL. 



Reduce your programming time significantly with Snappware's EXTENDED 
BASIC. The program is written entirely in machine language for super fast 
execution and is fully integrated into the TRSDOS* BASIC interpreter, re- 
quiring no user memory. Here are just some of the ways EXTENDED 
BASIC can make your programming task easier: 
"Quick way to recover BASIC program followir- ~ ""■ 

or Accidental re-boot. 

Single character abbreviations for the most frequently used 

commands. 

Six single key stroke commands to list the first, last, previous, 

next or current program line. Even edit current line. 

A powerful cross-reference facility with output to display 

and/or printer. 

• Ability to trace a variable through the code. 

• Determine easily if a variable is in use. 

• Permits programmer to display and/or print the value of any or all 
' program variables. 

Identifies the variable type for all variables. . ,. y/ 

Lists each element of any array separately. 
Program line renumbering facilities allowing for specification of 
an upper limit of the block of lines to be renumbered, relocation 
of renumbered blocks of code and duplication of blocks of code. 
» Cross reference facility for key words and character strings including 
global replacement of key works. 

• Compresses your BASIC program to an absolute minimum by remov- 
ing extraneous information. ,,' . ' , - - ; 



Merge lines. 



• Deletes statements that could no 



nthnnvnou+nrl 



MODEL II ... . 
MODEL III . . . 



ime savin 



...$200.00 
. . .$125.00 



CALL TOLL FREE: 

1-800-543-4628 

OHIO RESIDENTS CALL 
COLLECT: (513) 891-4496 
3719 Mantell 
Cinti., Ohio 45236 
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THERE IS SOMETHING 
IN THIS AD FOR YOU 

MAILROOM PLUS PACKAGE $ I 25.00 

The most versatile mailing list management package being 

sold today for the TRS-80 Mod I/Mod III. It can not even 
begin to be described here. This is -the one you want. 
Please Inquire. 

THE DATA DUBBER S49.95 

A tape digitizer which creates optimum tape loads from 
cassette to computet. Also allows cassette to cassette 
copying Backup ALL Basic and system tapes. Rave reviews. 
Mod I, Mod III or ColorComputer. Specify which 

UPPER/LOWER CASE CONVERSION KIT S20.00 

Comp etc kit Software included 

AUTOBOOT $15.00 

Permits automatic sequencing through your choice of DOS 
or Basic commands. Written in Basic. Create a custom 

machine language routine. Do amazing things. Mod I 

MORSECOPY $29.95 

Prints incoming Morse on screen as Alpha Numeric. Simply 
connect speaker to GOAD jack. No hardware required. 
Specify cassette ot diskette 

MORSEEILE $19.95 

Transmits disk files as Morse code audio from CSAVE jack. 
Supplied on diskette 

SIRECHO $15.00 

Make your printer work like an electric typewriter. Func- 
tion as a stand alone pr >gram oi an be :--.<"gcci into 
your programs whenever you want the material that 
appears on the screen to echo to the printer. This will be 
your favorite program. On cassette. 

COPY III (MOD III) $19.95 

A machine language program which will allow the user to 
copy Mod III system tapes Can also be used to transfer 
your Mod I 500 baud tapes to Mod III I 500 baud tapes. 

SERIES STRING RESISTIVE DIVIDER >-406 

ANALYSIS PROGRAM 

4KModl-$l4.95 l6KModl-$24.95 Mod III-S24.95 

Program performs a complete worst case analysis of a 
series resistive divider of up to five resistors. It draws a 
schematic of the divider with min/max values shown, 
computes the min/max possible voltages at each node 
and max possible power dissipation. You change any input 
parameter and update results 

THE PERIPHERAL PEOPLE 

P.O. BOX 21 123 SEATTLE. WA 981 I I (206| 236-2066 





Decision Science Software 



OPERATIONS 


STATISTICAL 


ECOPAK 


RESEARCH 


PACKAGE 




LP 


REGRESS 


FUTURE VALUE 


DYNAM 


MULT 1 -REG 


ANNU i r 


NETWORK 


MATRI> 


EFFECTIVE 


PERT 


FUTURE 


DEPR 


EOQ 


FORECASTING 


SALVAGE 


LOT SIZING 


MARKOV 


NET PRESENT 


FORECASTING 


QUEUE 


VALUE 


DECIDE 


SIMULATION 


DCF RATE OF 


MRP 




RETURN 


TRANSPORTATION 




TRS- 


80' model I and III 


APPLE II 





16 K- 1 Disk Drive 

• mm -^u^ system requirement 

$49.95 to 249.95 - 



for information 

DECISION SCIENCE SOFTWARE 
865 Castle Ridge Road 
Austin, Texas 78746 

(5I2) 327I46J 

'trademark of the Tandy Corp 



machine, no one considered the implica- 
tions of hundreds of thousands of these 
things scattered about. 

One of the unforeseen implications is 
the severe RFI (Radio Frequency Interfer- 
ence) put out by the little machine. This 
RFI affects any tv, and many AM/FM 
radios within 100 feet or more of the 
TRS-80, making them incapable of receiv- 
ing a clean signal. If the computer owner 
lives in an apartment building, every time 
he plays with his computer no one in the 
building can watch tv without seeing the 
interference (usually video snow). 

With only a thousand TRS-80s on the 
market, the RFI was insignificant. But 
with hundreds of thousands sold, the RFI 
became a problem affecting over a million 
people. The FCC became interested in the 
Model I and its RFI. To make a long story 
short, Tandy was prohibited from the man- 
ufacturing of the Model I as of January 1, 
1981 , and from selling the Model I after Ju- 
ly 1, 1982. Tandy was not the only comput- 
er company affected; Apple, PET and oth- 
ers must comply with the RFI standards 
set by the FCC. 



"The FCC became 

interested in the 

Model I and its RFI." 



The FCC, recognizing that there were 
hundreds of thousands of computers in 
private hands before their ruling took 
place, did not place any restrictions upon 
the support of these devices by the manu- 
facturers. 

Even so, some day you will be unable to 
buy programs and peripherals for your 
Model I, just as you cannot buy accessor- 
ies for the player pianos of the 1800's. The 
FCC decided it is okay for a manufacturer 
to make peripherals for computers manu- 
factured and sold before the deadline if 
these conditions are met: the peripherals 
do not violate the FCC RFI regulations, 
and do not cause the computer to radiate 
more RFI than before the peripherals were 
connected. 

Radio Shack recently stopped pro- 
duction of the Model I Expansion Inter- 
face because of very slow sales. The Ex- 
pansion Interface is now classified by 
Radio Shack as SOWG or Sold Out When 
Gone (from warehouse). If you want an Ex- 
pansion Interface, you'd better hurry. 



Whenever my local Radio Shack store 
sales staff cannot answer my questions 
they tell me to call customer assistance at 
Tandy. The number is toll-free, but I'm 
placed on a continuous, unending hold. 
How am I to get my questions answered? 

R.P. 
Shelton, CT 



Everyone with a question about their 
TRS-80, or Radio Shack software, is told to 
call Tandy Computer Customer Service 
(1-800-433-5641 outside Texas, or 
1-800-772-5973 in Texas). Since Tandy has 
sold around 500,000 computers and at 
least double that number of programs, an 
awful lot of people call those numbers. 
While Tandy does have a large staff man- 
ning the telephones, it takes time to check 
out each customer's question. This usual- 
ly means you have to wait. 

There is no shortcut or quicker way to 
get their attention. If you don't want to 
wait on the telephone ask the Tandy oper- 
ator to have a technician call you back. As 
soon as someone is available you will be 
called. 

I've been this route many times myself. 
Sometimes you get a call back in just half 
an hour, other times you may not be called 
until the next day. 

/ have a Model III and am forever read- 
ing ads in computer magazines for soft- 
ware and equipment. Some of these prod- 
ucts are selling at attractive prices, but 
I'm not comfortable spending $50 to 
$100 for something I haven't seen — or 
for that matter don't know its quality. Is 
buying through the mail safe? 

B.J. 
Houston, TX 



When you order something through the 
mail, you always take a risk. Whether or 
not the item is actually going to perform 
as promised is a bit of a gamble. 

There is no way to guarantee the relia- 
bility of any one firm. Try to find someone 
who has the product, or has dealt with the 
firm selling it. Or check back issues of 
magazines for a review of the product. 
You can call the firm, if they list a phone 
number, and ask questions. Most com- 
panies will do their best to give you the 
right information. If they don't, they'll 
either lose the sale, or end up with a dis- 
satisfied customer spreading bad news 
about their company. 

There are some points to consider 
before ordering anything through the 
mail. First, merchandise paid for with a 
personal check will usually not be shipped 
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until after the check clears the banks, 
about two weeks. Second, most computer 
software cannot be returned for a refund, 
although most companies will replace a 
defective disk or tape. The reason for the 
refund refusal is because of people who 
ordered programs, copied them, returned 
the original programs and then demanded 
their money back. Third, it takes time for 
the post office, or UPS to deliver merchan- 
dise. Allow the order about four to six 
weeks for delivery (one week for your or- 
der to get to the firm, one week for them to 
process it and two weeks for UPS to deliv- 
er the package. If it's paid for with a per- 
sonal check, add two weeks for the check 
to clear). 

/ recently purchased the advanced 
statistical analysis program from Radio 
Shack. I have taken a few statistics 
courses, but some terms used in the pro- 
gram are unfamiliar to me. I called Radio 
Shack but they tell me they assumed the 
purchaser would know how to use the pro- 
gram. Where do I go from here? 

A.D. 
Smith vi lie. NY 

Unfortunately, you have joined the 
ranks of many others who have purchased 
that product. The best suggestion I have 
is for you to call a nearby college and ask 
for help from their mathematics depart- 
ment. You might be able to get someone 
to help you through the documentation. If 
you will need assistance in learning how 
to use the program, ask the math depart- 
ment to recommend a student who might 
be willing to help you out. This will 
probably cost you some money. 

Several of my friends own Model I, Level 
II TRSSOs. They frequently have to 
replace their power supplies. What goes 
here? 

A.C. 
Murry Hill, NJ 

I'm not sure. I've been using the same 
power supply on my TRS-80 for several 
years without any problems. 

There could be many different reasons 
why your friends are having these prob- 
lems, most of which have to do with over- 
loading the power supplies by either hook- 
ing up too many modifications or by 
overheating the unit. If the power supplies 
are inside the Expansion Interface or in an 
enclosed space, the temperature build-up 
inside the black boxes may be responsible 
for their failures. 

In either event, the internal fuse inside 
the Radio Shack power supplies should 



"I BOUGHT IT 

"My biggest loss 
of programming 
time using 
Snappware's 
EXTENDED BUILT 
FUNCTIONS is 
spent inserting 
my diskette." 

SCOTT ADAMS - PRES. OF ADVENTURE INTL. 




Snappware's EXTENDED BUILT IN FUNCTIONS is a collection of much 
needed additions to the TRSDOS* BASIC interpreter which greatly ex- 
tends its convenience and utility. The following features become part of 
your BASIC language and provide the enhancements without requiring 
any additional memory. The most important component of EXTENDED 
BUILT IN FUNCTIONS is an in-memory sort routine, guaranteed to be the 
fastest general purpose in-memory sort on the market. Along with this 



FMT — Arranges data into a s 

PDAT/UDAT$— Permits user to do arithmetic on date 

PK$/UPK$— Compresses strings to save disk space. 

ETIM$— Shows the difference between two times. 

CLEAR — Specifies the number of file blocks to be allocated when . 

you specify high memory and string space. 

DELETE— Allows you to dynamically remove portions of a BASIC 

program. 

In addition to these, there are functions unique to Model II and to Model 
III. The exclusives to Model II are long error messages and PEEK/POKE. 
The exclusives to Model III are: 

SWAP — Supports exchange of variables with a single statement. 
HEX$— Converts numbers to hexadecimal strings. ;? V : ' 

RESTORE— Allows you to set READ pointer to location of choice. 

If you consider your programming time to be worth money, call us and let 
us show you how to get more of it. 
MODEL 



.,....$ 75.00 









i/ing power 
at your fingertips. 

CALL TOLL FREE: 

1-800-543-46if 

OHIO RESIDENTS CALL 
COLLECT: (513) 891-4496 
3719 Mantell 
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WORD PROCESSING 
STATIONERY 

CLEAN-EDGE CONTINUOUS 
TRACTOR FEED LETTERHEAD 

NO PIN HOLE EDGES 
CUT SHEET APPEARANCE 

REASONABLE COST 

BLACK OR COLOR PRINTING 
VARIETY OF PAPERS 
OFF THE SHELF DELIVERY 
PRICE & SAMPLES 

RABCO ENTERPRISES 

806 FREEDOM CIRCLE 
HARLEYSVILLE. PA 19438 



f\ 



"COMPUTER ACCESSORIES OF ARIZONA PRESENTS 
PRODUCTS FOR "HE 

'TRS-80* COLOR COMPUTER" 



. s ■ ■„.,. . ., .,.. .... >.. 

. ' "...I , '■ .-■ , !• ..- 

. ,. ,1,-,- . l'i- ;" ,■■., - 

i Program memory bK.c^'j t'.'c- 

i vet-iy programs 

25 volt 



1248-EP EPROM PROGRAMMER $94 95 
PROGR/ 



: ; ' 



:; . 



1 Quality ZiF socket 
' Address decoding opHO" 
supports efficient use q* 
ROM oori memory space 
1 Makes pro'essionaisodwart 
development system when 
used with Micro Vi/Orks 
SDS60C" editor assemote< 



■ .•■ ■ . i *.•"■* ■ r p;; tf p 
1 Speeds 50 WPM 

> ocvr *,,'-:• speed adapts 

■ incudes schematic PCB. 
fompo^enis instruction* 
and « lt*are on tape 



'COMPARE PRICE!" 'COMPARE VALUE!" 

YOU'LL BUY FROM: 

COMPUTER ACCESSORIES OF ARIZONA 

5801 E.VOLTAIRE DR. 

SCOTTSDALE, AZ 85254 



HAKE CHECKS OB MONEY ORDERS PAYABLE T THE ABOVE ADDRESS 

ABIZONA RESIDENTS ADDS 1 . SALES TAX 
•TRS-60 IS A TRADEMABK Ot TANDY CORP 
•SDS60C rS A TRADEMARK Of THE MICRO WORKS 



If you have ever thought about 
publishing your memoirs, the Great 
American Novel, your PhD thesis, 
documentation for a computer 
program, or whatever; think about 
Intergraphics' Personal Publishing 
service. It is the lowest cost method 
yet devised to get your words into 
print. Your Personal Computer, a 
modem, and a little "do-it-yourself" 
spirit are all that is necessary to 
access our fully automated 
computerized -typesetting service. 

For further in'cmation. write to. 

Intergraphics Inc. 



106A South Columbus Street 
Alexandria, Virginia 22314 



►-388 



be checked. If this fuse is blown the power 
supply will stop working. If the power sup- 
ply has the catalog number 400007 on the 
bottom, you can remove the rubber feet 
and unscrew the four bolts holding the 
unit together. With the unit disassembled 
you can unsolder the old fuse and replace 
it with a new one (make sure you use one 
of the same power rating). If the catalog 
number is 4000004, forget it. The only way 
to open it is to saw it apart with a 
hacksaw. 



"Sometimes things go 

right, as in the case of 

theModelW." 



I feel as if I'm getting the runaround. I 
recently received an ad for Westlaw soft- 
ware, sold at Radio Shack stores. As the 
ad suggested, I contacted my local Radio 
Shack store for more information. I had to 
show the salesman the ad. He had no idea 
what I was talking about — he didn't even 
have one in stock! Why advertise some- 
thing you don't have? 

B.H. 

Denver, CO 

The explanation for this rather odd way 
of doing business lies with the logistics of 
advertising. 

The mail advertisements that Radio 
Shack sends out are designed months in 
advance by a department in the advertis- 
ing division of Tandy. Because their aver- 
age lead time is six months they have to 
make some rather hairy guesses as to 
when products will finish testing and start 
production. More often than not these 
guesses are reasonably accurate, but 
sometimes they miss by a mile. 

The product advertising sent to the 
stores is prepared by a different depart- 
ment, which also tries to estimate when 
things will be ready. Sometimes these 
departments get seriously out of sync; the 
Westlaw products are one example. The 
store advertising was delayed, perhaps 
because the printing was done incorrect- 
ly, or some facts were wrong, or someone 
fell asleep at his desk. Whatever the 
reason, the bulk mail package was ready 
before the store information package. 

Sometimes things go right, as in the 
case of the Model 16. The company stores 
had the information a week or so after 



press product announcements were made. 
As to why the stores don't stock the 
merchandise advertised, you will have-to 
consider the economics of marketing. 
Tandy has 8,000 stores, and to send one 
program to every store would cost thou- 
sands of dollars. When the package sells 
for several hundred dollars each the cost 
becomes prohibitive. So Tandy usually 
sends programs out on an "as-needed" 
basis, or to the stores with a high enough 
sales rate to justify the expense. 



/ want to buy a printer for my TRS-80 but 
need help. Printer prices at Radio Shack 
seem high compared to those offered at 
privately owned computer stores or 
through the mail. Can I use any printer 
with my TRS-80? What is the best printer 
to buy for home use? 

B.A. 
San Diego, CA 

Which printer to buy and who to buy it 
from are questions most computer own- 
ers face at one time or another. What kind 
of printer you can use depends upon how 
you use your computer. Printers are divid- 
ed into two main catagories: parallel and 
serial. The TRS-80 is designed to operate 
primarily with parallel printers using the 
Centronics Parallel Printer Port standard. 
Any printer using the Centronics stan- 
dard can be used with TRS-80s. Make 
sure the printer manufacturer says the 
printer will operate with the TRS-80 be- 
fore you buy it. 

Any serial printer can be used with a 
TRS-80 if the computer is equipped with 
an RS-232 port and a program to control it. 

The main difference between these two 
printers is their operating speed. In most 
cases parallel printers are faster, since 
the TRS-80 can deliver the data to the 
printer as fast as the printer can accept 
and print it. Serial printers are slower 
because the data must be translated to 
serial mode by the computer, transmitted 
to the printer and then translated back in- 
to normal mode by the printer before be- 
ing printed. 

As to which printer is best for home use, 
that's a question you will have to answer 
yourself. The primary points you need to 
consider are: price (what you can afford), 
printer speed (how fast you need the infor- 
mation printed), warranty (what recourse 
you have should the device need repair or 
cleaning. Is there a repair center near 
you?); ribbon replacement (how much and 
how easily available); and print quality 
(dot matrix or letter quality). 

Before you give up on Radio Shack 
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printers, consider this: while the list price 
of Radio Shack printers is high, there are 
many dealer franchise stores (some ad- 
vertise in this magazine) who sell these 
printers at substantially discounted 
prices. And Radio Shack's 8,000 stores 
make it easy for you to find an authorized 
repair center should you have problems 
with the unit. 



/ have been reading about home com- 
puters for years. I buy computer maga- 
zines but do not own a computer because 
they are so expensive. I am sure the price 
of home computers will quickly follow the 
price of radios — straight down. When will 
I know when it hits bottom? 

G.C. 
Woodhaven, NY 



I'm afraid you are not going to see the 
prices drop much more than they have al- 
ready. The bottom line on pricing is deter- 
mined by how much hardware there is in 
the computer. It's no accident that the 
computers without video monitors (the 
Color Computer and Pocket Computer) 
are several hundred dollars cheaper than 
those that include their own monitors 
(Models. II, III and 16). The more hardware 
put in, the higher the price. Most of this 
hardware is already at a state-of-the-art 
position. Standard keyboards are pro- 
duced by the millions. Their price has not 
appreciably declined in the last 10 years. 
The same goes for the plastic cases and 
the epoxy circuit boards. The only way 
you can cut the price is to make smaller 
packages and use less materials. 

If you check the magazine ads you will 
see computers for under $100, but you will 
also see a marked difference between 
these machines and their higher priced 
counterparts. 

The same is true of radios. You can buy 
small hand-held units very cheaply. They 
contain only a few commonly manufac- 
tured general purpose parts. Or you can 
spend hundreds of dollars and buy a good 
quality stereo unit made of better parts. 

So I don't think prices are going to 
decline much. Smaller units will be sold 
cheaper, but the large units will stay fairly 
even in price. This doesn't mean the larger 
units won't improve, it just means their 
price will remain the same; just like the 
full-size color tvs (remote control, 21-inch 
screen, built-in clock, automatic fine tun- 
ing) selling today for a thousand dollars, 
while the original color tvs sold for the 
same price and gave you far less in picture 
quality, sound and control. ■ 



"I BOUGHT IT" 

"My biggest loss 
of programming 
time using 
Snappware's 
AUT0MAP and 
AUT0FILE is 
spent inserting 
my diskette." 

SCOTT ADAMS - PRES. OF ADVENTURE INTL. 




m 



ted screen, Autofile 



working with direct files or creating a f 
and Automap are indispensible aids. 

Autofile is designed to automate for the BASIC pi u« 

moving data elements to and from a direct file. Previou 

time consuming chore because the FIELDed variables may not be directly 

referenced by user logic. The FIELD statement was eliminated, thereby 

relieving you of the guessing game as to where the FIELDed variable is. 



The software, when installed/becomes part of your BASIC interpreter 
providing the enhancements without additional memory. 

Automap is designed to automate for the BASIC programme 
presenting information on the video display and accepting ir 
from the keyboard operator. The software consists of two main com r _ 
nents: the OFF-LINE COMPONENT used to describe to the system the 
screen formats and the ON-LINE COMPONENT from within your BASIC 
program to initialize a screen, send data to the video display and receive 
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CALL TOLL FREE: 

1-800-543-46 

OHIO RESIDENTS CAL 
COLLECT: (513) 891-44! 
3719Mantell 
Cinti., Ohio 45236 
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by Bruce Douglass 



"Scientists and mathematicians 
will welcome the precision of muMATH. . . " 



Scientists and mathematicians will 
welcome the precision of muMATH, 
a symbolic mathematics package for mi- 
crocomputers. Originally written by David 
Stoutmeyer and Albert Rich of The Soft 
Warehouse in Honolulu, it is now mar- 
keted by Microsoft. Microsoft has re- 
leased two versions of this program for 
the TRS-80; one costs $75 and the other 
$250. While it is not my purpose to com- 
prehensively review the product, I will 
mention program aspects I consider 
good, and others I consider bad. 

muMATH is written in muSIMP, a high- 
level language very similar to the RLISP 
language. RLISP and muSIMP are both 
based on LISP, but offer a syntax that is 
less intimidating and more familiar to 
most microcomputer users than is tradi- 
tional LISP. 



When you buy the muMATH package, 
you receive the muSIMP programming 
language as well. The trouble is, no text on 
programming in either muSIMP or RLISP 
exists. Microsoft sells a programming 
manual to muMATH with the more expen- 
sive version— it does have some pro- 
gramming examples, but is not a com- 
plete text. This is indeed unfortunate, 
since the muSIMP programming language 
offers some capabilities inconvenient in 
the more traditional programming lan- 
guages (Basic, Fortran and Pascal). 

What It Can Do 

muMATH performs essentially infinite 
precision mathematics by avoiding the 
floating point approximations used by 
more conventional languages. muMATH 
works with rational numbers— ask it to 
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FUNCTION DISPFUN (F#U#N#, LEX1), 
NEWLINEO, NEWLINEO, 

UNPARSE(0, FALSE, LIST (GETD ( F#U#N* ) ) ) , 

PRINT ("") , 
ENDFUN $ 
F#U#N#: ""$ 
FUNCTION PRTARGS( INDENT, LEX1), 

SPACES (1) , 

WHEN EMPTY(LEXl), PRINT ("()" ) EXIT, 

WHEN ATOM(LEXl) , 

QUOTEPRINT(LEXl) EXIT, 

WHEN DPAIR(LEXl) , 

PRINTDPAIR(LEXl) EXIT 

PRINT (LPAR) , 

LOOP 

UNPARSE (INDENT, FALSE, LIST ( FIRST (LEX1 })) , 
WHEN EMPTY (LEXl: REST ( LEX1 ) ) EXIT 
PRINT(COMHA) , SPACES(l), 

ENDLOOP, 

PRINT (RPAR) , 
ENDFUN $ 
PROPERTY UNPARSE, ', FUNCTION ( INDENT, LEXl ) , 

PRINT(* ') , 

PRTARGSt INDENT, FIRST(LEXl) ) , 

TRUE, 
ENDFUN S 
PROPERTY UNPARSE, NOT, FUNCTION ( INDENT , LEXl), 

PRINT( 'NOT) , SPACES(l) , 

UNPARSE (INDENT, FALSE, LEXl), 

TRUE 
ENDFUN $ 
PROPERTY UNPARSE, FUNCTION ,' FUNCTION ( INDENT, LEXl), 

PRINT ( 'FUNCTION) , SPACES(l), PRINT ( F#U#N#) , F#U#N#: 

PRTARGSt INDENT, FIRST (LEXl )) , 

UNPARSE (INDENT+2, TRUE, REST(LEXl)), 

PRNTLINE (INDENT) , PRINT ( "ENDFUN) , 
ENDFUN S 
PROPERTY UNPARSE, SUBROUTINE, FUNCTION ( INDENT , LEXl), 

PRINT( 'SUBROUTINE) , SPACES ( 1 ) , PRINT (F*U*N# ) , 

F#U#N#: •", 

PRTARGSt INDENT, FIRST ( LEXl )) , 
. UNPARSE (INDENT+2, TRUE, REST(LEXl)), 

PRNTLINE ( INDENT) , PRINT ( ' ENDSUB) , 
ENDFUN $ 
PROPERTY UNPARSE, LOOP, FUNCTION ( INDENT, LEXl), 
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add 1 /3 and Vi, and it will answer 7/12. 
Basic, on the other hand, will tell you 
0.583333. As you can see, muMATH's 
answer is exact and Basic's is an 
approximation. 

How about expanding the binomial 
(2X-Y)t3? Basic could only find it if you 
specify numerical values for X and Y. 
muMATH can expand it symbolically 
to 8*Xt3 - 8*Xt2*Y - 2*X*Yt2 - YT3. 
Or suppose you wanted to substitute 
(Zt(V 3 ) - 4*SIN(T)) for Y in this expansion. 
It would be simple: 

A:(2-X-Y)t3; 

EVSUB (A,X.(Zt(y 3 )-4"SIN(r))); 

The power of muMATH doesn't stop 
here. It knows about imaginary and com- 
plex numbers, trigonometry, calculus, and 
(if you have the more expensive version 
from Microsoft) vectors and matrices. 

muMATH can perform symbolic mathe- 
matics in trigonometry and calculus. I can 
never remember all those silly rules for 
angle reduction with the trigonometric 
functions. Well, muMATH can find them 
for me. The same goes for derivatives and 
integrals— sure, I can do them or I can 
look them up, but who needs to? That's a 
technician's job. Just as calculators and 
computers free me from adding and sub- 
tracting with a pencil and paper, muMATH 
frees me from the simpler forms of sym- 
bolic manipulation. 

For a simple example, what is 
SIN(2*A + B)? muMATH tells me it is 
2*COS(X)t2*SIN(Y) + 2*COS(X)*COS(Y) 
*SIN(X) - SIN(Y). Or, what was the in- 
tegral of SIN(X)T3*SIN(N'X) again? 
muMATH will tell me 3*SIN(X-X*N)/ 
(8-8*N) - 3*SIN(X-X*N)/(8 + 8*N) - 
SIN(3*X-X*N)/24-8*N) + SIN(3*X 
+ X*N)/(24 + 8*N), which can be reduced 
by the limit package if you have the more 
expensive version. 

Some Programming Aids 

One of muMATH's major faults is that 
after programming there is no conven- 
ient way to get these muMATH programs 
to disk— they must be typed in every 
time. Well, you have two ways to get 
around this. 
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• You can use a text editor to write the 
programs to disk in ASCII format, or 

• You can use the program Unparse 
(see Listing 1). This program first ap- 
peared in The Soft Warehouse Newsletter 
#2; they kindly gave permission to present 
it here. I recommend that you use some 
sort of text editor to enter the functions in 
the Unparse package. 

A discussion of how the Unparse 
package functions is beyond the scope of 
this article. It is, however, very easy to use. 
To save a function and its property list to a 
disk file just enter: 



WRITEFILE(filename,ext,drive#, 

functionl, functior\2.. ); 



DISPFUN(fun) displays the muSIMP 
language version of "fun." This is an ex- 
tremely handy feature. 

Currently, if you make a mistake enter- 
ing a function, you must retype it. This is a 
bit of a pain. However, you may use The 
Alternate Source's KBE as a full screen 
editor while typing functions within the 
muSIMP environment. If you do this, you 
must use the 48K version of KBE and the 
32K version of muMATH (muMATH has no 
respect for the MEMTOP pointer adjusted 
by KBE). 

Another thing muMATH lacks is a float- 
ing point package. muMATH is exact. If 
you ask Basic or Fortran to evaluate Vn it 
will teli you 0.333333. muMATH would just 
answer Vs. Exact numerical representa- 
tion is extremely powerful and useful, but 
for some purposes floating point is really 
what we want. Presented in Program 
Listing 2 is a floating point package from 
The Soft Warehouse Newsletter #5. This 
package is easy to use and allows you to 
define your precision. 

Point is the control variable for the 
floating point function. If it is zero or 
negative, muMATH will print its results in 
its normal rational arithmetic format. If 
Point is a positive integer, the output will 
be formatted to contain thai number of 
digits to the right of the decimal point. Be 
careful when using floating point input of 
numbers. It doesn't work correctly if the 
first digit to the right of the decimal is a 
zero— 3.08 will be read as 3.8. Enter float- 
ing point numbers as rational fractions 
(for example, enter 3.08 as 308/100). 

The two packages above add consider- 
able power to the muMATH system. If you 
have functions othei muMATH users 
would appreciate, sendthem along and I'll 
mention them in this column. If you are in- 
terested in muMATH, you can subscribe 
to the newsletter above for $5 (US). 
Published three times per year, it is 
available from: 




My Diggest loss 
of programming 
time using 
Snappware's 
COLLEGE EDUCATED 
GARBAGE COLLECTOR 
is spent inserting 
my diskette." 

SCOTT ADAMS - PRES. OF ADVENTURE INTL 




typical BASIC applications. And here s why. 

Microsoft uses a 'variable length string' in the BASIC interpreter. Each 
time the string is assigned a new value, it is relocated in a string pool. 
Periodically. the string pool must be reorganized and condensed into a 
single contiguous area. Performing this string space reclamation is time 
consuming and inefficient because this approach evaluates and collects 
each string individually. The time required is roughly proportional to the 
square of the number of active strings in the resident program. During 
reclamation the system seems to 'lock-up' and does not respond to 
the operator until the process is completed. ' 

This time consuming approach requires a better solution. Snappware has 
developed a solution which takes advantage of the auxiliary memory 
available. SNAPP-VI requires only four bytes per active string as a work 
area. When free storage space is available, our system temporarily bor- 
rows, uses and returns the space to the free storage pool when com- 
pleted. If storage is not available, our system will temporarily transfer out 
to disk enough of the BASIC program to make room for our work area and 
return the 'paged out' information to its correct location when completed. 

Benchmarked times show, in some situations, SNAPP^VI performs one 
hundred times as fast as the Microsoft approach'! 

^^u consider your programming time to be worth money, call us and let 






CALL TOLL FREE: 

1-800-543-4628 

OHIO RESIDENTS CALL 
COLLECT: (513) 891-4496 
*H9 Mantell 
nti„ Ohio 45236 
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%&&&& 



Program Listing 1 Continued 

PRINTLINE ( ' LOOP) , SPACES ( INDENT+2) , 
UNPARSE (INDENT+2, FALSE, LEX1), 
PRNTLINE( INDENT) , PRINT( 'ENDLOOP) , 
ENDFUN S 

FUNCTION UNPARSE( INDENT, EOL , LEX1, LEX2), 
WHEN EMPTY (LEX1) EXIT, 
LEX2:FIRST(LEX1) , 
WHEN DPAIR(LEX2) , 

PRINTDPAIR(LEX2) EXIT, 
WHEN ATOM (LEX 2) , 
BLOCK 

WHEN EOL, 

PRNTLINE( INDENT) EXIT, 
ENDBLOCK, 
QUOTEPRINT(LEX2) EXIT, 
BLOCK 

WHEN EOL, PRNTLINE( INDENT) EXIT, 
ENDBLOCK , 
WHEN ATOM(FIRST(LEX2) ) , 

UNPARSEFUN( INDENT, LEX2) , 

UNPARSE( INDENT, TRUE, REST(LEXl)) EXIT, 
WHEN ATOM(FIRST(FIRST(LEX2) ) ) , 
UNPARSEWHEN( INDENT, LEX2) , 
UNPARSE( INDENT, TRUE, REST(LEXl)) EXIT, 
UNPARSEBLOCM INDENT, LEX2), 
UNPARSE (INDENT, TRUE, REST(LEXl)), 
ENDFUN $ 

FUNCTION UNPARSEFUN( INDENT, LEX1 , LEX2), 
LEX2:FIRST(LEX1) , 
WHEN INTEGER(LEX2) , PRINT(''), 

PRTARGS( INDENT, LEX1) EXIT, 
WHEN APPLY (GET (UNPARSE, LEX2), LIST ( INDENT, REST ( LEX1 )) ) EXIT, 
WHEN GET('LBP, LEX2) , 

WHEN EMPTY (RREST(LEXl)) , 
PRINT (LEX2) , 
SPACES (1) , 

UNPARSE (INDENT, FALSE, REST(LEXl)) EXIT, 
UNPARSE (INDENT, FALSE, LIST ( SECOND (LEXl ))) , 
SPACES(l), PRINT ( LEX2 ) , SPACES(l), 
UNPARSE (INDENT, FALSE, RREST(LEXl)) EXIT, 
PRINT(LEX2) , 

PRTARGS( INDENT, REST(LEXl)), 
ENDFUN $ 

FUNCTION UNPARSEWHEN (INDENT, LEX1), 

PRINT ('WHEN), SPACES (1), 

UNPARSE (INDENT+2, FALSE, LEX1) , 

SPACES(l), PRINT( 'EXIT) , 
ENDFUN $ 

FUNCTION UNPARSEBLOCK( INDENT, LEXl), t 

PRINTLINE( 'BLOCK) , SPACES ( INDENT+2) , 
UNPARSE (INDENT+2, FALSE, LEXl), 
PRNTLINE( INDENT) , 
PRINT( 'ENDBLOCK) , 
ENDFUN $ 
FUNCTION DPAIR(LEXl), 

WHEN ATOM(LEXl) , FALSE EXIT, 
WHEN EMPTY (REST (LEXl) ) , FALSE EXIT, 
ATOM(FIRST(LEXl) ) AND ATOM (REST ( LEXl )) , 
ENDFUN $ 
FUNCTION PRINTDPAIR(LEXl) , 

PRINT(LPAR), QUOTEPRINT (FIRST (LEXl)), 
PRINT (". "), 
QUOTEPRINT (REST (LEXl) ) , 
PRINT (RPAR) , 
ENDFUN $ 
FUNCTION PRNTLINE ( INDENT) , 

PRINTLINE (COMMA) , SPACES ( INDENT) , 
ENDFUN 5 

MOVD(PRINT, QUOTEPRINT) $ 

FUNCTION QUOTEPRINT (EX1, EX2, LEXl, LEX2), 
WHEN INTEGER(EXl) , PRINT(EXl) EXIT, 
WHEN LENGTH (EX1)=0, PRINT (»»■■«" ) EXIT, 
LEXllEXPLODE(EXl) , 
BLOCK 

WHEN DIGIT(FIRST(LEX2)) , 

EX2:TRUE EXIT, 
LEX2:LEX1, 
LOOP 

WHEN WILDCHAR (FIRST (LEX2)) , 

EX2: TRUE EXIT, 
LEX2:REST(LEX2) , 
WHEN EMPTY(LEX2) EXIT, 
ENDLOOP, 
ENDBLOCK, 

WHEN NOT EX2, PRINT(EXl) EXIT, 
PRINTC""-) , 
LOOP 

BLOCK 

WHEN PRINT(FIRST(LEX1) )=""■", 
PRINT ("""■J EXIT, 
ENDBLOCK, 
LEXl: REST (LEXl) , 
WHEN EMPTY (LEXl) EXIT, 
ENDLOOP, 
PRINTC*"") , 
ENDFUN S 
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The Soft Warehouse 
PO Box 11174 

Honolulu. HI 96823 

Calculating in muMATH 

Aside from its use in programming, 
muMATH can be used in a calculator 
mode. But you've never seen a calculator 
like this! 

Let's examine exactly what a symbolic 
math package is. How would you expand 
the expression (X + Y)t2? Well, you would 
perform it something like this: 

X + Y 
times X + Y (multiply) 



X*Y + Y*-Y 

X*Y (add partial products) 



X'X + 2"X*Y + Y*Y (final result) 

This is the same result muMATH gives. 
Try that in Basic, Fortran or even Pascal— 
they can perform arithmetic only on num- 
bers, not on variables. When Basic tries to 
evaluate (X + Y)t2, it looks up and sub- 
stitutes the value for X, then it substitutes 
the value for Y, adds them and finally 
squares this sum. You end up with a 
single number rather than an algebraic 
expression. 

muMATH, then, allows you to mathe- 
matically manipulate symbols rather than 
just numbers. So your TRS-80 moves from 
a number-cruncher to a super symbol 
cruncher! 

Let's look at muMATH's syntax. First, 
the colon serves as the assignment 
operator. You can assign expressions 
as well as numbers to variables. For 
example, 

TEMPCEL : 5/9'(TEMPFAR - 32); 

assigns the expression 5/9*(TEMPFAR - 
132) to the variable TEMPCEL. Answering 
the @ prompt with TEMPCEL; results in 
this expression. You may assign TEMP- 
FAR a value (such as zero) by the line: 



Now entering TEMPCEL; results in 
-160/9. The semicolon is the end-of- 
statement marker used by muMATH. 

Let's consider some functions in 
muMATH: 

• A factors function that gets all 
multiplicative factors of a given number 

• A function plotter 

• A cubic equation solver 

• A Taylor series generator that allows 
you to specify the desired accuracy (to be 
used with the floating point package) 
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Snappware 



MICRO-80 
284 Goodwood 
Clarence Park 
Adelaide South - 
Ph-(Q8) 2117224 



DIGI-TEK SYSTEM 
65 Thomridge Circle 
Kitchener Ontario ISC 
Ph-(519)742-8205 

STRAWFLOWER ELEC 
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Half Moon Bay 
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COMPUTER MAGIC 
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offering a trial package that will cut your programming time up to 75%! 



This unprecedented offer allows you to judge for yourself the value oft 
software using your hardware at your convenience. Our five best selling 
products: EXTENDED BASIC, EXTENDED BUILT IN FUNCTIONS, COLLEGE 
EDUCATED GARBAGE COLLECTOR, AUTOMAP and AUTOFILE, are all 
available to you on a trial basis for only $50.00 for the Model II and 
$35.00 for the Model III. We're convinced that after you see how well our 
software helps you perform programming tasks, you will purchase them 
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Our trial package consists of a master dis 

create one working copy. Your purchase price 

credited toward the purchase of any software Snappware sells. ' 

If for any reason you are not satisfied, just return the trial diskette and 
working copy and we will refund your money, no 
an unconditional guarantee like this,. you can't lo: 

til our toll free number 800-543-4628 to put us on 
relict will be: Snappware saves you time an ' 
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Program Listing 1 Continued 

FUNCTION WILDCHAR(EXl) , 

MEMBERfEXl, LIST('" ", '1, '■""«, '$, ■"%", '6,, 
COMMA, '-, '., '/, ':, ';, '<, '>, '<*, '?, '[)), 
ENDFUN S 
FUNCTION DIGIT(EXl), 

MEMBER(EX1, '("0", "1", "2", "3", "4", "5", "6", 
ENDFUN $ 
SUBROUTINE WRITEFILE LEX1 

WRITEFILE1 (FIRST(LEXl) , REST(LEXl) ) , 
ENDSUB S 
FUNCTION WRITEFILE1(LEX1, LEX2), 

WRS(FIRST(LEX1) , SECOND ( LEX1 ) , THIRD ( LEX1 )) , 
LOOP 

WHEN EMPTY(LEX2) EXIT, 
PRINTFUN(FIRST(LEX2) ) , 
PRINTVAL(FIRST(LEX2) ) , 
PRINTPROPS(FIRST(LEX2)) , 
LEX2:REST(LEX2) , 
ENDLOOP , 

NEWLINE() , NEWLINEO , 
PRINT CRDS () S") , 
WRS ( ) , 

FIRST (LEX1) , 
ENDFUN $ 
FUNCTION PRINTFUN(EXl) , 

WHEN ATOM (GETD(EXl) ) EXIT, 
DISPFUN(EXl) , 
PRINT( '$) , 
ENDFUN $ 
FUNCTION PRINTVAL(EXl) , 

WHEN FIRST(EX1)=EX1 EXIT, 
NEWLINEO , NEWLINEO . 
QUOTEPRINT(EXl) , PRINT(" : "), 
UNPARSE(2, FALSE, LIST ( FIRST ( EXl) )) , 
PRINTLINE; '$) , 
ENDFUN $ 
FUNCTION PRINTPROPS(LEXl, LEX2) , 

WHEN ATOM (LEX2: REST (LEXl) ) EXIT, 
LOOP 

WHEN EMPTY (LEX2) EXIT, 
NEWLINEO, NEWLINEO, 
PRINT( 'PROPERTY) , 
SPACES(l), QUOTEPRINT(LEXl) , 
PRINT(", "), PRINT(FIRST(FIRST(LEX2) )) , 
UNPARSE(2, TRUE, LIST (REST ( FIRST ( LEX2) ))) , 
PRINTLINE! '$) , 
LEX2:REST(LEX2) , 
ENDLOOP 
ENDFUN S 

STOP $ 
RDS () $ 



LPAR , RPAR , 



Program Listing 2. Float 



% float/mu package from The Soft Warehouse Newsletter % 
% from issue number 5 page 6 - original version faulty % 
% changed by Bruce Powel Douglass so that it would run % 
% presented by permission of % 

% The Soft Warehouse % 

% Honolulu, HI % 

% % 

POINT: FALSE $ 

PUTD( 'PRTMATH2, GETD ( ' PRTMATH ) ) $ 

% * 

% now redefine the PRTMATH driver % 

% % 

FUNCTION PRTMATH 1 (EXl, RBP , LBP, PRTSPACE, 
% LOCAL* % EX 2 EX3) 
WHEN NUMBER (EXl) AND ( POSITIVE ( POINT) OR ZERO(POINT) 
EX2: DEN(EXl) , 
EXl: NUM(EXl) , 
PRTSPACE: FALSE, 
BLOCK 

WHEN NEGATIVE (EXl) , 
BLOCK 

WHEN LBP > 130, 

PRTSPACE: TRUE, 
PRINT (LPAR) EXIT, 
ENDBLOCK , 
PRINT ( '-) , 
EXl: -EXl EXIT, 
ENDBLOCK , 

EXl: DIVIDE(EX1,EX2) 
PRINT(FIRST (EXl) ) , 
PRINT ( ' .) 
EX3: POINT, 
LOOP 

WHEN ZER0(EX3) EXIT, 

WHEN ZERO(SECOND (EXl)) EXIT, 
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• A simple hex-to-decimal number con- 
verter function 

Factors (see Listing 3) is a simple pro- 
gram. First, the text between percent 
marks is a comment, ignored by 
muMATH. The Function line tells 
muMATH that we are defining a function 
called Factors and we are using the 
variables N,A,B. We are only passing one 
parameter to Factors (N), but by defining 
the rest in the Function line, we ensure 
that they are locally rather than globally 
bound. Even though we used A and B in 
our function, the values of A and B outside 
the function will remain unchanged. If we 
used them without defining them, the 
values of A and B would be different after 
exiting the function than they were before 
entering the function. 

The conditional statement in muMATH 
is When. The line: 

WHEN( N = 2 OR N =3, TRUE EXIT 

means that if N equals two or three, 
muMATH returns a logical True and exits 
the function. The first function used is 
Primes, which determines whether a 
number is prime. It is called by Factors, 
which is the second function. 

Primes then goes on to see if the 
parameter is an integer or even. If it is not 
an integer or if it is even, then it must not 
be prime, so we exit with a logical False. 

We then define a loop which divides all 
numbers between three and SQR(N) into 
our test number. If any of these returns an 
integer, the number must not be a prime. 

The program flow of Factors is simple 
enough. First, we define local variables. 
Then we test to see if the argument is an 
integer. If not, we exit. Then, we test our 
number to see if it is a prime. If it is a 
prime, we know all the factors, so we list 
them: one and N. 

If not a trivial case, we must loop 
through a block to make a list of all the 
prime numbers that evenly divide our 
argument. This function is a good simple 
example of the use of the Block... 
Endblock construct. If you exit from a 
loop, then you also exit the function. With 
the Block construct, you can exit the loop 
and remain within the function. 

Next Factors sets up a number D = N/B. 
We can then easily test to see if it is an in- 
teger. If B is not prime or if D is not an in- 
teger (B doesn't go into N evenly) we don't 
need to keep it as a factor. We can throw 
the value of B away and exit the block (pro- 
gram flow transfers to the line following 
Endblock). 

If B passes these two initial tests, the 
list of prime factors is increased by 
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adding B to the list (ANS) with ANS: 
ADJOIN(B.ANS). Then, knowing that B 
goes into B at least once, we wish to know 
how many times it goes in. For example, if 
we enter FACTOR(8), the routine produces 
the list (2,2,2). The inner loop continues 
until N/B is a non-integer. The value for N 
is decreased by letting N:N/B each time, 
so we don't count each factor more 
than once. 

When B finally ceases to divide N 
evenly, we exit the loop (and block) and in- 
crease the value of B until B is greater 
than half of the initial value of N. ANS is 
printed because it is the last expression 
before the exit from the function. 

Function Plotter 

The PLOT/MU package contains several 
functions (see Listing 4). The first, called 
BOX( ), requires no parameters. It merely 
clears the screen and draws a frame 
around it. 

The next function, Plot, makes several 
calls elsewhere. MAX(X,Y) returns the 
greater of two numbers, INT(X) finds the 
integer portion of a rational number, 



FLASH(X,Y) flashes a graphics point on 
and off, and W#SCAN waits until a key 
is pressed. 

This last function demonstrates the use 
of the PUTD function to link machine lan- 
guage routines with muMATH. In the 
TRS-80 Model I, a ROM call at 0049H (73 
decimal) checks the keyboard and waits 
until a key is pressed. By using the PUTD 
function, we can assign the function 
W#SCAN to be a call to that address. Do 
be careful with ROM calls, however. If one 
of the many exits to Disk Basic is taken, 
muMATH will die a miserable death. 

To plot a function, enter PLOT(fun,var, 
low, high). Fun is the function to be 
plotted; var is the variable in fun; and low 
and high are the extreme X values to be 
shown on the plot. Plot uses the entire 
video screen and auto-scaling for the 
Y-axis. While this is a bit slow, it presents 
an attractive graph. 

Plot scales the X-axis to 126 equally- 
spaced intervals and checks the value of 
the function at these points. It then deter- 
mines the low and high values for the 
Y-axis. The Y-axis is then scaled by the for- 



mula PLOTTEDY = (46-1)/(HIGHY- 
LOWY)*functiony + LOWY so the lowest 
value of Y will be at y equals one and the 
highest value at y equals 46, fitting nicely 
on the screen. This amount is subtracted 
from 47 to invert the screen, making it 
more easily readable. 

While Plot checks the function for high 
and low values, it stores all the calculated 
function values in LISTY. These same 
values will be needed later to scale and 
plot on the screen. 

Then we reverse the list (since we want 
it to be a queue rather than a stack of 
values), take the values out of the list one 
at a time, and plot them. The x value is in- 
cremented by one each time, so that the X 
value does not need to be scaled. 

Rather than have the exit to command 
mode destroy the carefully drawn screen, 
the W#SCAN function waits until a key is 
pressed. An alternative method would be 
Loop followed by Endloop. Since there is 
no When statement, there is no way out of 
the loop. Holding down the clear key also 
allows you to exit the loop. 

There is one thing to remember, though. 



Program Listing 2 Continued 



(EX1) 



EX1: DIVIDE (TIMES (SECOND 
EX3: DIFFERENCE (EX3, 1), 
PRTDIG (FIRST(EXl) ) , 
ENDLOOP, 

WHEN PRTSPACE, PRINT (RPAR) EXIT EXIT, 
PRTMATH2 (EX1, RBP , LBP, PRTSPACE) 
ENDFON ? 



, EX2) 



FUNCTION PRTMATH (W,X,Y,Z) 

WHEN NUMBER (W) , PRTMATH1 (W,X,Y,Z), 
PRTMATH2 (W,X,Y,Z), "" 
ENDFUN S 



EXIT, 



FUNCTION PRTDIG (EX1), 

WHEN LENGTH (EX1) EQ 1, PRINT (EX1), EXIT, 
PRINT (SECOND (EXPLODE (EX1))), 
ENDFUN S 
% 

% this FLOAT function for inputting floating numbers 
% doesn't work correctly - 3.01 is read as 3.1 
% 
FUNCTION FLOAT (EX1, EX2) 

EX1 + EX2/RADIXO [LENGTH (EX2) 
ENDFUN S 
PROPERTY LBP, ".", 190 S 
PROPERTY INFIX, ., COND ( 

WHEN INTEGER (EX1) AND INTEGER ( SCAN) 

FLOAT (EXl, SCAN, SCANO) EXIT 
WHEN SYNTAX () EXIT ) $ 
% ? 

this logapx(x) function finds an approximation '• 
% to LN(x) using N terms of a series expansion 
% best to use with the floating point package 
% | 

FUNCTION LOGAPX (X, N, Z, TOTAL, CTR), 
TOTAL: CTR: 0, 
Z: (X-1)/(X+1), 
X: Z[2, 
ion; 

TOTAL: TOTAL + Z/(2*CTR+1), 
WHEN CTR=N, 2* TOTAL EXIT, 
Z: Z*X, 
CTR: CTR+1, 
ENDLOOP, 
ENDFUN S 
% 

% The last two lines must be included for 
% muMATH to properly finish the reading in 
% the text file from disk 

% 
STOP () S 
RDS () $ 



% routine to calculate multiplicative factors % 
FUNCTION PRIME (N,A,B) 

WHEN N=2 OR N=3, TRUE EXIT, 

WHEN INTEGER (N)=FALSE OR INTEGER) N/2) , FALSE EXIT, 

A:3 B:N[(l/2) % B=SQR(N) % 

LOOP 

WHEN INTEGER(N/A) , FALSE EXIT 
WHEN A>B, TRUE EXIT, 
A:A+2, 
ENDLOOP 
ENDFUN S 
% 

% now the main function 

* 
FUNCTION FACTORS(N,J,ANS,B,D) , 

WHEN INTEGER(N)=FALSE, FALSE EXIT, 
WHEN PRIME(N), ANS : LIST ( 1 , N) EXIT, 
J:N, ANS:LIST() , B:2, 
LOOP 
D:N/B 
BLOCK 

WHEN INTEGER(D)=FALSE OR PRIME ( B) =FALSE , EXIT 
WHEN INTEGER(D/B) , N:D 
LOOP 

ANS : ADJOIN ( B , ANS ) 
WHEN INTEGER(N/B) =FALSE, EXIT, 
N:N/B, 
ENDLOOP EXIT, 
ANS:ADJOIN(B,ANS) , 
ENDBLOCK 
B=B+1 

WHEN B>J/ 2, ANS EXIT 
ENDLOOP 
ENDFUN S 



Program Listing 3. Factors 



Program Listing 4. Function Plotter 



FUNCTION PLOTTER FOR MUMATH 
but first, we need BOX to set 
up the screen for us 



FUNCTION BOX (XHIGH, A) 
CLS ( ) , 
A:0, 
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BLOCK 

WHEN A>XHIGH, EXIT 
LOOP 

SET(A,0) , SET(A,47) 
A:A+1, 

WHEN A>XHIGH, EXIT 
END LOOP 
ENDBLOCK 
A:0 P 
BLOCK 

WHEN A>47, TRUE EXIT, 
LOOP 

WHEN A>47, TRUE EXIT, 
SET(0,A), SET(XHIGH,A) 
A:A+1, 
END LOOP 
ENDBLOCK 
ENDFUN S % END_BOX % 

DOT:'. S 

% :_i_ ;__ __ ;__ __ __ % 

% this portion is the main program * 

i this function may run out of vector % 

% space on complex functions, if this % 

% happens, use PLOT#l() below » 

% If you don't want to use auto scaling % 

I for the Y axis, the use PLOT#2() below % 

% * 

FUNCTION PLOT(EXPR, X, LOW, HIGH, YLIST, ZINT 

1NCX, INCY, A, B, Y, SLOPEY, INTERY, Q) 
WHEN (LOW=HIGH) OR 

(NUMBER(HIGH)=FALSE) OR ( NUMBER ( LOW) =FALSE) , 
PRINT( "ERROR IN LIMITS!") EXIT, 
CLS(), PRINTfTHINKING") , YLIST: LIST(), 
INCX: (HIGH-LOW) /100, ZINTs0 
% % 

% NOW FIND SCALING FACTOR FOR Y-AXIS % 
% % 

UPY: EVSUB(EXPR,X,HIGH) , LOWY : EVSUB ( EXPR,X , LOW) , 
WHEN (NUMBER(UPY) -FALSE) OR ( NUMBER ( LOWY ) -FALSE j , 

PRINT ("ONLY UNIVARIATE FUNCTIONS!") EXIT, 
A: LOW, 
LOOP 
BLOCK 

WHEN INTEGER! ZINT/10) , PRTMATH ( ZINT) EXIT, 
PRINT (DOT) , 
ENDBLOCK 
ZINT: ZINT+1 
B: EVSUB(EXPR,X,A) , 

YLIST:ADJOIN(B, YLIST) % save the generated points % 
UPY: MAX(UPY,B) , 
LOWY: MIN(LOWY,B) , 
A: A+INCX 
WHEN A>HIGH EXIT, 
ENDLOOP 

A: LOW, Q: 1, YLIST:REVERSE (YLIST) , 

WHEN LOWY-UPY, PRINT ( "CHOOSE DIFFERENT X-LIMITS"), EXIT 
SLOPE: 45/(UPY-LOWY) 
INTER: l-SLOPE*LOWY 
% _^TL Z—Z Z__ Z-Z. ZZZ. ZZZ. % 

% ok, now that we have the scaling % 

« factors, let's plot the function % 

BOX (100)", % SET~UP SCREEN~% _ 

LOO V 

WHEN Q>100, EXIT 

Y: 47 - INT(FIRST(YLIST)*SLOPE + INTER) 

YLIST: REST( YLIST) 

SET(0,Y) 

Q: Q + 1, 

ENDLOOP 

% now keep looping % 

% until any key is pressed % 

% (see definition by PUTD below) % 

% (another way to do the loop would be : % 

% LOOP % 

% ENDLOOP * 

% in which case the only way out is to • 
% use the <CLEAR> key to exit) % 

% % 

W#SCAN () , 
ENDFUN S % END_PLOT 't 

% % 

% PLOT#l() is just like PLOT() except I 

% that it doesn't store all the numbers, so % 

% you won't have so much tendency to run * 

% out of vector space due to storage % 

% % 

FUNCTION PLOT#l(EXPR, X, LOW, HIGH, ZINT, 

INCX, INCY, A, B, Y, SLOPEY, INTERY, Q) 
WHEN (LOW-HIGH) OR 

(NUMBER(HIGH)=FALSE) OR ( NUMBER ( LOW) =FALSE) , 
PRINT ("ERROR IN LIMITS1") EXIT, 
CLS(), PRINT("THINKING") , 
INCX: ( HIGH-LOW) /126, ZINT:0 

UPY: EVSUB(EXPR,X,HIGH) , LOWY: EVSUB (EXPR,X , LOW) , 
WHEN (NUMBER (UPY) -FALSE) OR ( NUMBER ( LOWY ) =FALSE) , 

Program Listing 4 Continues 



muMATH had better be able to evaluate 
the function before you use Plot. There- 
fore, you cannot graph SIN(X). You can 
graph a truncated Taylor series such as 
X - Xt3/3! + Xt5/5! - Xt7/7!, and it will 
look reasonably good. 

The Cubic equation solver shows a 
rather simple example of recursion (see 
Listing 5). The expression it expects to see 
is of the form: 

z"yt3 + p"yt2 + q*y + r 

If z is not one or zero, Cubic calls itself 
after dividing the expression by z. Cubic 
finds all real or imaginary roots of the 
cubic polynomial even if they are in terms 
of some other variable. 

The Taylor series generator (see Listing 
6) is another interesting problem. The 
muMATH manual comes with a Taylor 
series generator, and we can use this to 
generate approximations. However, since 
muMATH normally operates in rational 
arithmetic, this is not very useful in cer- 
tain applications. Suppose we want the 
value for SIN(X) to 10 decimal places. A 
fraction like 10949857676909686874786/ 
868677123654896221012144775 is not par- 
ticular;;/ helpful. But now we have a float- 
ing point function for it! 

You can use the other Taylor series 
generator easily to evaluate, say, 
SIN(19.5) radians by entering the line: 

EVSUB(TAYLOR(SIN(X),X,0,10),X,19.5); 

You are requesting a laylor series with a 
certain number of terms calculated, rather 
than one calculated to a given accuracy. 
These are not the same things. Even if the 
Taylor series of a function converges, it 
may converge rapidly or slowly. The 
FLTTAY function presented here allows 
you to specify the accuracy desired in 
terms of significant digits rather than in 
terms of the number of arithmetic terms 
evaluated. 

1 he difficult pail of writing this program 
was finding the proper exiting condition. 
The most obvious approach would be to 
compare two consecutive terms, see if the 
terms are still getting smaller(test for con- 
vergence), and compare the size of the 
term with the accuracy criterion to see<if it 
is less. There is a problem with this. 

For illustration, let's look at the 
MacLaurian series for SIN(X). It looks like: 

SIN(X) = X - XI3/3! + Xt5/5! - Xt7/7 + . . . 

This is a Taylor series, but it happens that 
every other term is zero. If we compare 

two consecutive terms the series will pre- 
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Encyclopedia for the TRS-80* 

What's the key to getting the 
most from your TRS-80? No, it 
isn't the disk drives or printers or 
joysticks. It's information. 
Without a continual supply of 
information and ideas, you 
cannot realize the full potential of 
the TRS-80. 

Our response to the clamor for 
additional information is the 
Encyclopedia for the TRS-80, a 
ten-volume reference work of 
programs and articles carefully 
selected to help you make the 
most of your microcomputer. You 
can consider the volumes of the 
Encyclopedia to he an extension 
of the documentation that came 
with your TRS-80. Each book is 
full of material on programming 
techniques, business, hardware, 
games, tutorials, education, 
utilities and interfacing. 



Unlike conventional 
encyclopedias, the Encyclopedia 
for the TRS-80 will never become 
stale or out of date. That's 
because the volumes of the 
Encyclopedia are being issued 
one-at-a-time, approximately six 
weeks apart. This means that 
each new volume will reflect the 
latest developments and 
discoveries, making this a living 
encyclopedia for TRS-80 users. 

Volumes 1-7 available now. 
Complete set available July 1982. 
ENCYCLOPEDIA FOR THE TRS-80 
$19.95/volume HARDCOVER 
$10.95/volume SOFTCOVER 

Encyclopedia Loader 

The editors at Wayne Green 
Books want to help you use the 
programs in your Encyclopedia 
for the TRS-80. So to help you 
maximize the use of your 
microcomputing time, we created 
^Encyclopedia Loader™. 

By a special arrangement 
with Instant Software™, 




10* 

see details below, 




Books can now provide you with 
selected programs contained in 
each volume of the Encyclopedia 
for the TRS-80 on a special series 
of cassettes called Encyclopedia 
Loader™. Your encyclopedia 
provides the essential 
documentation but now you'll be 
able to load the programs instantly. 

With Encyclopedia Loader™ 
you'll save hours of keyboard 
time and eliminate the 
aggravating search for typos. 
ENCYCLOPEDIA LOADER™ 
$14.95/cassette 




Receive one volume FREE 

If you order the entire 10 vol. set of the 
Encyclopedia for the TRS-80, you'll 
receive the 10th vol. FREE! 
10 Volume deluxe hard cover 
COLLECTOR'S EDITION— a $199.50 value 
$164.00 EN8100 po stpaid . 
10 volume soft cover edition, a $109.50 
value. $83.00 EN8080 postpaid . 



ORDERING INFORMATION 
TOLL FREE CALL 
n green 1-800-258-5473 

OR mail a copy of this form 
or card provided to: 

WAYNE GREEN BOOKS 

SALES DEPT. 

PINE STREET 

PETERBOROUGH NH 03458 

DEALER INQUIRIES INVITED 



Yes, I want your special offer 

10 Vol. Hardcover $164.00 EN8100 _10 Vol. Softcover $83.00 EN8080 (UPS shipping included) 
ENCYCLOPEDIA HARDCOVER Single Volume $19.95 each* 

_Vol. 1 _Vol.2 _Vol.3 __Vol.4 __Vol. 5 _Vol. 6 _Vol.7 _Vol. 8 _Vol. 9 _ Vol. 10 

EN810X EN8102 EN8103 EN8104 EN8105 EN8106 EN8107 EN8108 EN8109 EN8110 
ENCYCLOPEDIA SOFTCOVER Single Volumes $10.95 each* 

\ _VoL. 1 _Vol. 2 _Vol. 3 _Vol. 4 __Vol. 5 _Vol, 6 _Vol. 7 _Vol. 8 _Vol. 9 _Vol. 10 

' ^) EN8081 EN8082 EN8083 EN8084 EN8O88 EN8086 EN8087 EN8088 EN8089 EN8090 
ENCYCLOPEDIA LOADER Single Volumes $14.95 each* 

_Vol. 1 _Vol. 2 _Vol. 3 ...Vol. 4 _Vol. 5 _Vbl. 6 _Vol. 7 _Vol. 8 _Vol. 9 _Vol. 10 

HIN8001 EN8002 EN8003 EN8004 EN8005 EN8006 EN8007 EN8008 EN80O9 EN8010 



WAYNE GREEN BOOKS 

A division of Way no Green Ino 
Pine Street 
Peterborough, NH 03458 

'TRS-80 is a trademark of Radio Shack 
division of Tandy Corp. 

The Encyclopedia for the TRS-80 is a' Wayne Green publication.' : 

Encyclopedia Loader 15 manufactured by 
Instant Software, a division of Wayne Green Inc. 



Payment enclosed 



MC 



G Araex 



Card # 

Signature^ 

Name 

Address . 
City. 



. MC Interbank#_ 
Expiration date_ 



State_ 



_ Zip_ 



• Shipping and Handling: $1.50 per item U.S. and Canada. $ 10.00 per item overseas airmail. 8006 
Books shipped >'P! : with full street address. 

80 Microcomputing, June/July 1982 • 419 









Program Listing 4 Continued 






% 

% CUBIC solves cubic equations of the form 


% 






PRINT ("ONLY UNIVARIATE FUNCTIONSl") EXIT, 










A: LOW, 






% y[3 + p*y[2 + q*y + r ■ 


% 






LOOP 
BLOCK 






% 

FUNCTION CUBIC(EXPR,Y,X,A,B,A1,B1,P,Q,Z) 


% 






WHEN INTEGER(ZINT/10) , PRTMATH ( ZINT) EXIT, 

PRINT (DOT) , 
ENDBLOCK 
ZINT: ZINT+1 
B: EVSUB(EXPR,X,A) , 
UPY: MAX(DPY,B) , 
LOWY: MIN(LOWY,B) , 
A: A+INCX 
WHEN A>HIGH EXIT, 
ENDLOOP 






R: EVSUB(EXPR,Y,0) , 

Q: EVSUB(DIF(EXPR,Y) ,Y,0) , 












P: EVSUB(DIF(DIF(EXPR,Y) ,Y) ,Y,0) , 












Z: DIF(DIF(DIF(EXPR,Y) ,Y) ,Y) 












WHEN (NOT (Z-l)) AND (NOT (ZERO(Z))), 
CUBIC(EXPR/Z,Y) EXIT 












A: (3*Q-P[2)/3 B: (2*P[3-9*P*Q+27*R)/27 












Al: CUB(-B/2+SQR(B[2/4+A[3/27) ) 












Bl: CUB(-B/2-SQR(B[2/4+A[3/27)) 












PRINTfROOT 1 =") PRTMATH (Al+Bl) , NEWLINE ( ) , 
PRINT ("ROOT 2 =") 








A: LOW, Q: 1, 






PRTMATH(-(Al+Bl)/2+(Al-Bl)/2*SQR(-3) ) , NEWLINEO , 






WHEN LOWY=UPY, PRINT ( "CHOOSE DIFFERENT X-LIMITS") 


, EXIT 




PRINTfROOT 3 =") 








SLOPE: 45/(UPY-LOWY) 
INTER: l-SLOPE*LOWY 






PRTMATH(-(Al+Bl)/2-(Al-Bl)/2*SQR(-3)) , NEWL 
ENDFUN S 
% 


INE ( ) , 






BOX(126), % SET UP SCREEN % 






% 






LOOP 

WHEN Q>126, EXIT 






% SQR finds the square root in muMATH form 

% 

FUNCTION SQR(X) , 

X[ (1/2) 
ENDFUN S 
% 

% CUB finds the cube root in muMATH form 
% 


% 
% 

% 
% 

% 






Y: 47 - INT(EVSUB(EXPR,X,A)*SLOPE + INTER) 
SET(Q,Y) 

Q: Q + 1, A: A+INCX 
ENDLOOP 










WISCAN () , 
ENDFUN S % END_PLOTtl % 










% 

% PLOT#2 is different in that you must 


% 
% 




FUNCTION CUB(X) 

X[(l/3) 
ENDFUN $ 
% 
% 
STOP() $ 








% enter the limits for X and Y, rather 


% 










% than have auto Y-scaling. The calling 


% 




% 
% 






% sequence is: 


% 








% PLOT*2(expr, X, X_low, X_high, Y_low, Y_high) 

% 

% 


% 
% 
% 










RDS() $ 








FUNCTION PLOT#2(EXPR, X, LOW, HIGH, LOWY, UPY, 














INCX, A, B, Y, SLOPEY, INTERY, Q) 
WHEN (LOW=HIGH) OR (LOWY=UPY) OR 






Program Listing 5. Cubic Equation Solver 








(NUMBER(HIGH)=FALSE) OR ( NUMBER ( LOW) =FALSE) 


OR 












( NUMBER) LOWY )=FALSE) OR ( NUMBER ( UPY) =FALSE) , 
PRINTfERROR IN LIMITS1") EXIT, 






















INCX: (HIGH-LOW) /126, 










A: LOW, Q: 1, 

WHEN LOWY=UPY, PRINT ( "CHOOSE DIFFERENT X-LIMITS") 


, EXIT 




















SLOPE: 45/(UPY-LOWY) 














INTER: 1-SL0PE*L0WY 

BOX (126), % SET UP SCREEN % 
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LOOP 














WHEN Q>126, EXIT 






% floating point Taylor series function 


% 






Y: 47 - INT(EVSUB(EXPR,X,A)*SLOPE + INTER) 






% you must enter the expression and the 


% 






SET(Q,Y) 






% accuracy desired in number of digits 


% 






Q: Q + 1, A: A+INCX 






% written by 


% 






ENDLOOP 






% Bruce Powel Douglass 


% 






WtSCAN () , 






% 


% 






ENDFUN $ % END_-PLOT#2 % 






% NOTE: FLOAT/MU PACKAGE IS REQUIRED 


% 








% 




% The function must be one for 


% 






% define a function to find the maximum of 


% 




% which muMATH knows the value 


% 






% two arguments 


% 




% at the point A 


% 






a ___ «.__— --«^— ~-..»., — — — _ _.. — «•_■■ 


% 




% 


% 






% 


% 




FUNCTION FLTTAY (EXPR, X, A, ACC, VAL , NUM , I, D 








FUNCTION MAX(X,Y) 






DONE, RES1, RES, POINT, NUMNUM, DENNUM, DOT) 






WHEN MIN(X,Y)=Y, X EXIT 






POINT: ACC, DOT: '., DONE: FALSE, 








Y 






ACC: 1/RADIXO [ACC % accuracy of resu 


It % 






ENDFUN $ % END^MAX % 






NUMNUM : DENNUM : 3 , 








% 


% 




RES: 0, D:I: 1, RES1: - (RADIX ()[ 10) , 










% 




PRINT("I'M THINKING ") 








% define a function to find the integer Part 


% 




LOOP 








% of a rational number 


% 




PRINT (DOT) 










% 




RES: RES + EVSUB (EXPR,X ,A) * D 
% 
% now, test every so often, to see if 


% 
% 






FUNCTION INT(X) 


% 








QUOTIENT (NUM(X) ,DEN(X)) 






% the series is converging or has met 


* 






ENDFUN $ % END_INT % 






% the convergence criterion 
% 

BLOCK 


% 
% 






% 


% 








% define _ the _ TRS-80 — ROM call at _ 0049H~To be 
% WtSCAN (); it waits until a key is pressed 

% 
PUTD ('WtSCAN, 73) $ 
% 


% 
% 
% 




WHEN I<3 EXIT 

WHEN INTEGER ( 1/4 ) , RES1: RES, EXIT 

WHEN INTEGER(I/2) , 








% 
% 




WHEN ABS(RES-RESl) < ACC, NEWLINEO, 










PRINT ("ACCURACY REQUIRED "), PRTMATH ( I ) 


, 






% 
% 
% 
% 
% 
% 
% 




PRINT (" ITERATIONS" ) , NEWLINEO, 










PRINT("ANSWER IS "), PRTMATH ( RES ) , 








% CALLING SEQUENCE: 




DONE: TRUE, EXIT, 
PRINT ("ITERATION *"), PRINT(I) 








% PLOT(fun, var, low, high) 
% where: 




PRINTf", CURRENT VALUE IS "), 
PRTMATH (RES) , NEWLINEO, EXIT 










ENDBLOCK 








% fun « function to be plotted 


% 




WHEN DONE, NEWLINEO, PRTMATH ( RES) , "" EXIT 
% 








% var = variable in the function 


% 




% 






% low & high are limits of the function 


% 




% now, if, after 500 terms, we haven't 


% 








% 




% gotten there, then we probably never will 


% 






% now, enter the end-of-file information 


% 
% 
% 




% 

WHEN I>500, 


% 






% 




NEWLINEO , 








STOP () S 




PRINT("DID NOT CONVERGE"), NEWLINEO, 








RDS () $ 






PRINT ("VALUE IS "), PRTMATH ( RES) , NEWLINEO 
PRINTfNUMBER OF ITERATIONS "), I EXIT, 


' 












Program Listing 6 Continues 









420 • 80 Microcomputing, June/July 1982 



















Program Listing 6 Continued 






Program Listing 9 Continued 

BLOCK 

WHEN EQ(EXP,'IT), EXP: IT EXIT 








EXPR: DIF(EXPR,X) 












I: I + 1 






ENDBLOCK 








D: D * EVSUB( (X-A)/(I-1) , X, VAL) 






WHEN MEMBER(EXP, ' (APPLE ORANGE PEAR BANANNA PLUM)), 








ENDLOOP 






IT:EXP, TRUE EXIT 








ENDFUN $ % END-FLOATTAY % 


% 




FALSE 








% 




ENDFUN S 








% CALLING SEQUENCE: 


% 




% 


% 






% FLTTAY(fun, var, exp pt, #_ofrdigits, eval pt 


% 




% OBJECT returns a non-nil value if its 


% 






% where function - the function to be evaluated 


% 




% argument can be the object of a Q or A 


% 






% accuracy ■= the number of digits desired 


% 




% 


% 






% variable = the variable of the function 


% 




FUNCTION OBJECT (EXP) 








% expansion point = the point of expansion 


% 




MEMBER(EXP, '(HOLE RED ORANGE YELLOW RIPE STEM)) 








% evaluation point = the point of evaluation 


% 




ENDFUN $ 








% of the Taylor Series 


% 




% 


% 






% for example: FLTTAY(SIN(X) ,X,0 ,10 , 5716/100) 


% 




% VERB returns a non-nil value if its 


% 






% (this particular example also requires 


% 




% argument indicates a connection between 


% 






% the trigenometric packages to be loaded) 

% 

STOP ( ) S 


% 
% 




% a subject and an object 

% 

FUNCTION VERB (EXP) 


% 
% 














RDS () 5 






MEMBER(EXP, '(IS HAS POSSESSES)) 
ENDFUN $ 
% 
% NOISE returns a non-nil value if its 


% 
% 




















% argument is an article that can be ignored 

% 

FUNCTION NOISE (EXP) 


% 
% 














FUNCTION PI(N,A,ACC,TERM,PI) 






MEMBER(EXP, '(A AN THE)) 
ENDFUN $ 
% 
% The PRSE function determines if the sentence 








PI:4 ACC: 1/RADIX()[N A:l 






% 






LOOP 

TERM: 8/(16*A[2-l) 

PI: PI-TERM 

WHEN TERM<ACC, PRINT ( "ANSWER IS " ) PI EXIT 






% 










% is a statement or a question. If it is a state- 
% ment that cannot be parsed, then an error 


% 
% 






PRINT ("ITERATION *") PRTMATH ( I ) 






% message will be displayed 

% 

FUNCTION PRSE (SENTENCE) 


% 
% 






PRINT (" VALUE =") PRTMATH (PI) NEWLINE ( ) 
A: A+l 
ENDLOOP 
ENDFUN S 
















SENTENCE: REMOVE (SENTENCE) , 












WHEN QUESTION (SENTENCE) , PRINTL2 ( ANSWER ( SENTENCE ) ) 


EXIT, 










WHEN STATEMENT ( SENTENCE) , PRINTL2 (DOIT ( SENTENCE) ) 


EXIT, 












PRINT("I CANNOT UNDERSTAND THE SENTENCE") NEWLINE () 








Program Listing 7. Pi 






ENDFUN S 

% 

% The REMOVE function removes the noise words from 


1 

% 








% the sentence. 
% 

FUNCTION REMOVE (X,Y) 
LOOP 


% 

% 






























WHEN EMPTY(X), X EXIT 














WHEN NOT(NOISE(FIRST(X)) ) , Y: LIST(FIRST (X) ) EXIT 


f 






% Hexidecimal to deciaml converter routine % 






X: REST(X) 
ENDLOOP 








% to quit, type in the word DONE % 
% % 
















LOOP 








FUNCTION HEX#TO#DEC (ORI,NUM), 






LOOP 








ORI:RADIX(), % SAVE CURRENT RADIX VALUE % 






WHEN N0T(NOISE(FIRST(X) ) ) EXIT, 








LOOP 






Xi REST(X) 








RADIX(16) , 






ENDLOOP 








PRINT(" HEX NUMBER: "), 






WHEN EMPTY (X ) , REST (REVERSE (Y) ) EXIT 








NUM:SCAN() , 






Yi ADJOIN(FIRST(X) , Y) 








WHEN NUM EQ DONE EXIT, 






X: REST(X) 








RADIX(10) , 






ENDLOOP 








PRINT ("DECIMAL EQUIVALENT: ") , 






ENDFUN S 








PRINTLINE (NUM) , 






% 


% 






ENDLOOP 






% QUESTION returns a TRUE if the sentence 


% 






RADIX(ORI), % RESTORE ORIGINAL RADIX VALUE * 






% (sans NOISE words) i6 of the form 


% 






" " i 






% VERB - SUBJECT - OBJECT 


% 






ENDFUN $ 






% 

FUNCTION QUESTION ( EXP) , 


% 






Program Listing 8. Base Conversions 






WHEN VERB (FIRST ( EXP) ) AND SUBJECT (SECOND (EXP) ) 
AND OBJECT (THIRD ( EXP) ) , TRUE EXIT 
FALSE 
ENDFUN $ 
% 
% STATEMENT returns a TRUE if the sentence 










% 
% 










% (sans NOISE words) is of the form 


% 
% 
% 










% SUBJECT - VERB - OBJECT 








FUNCTION STATEMENT (EXP) , 






Program Listing 9. Fruit 




WHEN SUBJECT(FIRST(EXP) ) AND VERB ( SECOND ( EXP) ) 
AND OBJECT (THIRD ( EXP) ) , TRUE EXIT 
FALSE 
ENDFUN $ 








% Welcome to FRUIT_WORLD ala muMATHli 


% 


% 


% 






% adapted from a similar program 


% 


% Answering a question involves looking up the 


% 






% written in RLISP by 


* 


% verb for the subject and seeing if the attached 


% 






% Dr. Jed Marti of the 


% 


% word matches the object of the question. If not, 


% 






% University of Oregon 


% 


% the answer is 'no', and the real answer is dis- 


% 








% 
% 


% displayed . If there is no word for the verb, 

% the answer is 'I don't know'. If the words match 


% 






% SUBJECT returns a non-nil value if its 


% 






» argument can be the subject of a Q or A 


% 


% the answer is 'yes 1 . 


% 






% If 'it' is used in reference to a previous 


% 


% 


% 






% subject,, then it's value (stored in the 


% 


FUNCTION ANSWER (EXP, QTY) 








% global variable 'IT') is substituted back 


% 


QTY: GET(IT, FIRST(EXP)) 








% in for the subject of the sentence. 


% 


WHEN EQ (QTY, THIRD (EXP)) 'YUP1 EXIT 








% If the 'it' is unknown, then it will be 


% 


WHEN EMPTY (QTY) "I DON'T KNOW!" EXIT 








% treated as an unknown word, and the error 


% 


LIST('N01, IT, FIRST ( EXP) , QTY) 








% message will be displayed. 


% 
% 


ENDFUN$ 

% 

% DOIT updates the programs view of the world 


% 






% 

FUNCTION SUBJECT (EXP) 




% 






Program Listing 9 Contin 


jes Program Listing 9 Con 


tinues 
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Program Listing 9 Continued 




Program Listing 10 Continued 

WHEN INTEGER(N) =FALSE, EXIT 






% It does this by putting on the property list of the % 




WHEN PRIME(N), ANS: LIST ( 1 , N) EXIT 






% subject of the verb, an assertation with a value % 




J:N, ANS:LIST( ) , B: 2 






% of the object. If an object already exists for the % 




LOOP 






% verb, a new one will not be added. % 




D:N/B 






% % 




BLOCK 






FUNCTION DOIT(L, QTY) , 




WHEN INTEGER(D)=FALSE OR PRIME ( B) =FALSE , EXIT 






QTY: GET(IT, SECOND(L)) 




WHEN INTEGER(D/B) , N:D 






WHEN EMPTY (QTY) , 




LOOP 






PUT(IT, SECOND(L), THIRD(L)), "OK" EXIT 




ANS: ADJOIN(B,ANS) 






LISTfBUT", IT, SECOND(L), QTY) 




WHEN INTEGER(N/B) =FALSE, EXIT 






ENDFUN S 




N: N/B, 






% * 




ENDLOOP, EXIT 






% PRINTL2 prints out the sentences. % 
% % 




ANS: ADJOIN(B, ANS) 








ENDBLOCK 






FUNCTION PRINTL2(EXP) , 




B: B+l 






PRINT("===> ") PRINT(EXP) NEWLINE ( ) 




WHEN B>J/2, ANS EXIT 






ENDFUN $ 

% * 

% DIALOG accepts and determines the meanings % 




ENDLOOP 








ENDFUN $ 

% * 






% of the sentences. A number of words will exit % 
% * 
FUNCTION DIALOG (X) , 




% CUBIC, solves cubic equations for roots % 








% * 
% * 






PRINT ("— WELCOME TO FRUIT WORLD — ") NEWLINE ( ) 




FUNCTION CUBIC(EXPR, Y, X, A, B, Al , Bl , P, Q, Z) 






LOOP 




R: EVSUB(EXPR, Y, 0) 






X: SCANLINEO 




Q: EVSUB(DIF(EXPR,Y) , Y, 0) 






WHEN MEMBER ( FIRST (X ) , '(END QUIT ADIOS BYE DONE EXIT)), 




P: EVSUB(DIF(DIF(EXPR,Y) , Y) , Y, 0) 






PRINT ( "GOODBYE 1 I") , EXIT 




Z: DIF(DIF(DIF(EXPR,Y) ,Y) ,Y)/6 






PRSE(X) NEWLINE () 




WHEN PRODUCT (Z) 






END LOOP 




CUBIC (EXPR/Z, Y) EXIT 






ENDFUN $ 




A: (3*Q - P[2)/3 B: (2*P[3 - 9*Q*P+27*R)/27 






% % 




Al: CUB(-B/2 + SQR(B[2/4 + A[3/27)) 






% now define the scan_a_line function % 




Bl: CUB(-B/2 - SQR(B[2/4 + A[3/27)) 






FUNCTION SCANLINE(EX,A) 




PRINTfROOT 1 = ") PRTMATH(A1+B1) , NEWLINE () , 






EX : LIST () 




PRINT ("ROOT 2=") 






LOOP 




PRTMATH(-(Al+Bl)/2+(Al-Bl)/2*SQR(-3)) , NEWLINE ( ) 






A: SCAN () 




PRINT ("ROOT 3=") 






WHEN TERMINATOR(A) , REVERSE(EX) EXIT 
EX:ADJOIN(A,EX) 




PRTMATH(-(Al+Bl)/2-(Al-Bl)/2*SQR(-3)) , NEWLINE() 
ENDFUN $ 






END LOOP 




% * 






ENDFUN $ 

% % 




% SQR(X) finds the square root of X % 
% % 
FUNCTION SQR(X) , 
XI (1/2) 

ENDPUN $ 

% * 






% % 

% now a sample conversion with fruit world % 








% the user enteries are prefaced with a "@" % 








% for ease of recognition onlyl Don't enter them % 








% 




% CUB(X) finds the cube root of X % 






@ DIALOGO; 




% * 






— WELCOME TO FRUIT WORLD — 




FUNCTION CUB(X) 






@ THE APPLE IS RED <ENTER> 




X[(l/3) 






•=»> OK 




ENDFUN $ 






& IS IT RED <ENTER> 




% % 
% * 






»-> YES 








6 HAS IT A HOLE <ENTER> 




% PI to infinite precision with FLOAT/MU % 






«=> I DON'T KNOW! 




FUNCTION PI(N,A,ACC,TERN,PI) 






§ IT HAS A HOLE <ENTER> 








-«> OK 




PI:4 ACC: 1/RADIX()[N A:l 






g THE ORANGE HAS A STEM <ENTER> 




LOOP 






- = > OK 




TERM: 8/(16*A[2-l) 






8 THE ORANGE HAS A HOLE <ENTER> 




PI: PI-TERM 






--> BUT THE ORANGE HAS STEM 




WHEN TERM < ACC, PRINT ("ANSWER IS"), PRTMATH(PI) EXIT, 






§ HAS THE ORANGE A HOLE <ENTER> 




PRINT ("ITERATION #") PRTMATH ( I ) 






--> NO THE ORANGE HAS STEM 
§ ADIOS <ENTER> 




PRINT ("VALUE =") PRTMATH (PI) NEWLINE () 
A: A+l 






GOODBYE % 




ENDLOOP 






STOP () $ 




ENDFUN $ 






RDS () $ 




% * 
% end the file with proper file-enders % 

% * 
STOPO S 














RDSO S 












Program Listing 10 


maturely terminate. The same argument 






% All programs written by Bruce Powel Douglass % 


holds for comparing the value of the term 




% presented here are submitted to the public % 


with the accuracy criterion. 




% domain and free use and distribution is % 






% granted by the author. These routines include % 


The solution was to check for con- 




% PLOT/MU, FLOATTAY/MU, CUBIC/MU, PRIME/MU % 
% and FRUIT/MU. % 


vergence every four terms. If the terms 




% % 


have not gotten smaller there is a good 




% PRIMES/MU % 


chance that the series has converged or is 




FUNCTION PRIME (N,A,B) 

WHEN N=2 OR N=3 , TRUE EXIT 


non-analytical at that point. That is per- 




WHEN INTEGER(N)=FALSE OR INTEGER ( N/2 ) , FALSE EXIT 


formed in the block in FLTTAY. When the 




A:3, B:N[(l/2) % B=SQR(N) % 
LOOP 


looping variable is divisible by four, RES1 




WHEN INTEGER(N/A) , FALSE EXIT 


is assigned the current value of the result. 




WHEN A>B, TRUE EXIT 




A:A+2 


When it is not divisible by four, but it is by 




ENDI.OOP 
ENDFUN S 


two (once every four times), the com- 




% % 


parison with RES1 and the current value 




% now the main function % 
% % 


of the result is made. The comparison with 




FUNCTION FACTORS(N,J,ANS,B,D) Pmgfam UMng w Con , jnues 


the accuracy criterion is made here as well. 
With this function you can generate 
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WAYNE GREEN INC. 

PETERBOROUGH, NEW HAMPSHIRE 03458 USA 



Winter/Spring 1982 



Dear 80 Microcomputing Subscriber: 

We are making a cover date change on 80 Microcomputing. What would have been your June 1982 issue 
will be the June/July 1982 issue. We are not combining an issue — simply changing the month listed on 
the cover. You will still get 12 issues of 80 Microcomputing in 1982 and 12 issues in 1983, and so on; and 
we will change your expiration date by adding a month (more on that later) so you don't end up short- 
changed. 

The reason for the cover date change? There has been an increasing demand for 80 Microcomputing to 
be sold on major newsstands. Because 80 Microcomputing is the last publication to be produced each 
month by the Wayne Green group it has not been getting to the newsstands on time. A complicated 
production change could have been made, but a simple cover date change will produce the same 
results — a full month's sale on the newsstand. Thus, the cover date change. 

The change has other benefits. . -you, the subscriber, will be getting your magazines well before the 
local computer stores and newsstands. I've been hearing complaints that they get it first; after the 
June/July issue they won't (although they will still receive it in the month prior to cover date). Also, 
advertisers' ads will be assured of the full month on the newsstands, in computer stores and in your 
hands. 

As I have said, you will still get 12 issues this year. 80 Microcomputing will be in your mailbox every 
month, but the one you receive in June will say June/July, the one you receive in July will say August, 
and so on. We will, however, have to change your expiration dates to make up for the missing "cover 
month" and our computer will do that all at once. Note the upper right hand corner of your address 
label now and then note it after the date change and you will see a month's difference in the date listed 
there. If such a change does not occur please write to me at 80 Pine Street, Peterborough, NH 03458, and 
I will personally see that it is changed. 

Thank you for your support of 80 Microcomputing. I hope you continue to enjoy your subscription. 



Sincerely, 



h^^\&ndni^ 



Debra L. Boudrieau 
Director of Marketing 
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From the January 1981 issue of the CSRA Computer 
Club newsletter: 

The r e was some amusement at the Novem- 
ber meeting when the Radio Shack repre- 
sentatives stated that the software in the ( 
ROM cartridges could not be copied. This 
month's 58 Micro Journal reported they had 
disassembled the programs on ROM by 
covering some of the connector pins with 
tape. They promise details next month Never 
tell a hobbyist something can't be done! This 
magazine seems to be the only source so far 
of technical informations on the TRS-80 color 
computer '". Devoted to SS-50 6800 and 
6809 machines up to now, 68 Micro Journal 
plans to include the TRS-80 6809 unit in 
future issues 



To get the MOST Iron your 6809 CPU This is ths 
BEST SOURCE! The ONLY Magazine for the 8809 
Computer Months Ahedd of Ail Others' 

68 MICRO JOURNAL 
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USA 
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•Foreign Surface Add $>2 Yr to USA Price 
foreign Air Ms-I Add $36 Yr 10 USA Price 
"Canada * Mexico Add $5.50 Yr to USA Price •"' 



C01 



mca 



Taylor series approximations to any ac- 
curacy desired, provided that muMATH 
knows the value of the function at some 
point. FLTTAY works with SIN(X) if it is ex- 
panded about the point A equals zero, 
since muMATH knows (if TRGPOS/ALG is 
loaded) that SIN(0) is zero. 

Along the same lines, Program Listing 7 
generates an infinite series of approxima- 
tions for Pi, each better than the last. 
While the algorithm converges quite 
slowly, it will eventually get as close as 
you wish to come (with 611 digits of ac- 
curacy, if you are sufficiently patient). 

The next program (see Listing 8) is 
useful for changing numbers from one 
base to another (in this case, from hexa- 
decimal to decimal). You may find this 
helpful, for example, if you have a short 
machine language program you wish to 
put into Basic Data statements. 

Parting Shot 

I'd like to present one last muMATH 
package, called FRUIT/MU (see Listing 9). 
A simple experiment in artificial intelli- 
gence, it maintains a knowledge base 
about the world it knows— the world of ap- 
ples and pears. Inform it about various 
characteristics of the fruit and it will incor- 
porate this information into its knowledge 
of the world. The driver program for this is 
DIALOG( ), and it requires no parameters 
passed. 

I like to think of a computer as a super 
pencil; it aids the user's ability to ab- 
stractly deal with the world by freeing the 
mind from drudgery and allowing the time 
and effort necessary to reach new intel- 
lectual heights. muMATH is a much 
greater tool for the manipulation of 
abstract mathematical symbols than con- 
ventional Basic or Fortran programs. 

All programs in this month's column 
are available from me on a 35-track disk 
for the marginal cost of $15— to cover 
disk, mailing, and gas to the Post Office. 
With that, you also get a text editor in both 
Basic and compiled forms. These editors 
have macro key definitions, options for in- 
serting and deleting text, and writing to a 
file readable by muMATH. If you have a 
single drive system without a single drive 
copy in your DOS, send along a minimal 
System disk. If you can take a 40-track 
single density disk, let me know. 
Bruce Powel Douglass 
1005 West Main 
Vermillion, SD57069B 

My April column incorrectly states 
that in the nerve cell, two sodiums are ex- 
changed for three potassiums. It should 
read three sodiums are exchanged for 
two potassiums. 
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SOFTWARE 


Micropro 




Wordstar 


$319 


Mailmerge 


$109 


Wordstar/Mailmerge 


$419 


Customization Notes 


$489 


Microsoft 




Basic 80 


S289 


Basic Compiler 


$329 


Fortran 80 


$349 


Cobol 80 


$579 


Data Base 




FMS80 


$649 


dBASE II 


$595 


Miscellaneous 




Computer Station 




Graphics Dump 


$39.95 


Supercalc 


$269 


APPLE SOFTWARE 


Micropro 




Wordstar 


$269 


MailMerge 


$99 


Wordstar/MailMerge 


$349 


Spellstar 


S129 


VisiCorp 




VisiCalc 


$229 


VisiTerm 


$139 


VisiDex 


S229 


VisiPlot 


$185 


VisiFile 


$229 


VisiTrend/Plot 


$275 


Miscellaneous 




Micro Coufier 


$219 


Screenwriter 


$129 


Entertainment 




Wizard and Princess 


$29 


Mystery House 


$24 


Raster Blaster 


$26 


Space Eggs 


$26 


Sargon II 


$29 


Twerps 


320 


Borg 


$28 


Castle Wolfenstein 


$27 


Beer Run 


$28 


Epoch 


$32 


Sneakers 


$27 


Midnight Magic 


S32 


Wizardry 


$45 


rime Zone 


$79 


APPLE ACCESSORIES 


Z-80 Card by Microsoft 


$299 


16K Card by Microsoft 


$159 


32K Card by Saturn. Increase your 


memory for VisiCalc 


$199 


Keyboard Enhancer II by Videx 


Si 25 



For fast delivery, send certified checks, money 
money orders, or call to arrange direct bankwire 
transfers Personal or company checks require 
one to three weeks to clear. All prices are mail 
order only and are subject to change without 
notice Call for shipping charges. 



$249 

$49 
$49 

$139 
$49 
$25 

Si 59 

by Trace Systems. Secure 



TG Game Paddles 

TG Joystick 

Keyboard Co. Numeric Keypad 

Keyboard Co. Joystick 

Sup-R-Mod 

ALF 9 Voice Board 

Station 



and protect your Apple II. $119 

Apple Interface Cards by CCS 

Parallel #7720 $119 

Centronics #7728 $115 

Serial Asynch #7710 SI 39 

Serial Synch #7712 Si 49 



DISK 



CCI lOOfor the TRS-80 Model 1 

5 1 /4" 40 track $299 

CCI 1 89 for the Zenith Z-89 

5 1 /4" 40 track $389 

Corvus 5M with Mirror $3089 

Corvus 10M with Mirror $4489 

Corvus 20M with Mirror $5429 

Corvus Interfaces Call 

DISKETTES - BOX OfTo 

Maxell 5'/4" single-side $40 

Maxell 5'A" double side $54 

Maxell 8" single side $45 

Maxell 8" double side $59 

Verbatim 5'A" $26.95 

Verbatim 8" $36 

Verbatim Datalife Head Cleaner $10 

BASF 5V4" $26.95 

BASF 8" $36 



RAM 



16KRamKit $19 

200 nano seconds 41 1 6 chips for 
TRS-80; Apple E 

Two kits S3? 

Jumpers $2.50 

COMPUTERS ~ 

Zenith Z-89 48K Call 

Zenith Z-90 64K Call 

CALL FOR PRICES ON THE 
COMPLETE ZENITH LINE OF 
COMPUTERS AND ACCESSORIES. 



Dealer (National/Interna- 
tional) Inquiries Invited. 

Send for FREE catalogue 



California Computet 

Mainframe 2200a 
Z-80CPU 2810a 
64K RAM 2065c 
Floppy Controller 2422a 
Integrated 2200 System 



$359 
$239 

$569 

$339 

$1999 



CASIO 



Pocket Computer FX702 $185 

Calculator Game Watch CA90 $49.95 

Joggers Watch J 100 $49.95 

Analogue/Digital Watch AX210 $59.95 

Scientific Calculator FX8100 $49 95 



PRINTERS 



NEC 7710 Serial 
NEC 7720 KRS 
NEC 7730 Parallel 
NEC 3510 Serial 
NEC 3515 
NEC 3530 Parallel 



S2395 
$2595 
$2395 
$1795 
$1850 
$1795 



NEC 8023 Dot Matrix Printer $565 

OLIVETTI DY 21 1 LETTER QUALITY 

DAISY WHEEL PRINTER 

Parallel Only $1395 

Universal $1595 

Epson MX-80 Call 

Epson MX-80FT Call 

Epson MX-1 00 Call 

PaperTiger 560 Call 

IDS Prism 80 Call 

IDS Prism 132 Call 

Okidata Microline 80 Call 

Okidata Microline 82A Call 

Okidata Microline 83A 1 20cps Call 

Okidata Microline 84 200cps Call 

Centronics 733 $739 

Data South 180 cps Call 

MONITORS 



Leedex 12" B& W 
Leedex 13" Color 
Sanyo 9" B & W 
Sanyo 9" Green Screen 
Sanyo 12" Green Screen 
Sanyo 12" B & W 
Sanyo 13" Color 
Zenith 13" Color 



$109 
S329 
$149 

$189 

$249 

3230 
$449 
$349 



• • • Special of the Month • • • 

Zenith 1 2" Green Screen 

$119 



TELECOMMUNICATIONS 





Prentice Star Modem 1-yr. guar. 
Novation Cat 
Novation D-Cat 
Novation Auto-Cat 
Novation Apple Cat II 
Hayes Smart Modem" 
Hayes Micro-Modem II 
Hayes Chronograph" 



-100 



5125 
$139 
$149 
$109 
$299 
$249 
$295 
$225 



TO ORDER CALL TOLL FREE 1 -800-343-6522 "" 

420-438 Rutherford Ave., Dept. K04M, Charlestown, Massachusetts 02129 




Hours: 9 AM - 9 PM (EST) Mon.-Fri. (Sat. till 7) 
Technical information call 617/242-3361 

■See List of Advertisers on page 386 



TWX- 710-348-1796 



Massachusetts Residents call 617/242-3361 
Massachusetts Residents add 5% Sales Tax 
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EDUCATION BO 



by Earl R. Savage 



"If you let an art teacher 

experiment with It, you may 

never see your computer again!" 



Let me tell you about a couple of pro- 
grams which may interest other 
teachers and students in the microcom- 
puter. 

Do you have a science-teaching col- 
league with a tentative interest in the com- 
puter? Perhaps you can "push him over 
the edge" with one of the interesting and 
useful programs from Becker Electronics, 
108 W. Franklin St., Chapel Hill, NC 27514. 

Sidereal Time is not designed as a tu- 
torial on the subject. Rather, it is a quick 
and efficient means of computing the 
sidereal time and the Julian date for any 
local time and place. New astronomy stu- 
dents can determine where to point the 
telescope for a celestial object without all 
the laborious manual computations other- 
wise required. 

The manual is built into the program 
and can be called at any time. One section 
explains in detail how each required input 
can be determined and what it means. 

Other related programs are Cloud, a tu- 
torial on cloud formation and altitude de- 
termination, and Relativity, an interesting 
treatment of time, energy, mass and so 
on. Perhaps one of your colleagues is 
looking for such an educational tool. 

Morse Code? 

Scout leaders and Radio Clubs have al- 
ways been interested in methods of teach- 
ing Morse code. Various means of learn- 
ing the code have been around for years. 
First, there was an instrument which used 
punched paper tape and later, the inked 
tape reader. Those devices keyed audio 
oscillators to produce the dits and dahs to 
be decoded by the students. Later, record- 
ed audio code was available for study on 
disk and tape. 

The problem with these methods is that 
the coded material is canned— it does not 
change from one presentation to the next. 
The student learns, after several runs, the 
order of the characters. 

This is a problem of the past witn 
presently available Morse code programs. 
Current programs produce characters 
randomly, or pre-determined characters 
are easily changed from one presentation 
to the next. 

If you are considering acquiring such a 
program, take a look at Morse Code Com- 




munications from Rogo Computer Prod- 
ucts, 4752 DeBeers Drive, El Paso, TX 
79924. This one does more than send code 
directly through an audio oscillator; it also 
copies code from any audio source. 

Your TRS-80 can be connected directly 
to the audio output of a communications 
receiver (via the cassette port). The incom- 
ing code is decoded and the characters 
are displayed on the screen as they are 
received. Once the student has his 
operating license, the same program 
enables keying his transmitter from the 
keyboard, or with messages he has stored 
in computer memory. All these features, in 
addition to code practice, cost around $20. 

For the Math/Art 
Drafting/Science Teacher 

We have all heard complaints about the 
poor resolution of Model I and III graphics. 
Although elaborate and expensive hard- 
ware fixes increase the resolution, I feel 
they are of limited value. Programs written 
for such accessories can be used only on 
machines which are similarly equipped. 

If the lack of high resolution is a prob- 
lem for you, why not strike a compromise 
and use a relatively inexpensive ap- 
proach? Dotplot-80 makes possible bar 
graphs, pie graphs, line drawings and 
computer art with a respectable 60 by 63 



dots per inch. 

Dotplot-80, Workbench Software, Box 
24497, Dayton, OH 45424, permits high 
resolution graphics with a Line Printer VII 
or VIII (or an equivalent). The maximum 
allowable plot/drawing dimensions are 
eight inches by over 500 inches. 

The program is quite versatile. In addi- 
tion to the fine resolution of the output, a 
number of built-in functions and subrou- 
tines make life easier for the user. Ref- 
erence points can be changed with little 
difficulty and scales for input values can 
be set up by the operator or computed by 
the program. Grids can be drawn automat- 
ically on command. Also, labels can be 
placed where needed and printed in any of 
four orientations: right, left, up, down. 

Built-in commands make simple or 
complex line drawings a very straight- 
forward procedure. 

There is only one problem with this pro- 
gram: If you let an art teacher experiment 
with it you may never see your com- 
puter again! 

Coming Up 

The next 80 Micro is the annual games 
issue. I'll include my opinion about the 
place of games in Computer-Assisted In- 
struction. Tune in— you may be surprised. ■ 
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Reader Service tor facing page ^272- 



Peripherals 
Unlimited.. 



FANTASTIC PRICES! 

OUR FAST SERVICE, PRODUCT 
SELECTION AND OUR CUSTOMERS' 
SATISFACTION MAKE US #1. 



ZENITH 



Z-89-48K 
Z-90-64K DO 
Z-19 Terminal 
Z-121 Monitor 12" 



$2299 

$2588 

$777 

$149 



ATARI COMPUTERS 



Atari 800 16K 

Atari 400 

Atari Interface Module 

Atari 810 Single Disk 

Atari 815 Dual Disk 

Atari 830 Modem 

Programmer 

Entertainer 

Star Raiders 

16K Mem. Exp. for Atari 

32KMem. Exp. for Atari 



$688 

$318 

$174 

$444 

TBA 

$166 

$59 

$84 

$34 

$74 

$114 



NEC PRINTERS 

771 0/30 Spinwriter R/O $2279 

7720 Spinwriter KSR $2649 

351 0/30 Spinwriter R/O $1 699 

3500 Serial Spinwriter $1 599 

NEC DOT MATRIX 

PC-8023 $474 

Call for prices on ribbons, etc. 



MORE PRINTERS 




Anadex 9500/9501 


$1295 


Anadex DP-9000 


$1049 


Okidata Microline 80A 


$339 


Okidata Microline 82A 


$474 


Okidata Microline 83A 


$724 


Tractor (OKI 80 + 82 only) 


$60 


Diablo 630 


$2044 



MONITORS 

Sanyo 12" GRN Phosphor $266 

Sanyo 12" Black + White $239 

Amdek 12" 300 GRN Phosphor $164 

Amdek 12" Color $344 

NEC 12" GRN Phosphor $164 

NEC 12" Color $344 



EPSON PRINTERS 




MX-70 

MX-80w/Graphics 

MX-80 FT (Friction + Tractor) 

MX-1 00 (15 "Carriage) 


$288 
$444 
$544 
$744 


Call for prices on 
Ribbons, Cables and Interfaces 



NEC-PC 8000 
Series Microcomputer 

PC-8001 A Computer w/32K 
PC-8012Aw/32K + Exp. Slots 
PC-8031A Dual Mini Disk 
PC-8032A Add-on Mini Disk 

Call for Software Prices 



$888 
$588 
$888 
$777 



TOLL FREE 

1-800-343-4114 



ORDERING INFORMATION 

Our order lines are open 9AM to 6PM 
EST Monday thru Friday. Phone 
orders are welcome; same day ship- 
ment on orders placed before 10AM. 
Free use of Mastercard and VISA. Per- 
sonal checks require 2 weeks 
clearance. Manufacturer's warranty 
included on all equipment. Prices sub- 
ject to revision. C.O.D.'s accepted. 



For service, quality and delivery call: 

PERIPHERALS UNLIMITED 

(617)655-7400 

62 N. Main Sf Natick, MA 01760 



^■See List ol Advertisers on page 386 
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80 Medical Opinion 



by Philip R. Mills, M.D. 



"This program is a brave attempt to 

overcome the Model I's greatest limitation — 

35-track single-density disk drives." 



If you are just beginning the computer- 
ization of your clinic, "Roll Call!" in the 
February issue of 80 Micro is must 
reading. The last sentence of the article 
should be underlined: "Somebody has to 
enjoy playing with the computer, or the 
whole project will end with the hardware 
gathering dust in a storeroom." The ex- 
perience the author describes is similar to 
our clinic's efforts to automate. 

Although every clinic is different, our 
clinic is probably representative of many 
small medical clinics. We have four physi- 
cians. One physician has computer nar- 
colepsy (yawns and falls asleep whenever 
the topic is mentioned), another has an in- 
curable case of computer hysteria (I will 
let you guess which one of our group has 
this), the other two partners lie some- 
where in between. 

From the time we purchased a com- 
puter until it was up and running for word 
processing, three months elapsed. Our 
first use of the computer for patient billing 
was disastrous. It left our billing clerk 
hesitant to ever try a computer program 
again. Like over 2,000 other clinics in 
North America, we began with Radio 
Shack's Medical Office System for the 
Model I. 

The catalog describes this program as 
"ideal for the doctor's office or small 
clinic." The response by physicians has 
been overwhelming, revealing the tremen- 
dous software market for our profession. 
Although the software package itself is 
modestly priced at $300, it is not inexpen- 
sive, however, when one considers the 
four disk drives required. Disk back-ups 
are also a significant expense with a 
minimum of 50 per year. 

Our clinic purchased one of the first 
releases. At first, our receptionist was 
eager to use the computer since she was 
very tired of the manual peg-board system 
with its time-consuming daily balances, 
obscure errors, and tedious aging of ac- 
counts. We drove 110 miles to pick the 
package up when availability was delayed 
at our local Radio Shack store. 

The program itself was originally writ- 
ten for a minicomputer, the IBM 5100, 
back in 1978 by an internist, Dr. John 
Hayes. It was upgraded (did you hear that 



IBM — upgraded!) to the Model I. Dr. 
Hayes read his first paper describing and 
demonstrating his system at the "Third 
Symposium on Computers in Medical 
Care," October 1979. 

This program is a brave attempt to over- 
come the Model I's greatest limita- 
tion— 35-track, single-density disk drives. 
Despite advertisement hype, the system 
is definitely not ideal for the clinic. In our 
clinic situation it was not even workable. 
It might be useable in a one-doctor clinic 
with a stable, small patient base, however. 
If no better equipment was available at a 
reasonable price, this package would be 
more of a consideration. At present, 
however, I do not feel that most clinics 
should be willing to put up with the in- 
conveniences of 5 1 /4-inch drives when 
hard disk and eight-inch drives are so 



'My greatest criticism 

of the program 

is in its 

editing functions. " 



superior and affordable for business use. 

Of course, it uses many disks. Without 
counting back-ups, records for one year 
require 48 transaction disks. Daily opera- 
tion requires a minimum of eight disks 
and may require as many as 13, again ex- 
clusive of back-ups. So many daily back- 
ups are required that our computer 
operator refused to back-up more than the 
two most important disks per day! 

As written, the program works with one 
40-track and three 80-track drives, but this 
provides no significant advantage. It will 
not work with two 40-track drives and two 
80-track drives because of the required 
disk swapping. The disk swapping 
necessitates absolutely perfectly aligned 
disk drives. 

The program prints a daily journal and 
health insurance claim forms very easily. 



It does not print a superbill. Monthly sum- 
maries are provided both for the individual 
physician and all the physicians. Aged ac- 
counts are available as necessary. Limit- 
ed monthly statistics for procedures and 
diagnoses are provided. Limited pass- 
word protection is optional. 

The program is written in Basic and 
runs smoothly, but slowly. Alphabetic 
sorting and printing of 709 patients took 
us 43 minutes. This presents a major prob- 
lem since sorting must be done weekly. 
Unfortunately, sorting cannot be done 
during lunch hour if the clinic has more 
than 699 patients since operator interven- 
tion is required for disk changing. Overall, 
the system is not time efficient. After one 
month's use, our office testing revealed 
that the old, manual pegboard system 
was faster. 

Record keeping is limited to one-month 
summaries. There are no provisions for 
yearly summaries. This is a stand-alone 
program and does not interface with the 
Radio Shack Model l/lll General Ledger or 
other accounting programs. 

Day-to-day routines are not difficult. A 
program entitled Run automatically 
brings up the menu from a boot. A minor ir- 
ritation for the billing clerk was the incon- 
sistency of the INKEY$ function. For 
some entries Enter is required, for other 
entries it is not. 

Old patients are handled simply. The 
account number is found in a printed 
listing. When you enter the number, the 
patient's name appears with a prompt to 
double check that this is the correct pa- 
tient. It is impossible to perform a com- 
puter search for a patient's account 
number if the account number is un- 
known, necessitating the frequent and 
time-consuming alphabetical sorting 
discussed above. Patient lists are printed 
alphabetically and inelegantly across 
three columns allowing less than 200 pa- 
tients per page. The printout is time con- 
suming. A practice of 3,000 patients 
would require 15 pages and 12 minutes us- 
ing our MX-100. There are no provisions to 
pause between pages, so a tractor or 
other similar printer drive is necessary. 

Processing new patients is awkward, 
time consuming, and requires three disk 
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ORE BYIE PER BUCK 



OUR LOW PRICES INCLUDE FREE SHIPPING 

GUARANTEED BY SIMUIEK 



COMPUTERS 




Complete MODEL Ml COMPUTER 

Model III with 48K memory, 2 disk drives, 370K storage, and ready to run 
with TRSDOS 1.3 and manual. 120 day Simutek warranty parts and labor. 
Compatible with all Radio Shack software. S1 899.99 

Model III with 48K, 2 double sided 40 track disk drives with 750K stor- 
age. Comes with NEWDOS 80 V.2 and manual. 120 day Simutek 
warranty parts and labor. Compatible with Radio Shack software. 
Complete and ready to run. S2389.99 

MODEL III FIVE MEGABYTE HARD DISK 

Comes with modified DOSPLUS. No installation required, just plug in 50 
pin bus. Complete and ready to run. $2499.99 

MODEL III INTERNAL DISK DRIVE KITS 

If you can use a phillips screwdriver, you can easily install Simutek's 
Model III disk drives and controller in less then an hour. Absolutely NO 
SOLDERING, TRACE CUTTING OR TECHNICAL KNOWLEDGE REQUIRED! 
The J & M controller is the best on the market today. We've tried others 
and found J & M's the finest and easiest to install. We warranty the J & M 
controller for 120 days against defects in workmanship. 
ONE 40 TRACK TANDON DISK DRIVE WITH 185K STORAGE, and J & M 
controller. Radio Shack DOS, manual. No soldering or trace cutting 
required. Ready to install with instructions. S619.99 

TWO 40 TRACK TANDON DISK DRIVES 370K STORAGE, with J & M con- 
troller Radio Shack DOS, manual. No soldering or trace cutting. Ready 
to install and run. instructions. $889.99 

TWO DOUBLE SIDED 40 TRACK DISK DRIVES with 750K storage and J & 
M controller. NEWDOS 80 V.2. and manual and Model III DOS. No solder- 
ing or trace cutting. Ready to install and run. Full instructions. S1299.99 



DISK DRIVES 



MODEL I DISK DRIVES 

ONE TEC DISK DRIVE 40 TRACK DISK DRIVE with 5ms track to track 

access time, with power supply chassis, extender cable and shipping 

for TRS-80. One year warranty on parts and labor. Ten day money back 

guarantee. 

Model I or III $279.00 

ONE TEAC 40 TRACK DISK DRIVE, 30 ms track to track, with P/S and 
chassis, ready to run as drive 0-4. 10 day money guarantee. One year 
warranty $279.00 

ONE TANDON 40 TRACK DISK DRIVE, 5 ms track to track, with P/S and 
chassis, ready to run as drive 0-4 or Model ill external. 10 day money 
back warranty $279.00 

ONE 2 DRIVE cable for Model I or ill. (Specify) $25.00 

ONE 4 DRIVE cablefor Model I only $35.00 



PRINTERS 

Letter quality Daisywheel 

TEC C-itoh 40 CPS Parallel $1599.99 

TEC C-itoh 40 CPS Serial $1649.99 

TEC C-itho 45 CPS Parallel $1799.99 

TEC C-itoh 45 CPS Serial $1899.99 

TEC C-itoh tractor feed $269.00 

High quality dot matrix 

TEC C-itoh PROWRITER 8510 $539.99 

Epson MX-80 $479.99 

Epson MX-80 F/T $599.99 



Epson MX-100 

Epson Graphtrax 

Malibu 200 dual mode 

Okidata microline 80 

Okidata microline 82A 

(Free tractor feed) 

Okidata microline 83A 

(Free tractor feed) 

Okidata microline 84 $1269.99 

(Free tractor feed) 



$799.99 

$89.99 

$2695.99 

$369.99 

$599.99 

$799.99 



SOFTWARE.ETC. 



16K MEMORY SET SPECIAL 

$17.89 with instructions for MOD 
warranty 200 NS 



Color 4K, Apple, Exidy, one year 
$17.89 



MODEL I. Ill SOFTWARE 

LDOS 

NEWDOS 80 Ver. 2.0 

DOSPLUS. ..NEW VERSION! $139.95 

DISK HOLDER 5-1/4 $21.95 

PERCOM'S DOUBLER II and Doub- 
leDOS. The best and easiest to install. 
Double density mod for Model I. $159. 95 

BOOKS 

MICROSOFT BASIC DECODED AND OTHER MYSTERIES.. 

TRS-80 DISK AND OTHER MYSTERIES 

BASIC FASTER AND BETTER 

CUSTOM TRS-80 




$21.95 



...$29.95 
..$22.50 
...$29.95 
.$2995 




SIMUTEK 



SUPER MODEM 

ESI Lynx smart modem for MOD I or III. 
Does not require RS-232. Auto an- 
swer/dial. Complete with terminal AND 
host programs $279.95 

Stop those headaches and eye strain! 
ZENITH GREEN SCREEN MONITOR and 
TRS-80 CABLE $149.00 



HAS BEEN SATISFYING CUSTOMERS 
NATIONWIDE FOR THREE YEARS 



IF NOT FULLY SATISFIED WITH ANY HARDWARE FOR ANY REASON, 
RETURN WITHIN TEN DAYS FOR A FULL REFUND OR EXCHANGE. Sorry, 
no refunds on software. 

QUESTIONS? WE KNOW TRS-80S CALL OUR TECHNICAL HOTLINE FOR 
QUICK AND PROFESSIONAL ANSWERS. (602) 323-9391 

ORDERS RECEIVED TODAY ARE SHIPPED TOMORROW. IF AN ITEM IS 
TEMPORARILY OUT OF STOCK YOU ARE NOT CHARGED UNTIL IT IS 
SHIPPED. 

USE OUR DIME TO ORDER TOLL FREE. (ORDERS ONLY) 

(800) 528-1149 

FREE SHIPPING ON ALL ORDERS!! 
C.O.D.'S OVER $200 REQUIRE 10% DE- 
POSIT ALL C.O.D.'S WILL REQUIRE CASH 
OR CERTIFIED CHECK FOR PAYMENT. 
WE ACCEPT AMERICAN EXPRESS, VISA 
and MASTERCARD, NO SURCHARGE 
FOR CREDIT CARD ORDERS! 
SORRY, PERSONAL CHECKS REQUIRE 
4-5 WEEKS TO CLEAR. 



SIMUTEK COMPUTER PRODUCTS INC. 




Printer Cable for Expansion interface or Model III computer $29.95 



4897 E. SPEEDWAY, TUCSON, ARIZONA 85712 
(602) 323-9391 (800) 528-1149 

TRS-80 IS A TM OF RADIO SHACK, A TANDY CORP. 
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changes. It was designed to be done at 
the end of every day. In our clinic this was 
an unreasonable restriction. Much of our 
work is emergency and referral. Through- 
out the day we see new patient work-ins. 
We cannot use a program that does not 
allow us to easily add new patients. I 
suspect that few clinics will be able to 
tolerate the system's patient entry. There 
are no provisions for making the patient's 
account number correspond with his 
clinic number. New patient accounts are 
entered sequentially. The program fails to 
prompt for the first available account 
number, so this number must be recorded 
manually (usually on scraps of paper that 
will clutter the desk and be frequently 
misplaced). This number must then be 
entered manually at the start of any new 
patient account processing. Our billing 
clerk found this to be a great irritation. The 
amount of space for the patient's street 
address is limited, and abbreviations are 
almost always necessary. Only one phone 
number can be entered. 

Standard patient visit charges are 
entered easily. Two hundred standard 
diagnostic and therapeutic procedures 



Head Cleaning 
Diskettes 




Not ye! 

available for 

Vydec, Burroughs 

Mini-Disk II, or 96 TPI drives. 

Keep your diskette drive 
heads "Computer Room 
Clean" with Scotch® Head 
Cleaning Diskettes. You 
can clean the heads your- 
self in just 30 seconds and 
save on service calls, data 
drop-outs, costly down 
time. Available in 8-inch 
and 5'/4-inch sizes. 




Amflex Products 
& Services 

WORD AND DATA PROCESSING PRODUCTS 

P.O. Box 852, Adrian, Ml 49221 

Telephone: 517-423-7112 



are available by number. This is far too 
few for an orthopedic or similar type of 
practice which has many different x-rays, 
casts, and so on for office procedures. It 
may be a reasonable number for other 
types of practices, but it is amazing how 
quickly lab, x-rays and supplies surpass 
the 200 limit. No provision has been made 
to allow modification to standard charges 
unless the charge is entered as a non- 
standard procedure. Non-standard pro- 
cedures can be entered, but no record of 
the actual procedure is saved on disk. 

A sequential list of procedures may be 
printed at any time. There are no provi- 
sions for printing this list in alphabetical 
order. There are no provisions to separate 
the procedures into natural divisions such 
as P.T., x-ray and lab. The entry of any new 
procedure suffers from the lack of prompt- 
ing for the first available procedure 
number. Like patient account numbers, 
this must be recorded manually. 

Two hundred of the more common diag- 
noses of a clinic can be coded for fast en- 
try. This feature was too limited to be of 
great value in our practice and generally 
the diagnosis was entered manually. In 
time we may have used it more had we 
continued using the package. 

My greatest criticism of the program is 
in its editing functions. It is time consum- 
ing and awkward. A very simple editing 
change may take four minutes. More com- 
plicated editing may take far longer. Some 
changes necessitate rebooting. 

The cleverest part of the program is its 
date entry. After using it, every other date 
entry method seems archaic. To ap- 
preciate it you must try it on the Model I. 
May 6, 1982 would be entered as 050682. 
While the numbers are being entered the 
program supplies the slashes to read on 
the screen 05/06/82. Error trapping is pro- 
vided. Should you enter 05/32/82, the 
screen will show 06/01/82. 

Limited month-end statistics are pro- 
vided for examining which procedure and 
diagnosis was most commonly per- 
formed. Printouts for each physician's 
charges are available by day or summar- 
ized. One cannot obtain categorical sta- 
tistics for P.T., x-ray, and so forth. There 
are no options to evaluate the average 
cost per diagnosis, cost per patient, or 
average number of patients per day. 

Billing is done monthly. The program 
provides for the option to print the clinic's 
name and address if these are not 
preprinted on the statements. The clinic 
or practice name is limited to 20 
characters, so for many practices ab- 
breviations will be necessary. 

We found one bug in the program. The 
transaction list would not update the date 



when all transactions were printed. Radio 
Shack is aware of the problem and by the 
time this is published a correction patch 
will probably be available. 

The Medical Office System comes with 
nine disks. Two were confusingly 
mislabeled as "Stored Transaction" 
rather than the correct "Sorted Transac- 
tion." I assumed incorrectly from the 
labels that these were back-ups. Despite 
the large number of disks required, there 
is no automatic format or back-up func- 
tion. The set-up routine also failed to pro- 
vide a formatting routine. 

The documentation is adequate but not 
excellent, failing to meet the special 
needs of either the nervous, beginning 
secretary or the advanced programmer. 
Although there is no index, the table of 
contents is sufficient. 

For the beginner the documentation 
fails to emphasize the importance of disk 
back-ups. Nowhere does the documenta- 
tion make clear which disks need this 
back-up and how often. We learned only 
by experience that the verify disk does not 
need a back-up, for example. 

The documentation also refers the user 
to the computer manual for disk back-up 
and formatting instruction. Do not try 
handing the computer manual to the 
secretary for these instructions. We 
photocopied the appropriate pages and 
placed them in the manual for ease of 
reference. 

For the advanced user the manual fails 
to include suggestions for program 
modification. For example, it should state 
where the printer modules are located so 
any special printer features can be easily 
used if desired. 

An oversight which should be corrected 
is the failure to provide a utility for 
transferring your patient files to the Model 
II should you desire to upgrade. It will be 
necessary to reenter all our patient data. 
Windham Software's Medical Office 
System for the Model II reportedly will pro- 
vide such a utility. A full review of this 
package will be given in a few months. 

A final flaw in the program is the 
nightmare necessary to install the system 
in the clinic. It took us a month, and much 
overtime. The patient entry does not lend 
itself to gradual changeover. 

I dislike having to write unfavorable 
reviews of software. I do not wish to 
discredit Radio Shack or Dr. Hayes. I am 
pleased that efforts are being made to ad- 
dress the needs of physicians. Unfor- 
tunately, the present package cannot sur- 
mount the 5 1 /4-inch disk drive limitation. 

Next month we will look at Charles 
Mann's patient billing program for the 
Model l/lll. Until then...B 
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BELIEVE IT OR NOT WE'VE ADDED MORE 
NEW FEATURES to the ONLY INTERACTIVE 
BASIC COMPILER for the TRS-80I 

1 . Speed increases of 10-100 times are typical after compilation. 

2. Compiled code can be RLLOCATED to run anywhere in memory. 
Code is even ROMable! 

3. ZBASIC 2.2 NOW SUPPORTS BOTH RANDOM and 
SEQUENTIAL DISK I/O 

4. ZBASIC 2.2 is now a super tool for business programmers: 
RANDOM ACCESS FILES, and PRINT USING statements are 
supported as well as a HIGH PRECISION MATH package (with 
no rounding problems). 

5. Special BUILT-IN MACHINE LANGUAGE COMMANDS to 

increase program operation by as much as 1 000 timesl Special 
commands are implemented for fast memory searching (CPDR, 

CPIR) block memory moves (LDIR LDDR], inputting and printing 
HEX numbers, inserting MACHINE LANGUAGE into COMPILED 
CODE, disabling and enabling interrupts, inverting memory, 16 bit 
PEEKs and POKEs, and stack control, debug and much more. 

6. ZBASIC 2.2 compiles the ENTIRE PROGRAM into to Z-80 
machine language. [Not 8080 cc de or a combination of BASIC and 
machine language like some other compilers.) Clumsy LINKING 
LOADERS, and RUNTIME MODULES are not needed; ZBASIC 2.2 
creates a ready to run MACHINF LANGUAGE program. 

7. NO ROYALTIES imposed on registered ZBASIC owners. 

8. Typical COMPILATION TIME is TWO SECONDS for a 
4K program. 

9. Use TRS-80 Basic to write ZBASIC programs! 

1 0, Compile many existing programs with only minor changes. 
(Some BASIC programming experience is required.) 
I 1 . Fully compatible with both the Model I and the Model III. Mod I 
compiled programs work on a MODEL III. and visa-versa ZBASIC 
works with NEWDOS-80, NFWDOS+, DOSPLUS, LDOS, MULTIDOS, 
ULTRADOS, TRSDOS etc 

1 2. BUILT-IN and much improved MUSIC and SOUND EFFECTS 
commands. 

1 3. Improved CHAINING for disk users. 

14. TIMES now available on DISK version. 

1 5. ZBASIC 2.2 now has an INPUT @ command (similar to PRINT @). 

1 6. The TAB function will now tab 255 columns on a printer (BASIC 
cannot tab past column 64 | 

1 7 NEWDOS 80 2.0 USERS can use the CMD "dos command" 

function! 

I 8 NEW and EASIER to use USR COMMANDS. 

1 9. New math functions to calculate XQR and INTEGER 

REMAINDERS 

20 Logical STRING COMPARISONS are now supported. 

21. The disk commands INSTR, MID S ASSIGNMENT are now 
supported on both DISK AND TAPE ZBASJC. 

22. DEFSTR is now supported. 

23. Eight disk files may be opened simultaneously, random, 
sequential or mixed. 

24. LINE INPUT#, is now supported 

25. Invoke the compiler by simply hitting these two keys: " :-" 

26. NEW 100+ PAGE MANUAL WITH DESCRIPTIONS AND 
EXAMPLE 

27. ZBASIC 2.2 Comes with CMDFILE/CMD program from 
MISOSYS, to allow appending or merging compiled programs and 
machine language programs from tape or disk. 



s-See List of Advertisers on page 386 
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ZBASIC 2.2 DOES NOT SUPPORT THESE 
BASIC COMMANDS: 

I ATN, EXP, COS, SIN, LOG, TAN, and exponentiation. (However, 
subroutines are included in the manual for these functions.) 

2. ERROR, ON ERROR GOTO, ERL, ERR RESUME 

3. No direct commands like AUTO, EDIT, LIST, LLIST ETC, although 
these commands may be used when writing programs 

4. Others NOT supported: CDBL, CINT. CSNG, DEFFN, FIX, FRE. 

5. Normal CASSETTE I/O. (ZBASIC supports it's own SPECIAL 
CASSETTE I/O statements.) 

6 SOME BASIC COMMANDS MAY DIFFER lr\J ZBASIC. For 
instance, END jumps to DOS READY, STOPjumps to BASIC 
READY etc. 

7. MEMORY REQUIREMENTS: to approximate the largest BASIC 
program that can be compiled in your machine (at one time), enter 
BASIC and type: PRINT (MEM-65001/2. Remember, you can merge 
compiled programs together to fill memory 

ZBASIC 2.2 SPEED COMPARISON DEMO 

To help give you an idea how fast compiled programs are, we have 

included this demo program: 

ZBASIC 2.2 DEMO PROGRAM 

Time to compile and run complete program :0MIN. 2 SEC. 

BASIC Execution speed MOD 1 , LEVEL II : 7 MIN. 34 SEC. 

ZBASIC Execution speed MOD I , LEVEL II :0 MIN. 1 8 SEC. 

BASIC Program size (WITHOUT VARIABLES! ■ 895 BYTES 

ZBASIC Program size (WITHOUT VARIABLES) : 2733 BYTES 
(Remember that the ZBASIC program includes an 1879 byte sub- 
routine pac kage.) Program shown exactly as compiled and run in 
BASK and ZBASIC 

10 <========» ZBASIC 2.2 EXAMPLE PROGRAM OND TIME TEST======== 

20 CLS:CLEOR100:DEFINT 0-X:DEFSTR Z:DIM 00 (64, 24) , Z (50) : RONDOM 
30 OA=100:BB=-1000:CC=3:DD=-3:r£F = -9999:ST*="STORT TIME "+TIME* 
40 FOR I=1T0127STEP2 :FOR J = 47T01 STEP-3 : X X = PO I NT < I , J ) : SET ( I , J ) 
5C XX=(I-J)/CC»(7+I+J) :XX=0BS(INT(RND(I»J)-ftfi)+7) i RESET (I, J) 
60 XX=PEEK(I+J) : POKE 15360* I «- J, J :0UT255, J OND ( 3*J) : XX = INP ( I ) 
70 AB*=STR*(I»J> :Bfi*=LEFT*<flB«,2> :00 ( 1/2, J/2) =VOL (BO*) «-00«3 
80 BO* -B04 + RIGHT* (BOS, RND (3) ) :XX=INSTR(1, BO*, "9") :XX=SQRU»J> 
90 B0*=MID*(B0*,2, 2) : MID* (BO*, 1 , 1 ) =Z : IF XX THEN 100 ELSE CLS 
100 IF LEN(BA*>>3 OR SGN(XX)=1 OND 0SC(B0*)=32 THEN PRINT" + + •► , ' ; 
110 IFPOS(0)>62 THEN TRON : TROFF : PRI NT ELSE XX=NOT ( RND (99) ) +100 
120 Q*=INKEY*:IF 0*="Y" OR 0*="y" AND I>120 THEN PRINT"TRUE. . " 
130 RESTORE : REODO, C, Z ( J ) , D : GOSUB1 70 : GOSUB1 70 : GOSUB170 : GOTO210 
140 NEXT :PRINT"*"; :NEXTI : CLS : PR I NT35 1 2, ST*, "STOP TIME ";TIME* 
150 STOP' ============== END OF MAIN TEST LOOP ========»—=■===» 

1 60 DOTfi 12345,-1," TEST " , -9999 

170 ON RND (6) GOTO 180,190,200,180,190,200 

180 RETURN 

190 RETURN 

200 RETURN 

210 ON RND (9) GOSUB 180,190,200,180,190,200,180,190,200 

. :;, ."'0 GOTO140 

NOTICE ZBASIC 2.0 OWNERS: you can upgrade your ZBASIC 2.0 for no charge. 
Just send u.s your original diskette/cassette and a S.A.S.E with your registered 

serial number and copy of your invoice We will send you ZBASIC 2 2 and 

updates to your manual. 

VISA, MASTERCARD, AMERICAN EXPRESS, C.O.D. ORDERS ONLY. 

800 528-1 149 order line 

ZBASIC 2 2 DISK VERSION AND MANUAL 89 95 

ZBASIC 2 2 TAPE VERSION AND MANUAL ?9.95 

ZBASIC 2 2 DISK & JAPE VERSION AND MANUAL 99 99 

MANUAL ONLY... (APPLIES TO PURCHASE) 25 00 

il&iii'!¥K rilllPIITFR PRIIIIIIPTC SUP 

TECHNICAL QUESTIONS PLEASE CALL (602) 323-9391 
4897 E. SPEEDWAY, TUCSON, ARIZONA 85712 ^ 12 

TRS-80 is tm of Radio Shack, a Tandy Corp. 
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PMC Peripherals 



QUALITY, DELIVERY AND 





Price $495 for 2 



Yes, our disk drive has a proven per- 
formance and an established reliability 
record. We specialize in single sided 
5V4 inch single or double density drives 
featuring 5 ms stepping and 40 tracks 
with case and power supply. The case is 
color matched to IBM and PMC per- 
sonal computers. 



Compare printer specifications . . . 
compare design reliability, repairability 
or any other parameter! Our DMP-85 is 
a true "work-alike" to C. Itoh 8510 or 
NEC 8023 and offers many more fea- 
tures than the MX-80FT at a lower 
price. You need excellent printers and a 
professional supplier. Come to PMC. 




Price $495 




IBM Selectrics or similar typewriters 
become 12 cps letter-quality printers at 
a quarter the cost of "daisy wheel" 
printers. The ETF-80 coupled with a 
word processor becomes your personal 
typist accurately reproducing text at 
100 wpm. What a bargain, ETF-80 . . . 
CALL now for details. 



Price $495 



PMC peripherals are designed for PMC, IBM, Apple, Radio Shack or other fine per- 
sonal computers. We don't advertise our unprintable dealer /distributor prices but if 
you call or write you'll find we don't meet the competition . . . we make it! 



IWMW^ 1 Personal Micro Computers, Inc 

M 1 W M ^^ 475 Ellis Street, Mountain View, CA 94043 * (415) 962-022 



without 
printer 



$999 

(fc^|/|QE^ with printer or 




typewriter interface 




WORD PROCESSOR g££@g&» 

Lowest priced combination word processor /microcomputer that everyone can afford and so 
simple that anyone can use! The EPS-80 is a word processor designed to replace typewriters as 
a personal tool and also to be used as a popular personal computer with thousands of pro- 
grams available. 



Use without a printer 

In an office environment, the EPS-80 word processor 
gives the user editing power which is not available in the 
latest electronic typewriters. The built-in high speed 
cassette storage achieves inexpensive and reliable 
transfer of text from one EPS-80 to another. Therefore, 
where multiple EPS-80s are used, not every one has to 
have its own printer. For instance, a single letter quality 
printer on one EPS-80 can prepare final copies of letters 
for four to ten non-printer stations. The overall system is 
efficient, costs less per station than an equal number of 
electronic typewriters, and provides much higher 
throughput. There is no need for the usual cycle of dicta- 
tion, correction and proofreading as the basic compos- 
ing function can be in the hands of the originator. 



Use with a printer 



Writers, students and businessmen will find the most 
intelligent investment is the EPS-80. For high speed 
printing, we offer our model DMP-85 dot matrix printer 
and for letter quality printing, our Electric Typing Fin- 
gers. Model ETF-80, turns your IBM Selectric or similar 
typewriter into a printer. When you buy the EPS-80, you 
get both a word processor and a powerful personal com- 
puter that will do many necessary tasks. There are fully 
proven computer programs for invoicing, billing, finan- 
cial or engineering analysis, spreadsheet calculations, | 
and many more. Even if you never utilize the computer 
capability, the EPS-80 word processor can provide filing 
and retreival of reference information and mail list han- 
dling in addition to fulfilling normal typing needs. 



How can we offer a product with so much capability at such a low price? It is due to our highly 
reliable, low cost cassette storage system that performs as well as many floppy disk systems! 
We believe the EPS-80 is an immediately important tool in small and large offices and it is also 
destined to be your personal typing friend at home. If you think word processing and low cost 
computing power would improve the jobs you do, call or write now for complete information. 



PMC is licensed to use Electric Pencil, a copyright of Michael Shrayer. 



PJWif 1 Personal Micro Computers, Inc. 

M 1 W M ^* 475 Ellis Street, Mountain View, CA 94043 * (415) 962-0220 
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by Art Huston 



Coming soon — games, games, games! 



In August we will publish our 
largest annual games issue 
yet! This issue will have every- 
thing—adventures, real-time 
space games, card games and 
much more. In short, August will 
be a blockbuster. 

To make room for all this ex- 
citement, we are expanding the 
August Load 80 to two tapes 
and two disks. So ordering Load 
80 for August will bring you 
twice the fun and excitement of 
any other month. 



Of course, we have to change 
prices to provide all this. The 
cassettes will cost $17.97 and 
the disks $29.97, still outstand- 
ing deals. These price changes 
are for August only. 

All Load 80 subscribers will 
receive the first tape or disk, 
along with a special coupon. 
Send us the coupon along with 
$5.97 (cassette) or $8.97 (disk) 
and we will ship the second 
Load 80 recording immediately. 

Your chance to get in on the 





June/July Load 80 Directory 




Program 


Title 


Page 


Comments 


1 


SMPLZAP1 


232 


Needs EDTASM 


2 


SMPLZAP2 


232 


Needs EDTASM 


3 


SMPLZAP3 


232 


Needs EDTASM 


4 


SURVEY 


248 


None 


5 


QUESTION 


248 


None 


6 


LOADFILE 


248 


None 


7 


PPREDICT 


272 


None 


8 


DIRECTRY 


288 


None 


9 


AIRTRAVL 


300 


None 


10 


LEARNA 


326 


None 


11 


MERLIN 


330 


None 


12 


PROJCAL 


348 


None 



fun is coming up soon — don't 
miss it! 

Color Computer users stay 
tuned. We will have the first Col- 
or Load 80 before the year is out. 

Compatibility 

From time to time we all come 
across a program that will not 
work. A bug may be the problem, 
but it is very likely that the pro- 
gram is not compatible with 
your machine. 

There are two types of incom- 
patibility. Loading incompata- 
bility simply means that the 
data on the tape or disk was not 
designed to load into your ma- 
chine. The Models I and III will 
read Load 80 tape and disk 
files— the Color Computer will 
not. Running incompatability 
means that the program will not 
execute correctly in your 
machine. 

Here are some things which 
can cause a program to work in 
one machine and not another: 

• The program uses a ma- 
chine-language routine which 
calls ROM routines. If the pro- 
gram was written on a Model I it 



may not work on a Model III, and 
vice versa. 

• The program uses a lot of 
memory and will not run on 16K 
cassette systems, or on 32K 
disk systems. 

• The program uses disk 
commands which are not avail- 
able under cassette Basic. 

When you are having trouble 
with a program, first decide if it 
was meant to run on your sys- 
tem. If you get into trouble, read 
the Key Box. If that doesn't 
work, read the article carefully 
and scan the listing. You may 
find that the program simply 
wasn't meant to run in your 
machine. 

Errata 

The programs PERSPECT, 
FORE and TESTFILE were left 
off the May Load 80 cassette 
because of space limitations. 
They will not be included on any 
future Load 80. 

The program "Financial Wiz- 
ard" from page 326 of the May 
issue accidentally appeared 
with the Load 80 logo. It cannot 
be included because it is written 
to the Model II. ■ 
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ELECT 

AND SAME-DAY SHIPPING 

US COMPETITIVE. 

OUR PEOPLE MANE US EXPERTS. 



Red Baron. 
Home of the Nation's Largest Computer Printer Inventory. 



NEC 8023 

Outstanding Graphics, Print 
Quality & Performance 




144 x 160 dots/inch • Proportional Spacing 

• Lower case descenders • N x 9 dot matrix 

• 8 character sizes • 5 unique alphabets 

• Greek character set • Graphic symbols 

• 100 CPS print speed • Bi-directional logic- 
seeking • Adjustable tractors • Single-sheet 
friction feed • Vertical & horizontal tabbing 

NEC 8023 CPoll 

Dot Matrix List $795 pUdll 

Televideo CRT's 

Price, Performance & Reliability 

910 List $699 $600 

925 List $995 $750 

950 List $1195 $970 



IDS Paper Tiger 
Prism 80/132 

Affordable Color, Speed 




Dot Resolution Graphics • 9-wire staggered 
printhead • Lowerqase decertders • Over 
150 CPS • Bi-directional, logic-seeking 

• 8 character sizes • 80-132 columns 

• Hi-res dot graphics • Proportional spacing 

• Text justifications • Optional C6lor 

Prices Begin Al 

Prism 80 List $999 $700 

Prism 132 List $2095 $1 895 



NEC Spinwriter 
7700 & 3500 

Daisy Wheel Quality Leader 




High speed, letter quality • 55/35 CPS 
• Typewriter quality • Bi-directional printing 
& proportional spacing • Quiet • OCR quality 
print • Hi-res plotting/graphing • Quick change 
ribbon • Optional cut-sheet feeder, horizontal 
or bidirectional tractors • Prints up to 8 copies. 
NEC Spinwriter RO 

Serial Parallel 77xx . . . . List S3055 $2575 
35xx List $2290 $1975 



The Epson Series 

High-Quality Printers 
at a Low Price. 



The Okidata Series 

Hi-Res & TRS 80 Block Graphics 



Other Quality Printers 
at Red Baron 

List Discount 

Anadex 9501 $1650 $1300 

C.ltoh 8510 Prowriter $795 SCall 

C Itoh Starwriter $1895 SCall 

C. Itoh F-10 $1995 SCall 

Diablo 630/6 $2995 $2570 

QUME Sprint 9/45 $2475 $2150 



Interface Equipment 

Complete Stock of Options. 
Cables and Accessories. 

GRAPPLER APPLE INTERFACE $1 

CCS APPLE SERIAL Interface & Cable . $1 
ORANGE INTERFACE for Apple II 

Parallel Interface Board and Cable . . $1 
NOVATION D-CAT 

direct connect modem $1 

COMPLETE STOCK OF EPSON 

ACCESSORIES . $C 

CUSTOM PRINTER CABLES FOR Apple, 

Atari, IBM, TRS-80 (all models) $C 

HAYES MICROMODEM S3 

PRINTER STANDS: Large S 

Small S 





Epson MX80 List $645 

Free Graftrax £f»«|| 

Epson MX80FT List $745 Ql/dl 

MX100 List $995 

Full Line of Epson Acessories. 



120 CPS • 9 x 9 Matrix • Bidirectional logic 
seeking printing • Lower case descenders 
• Four print styles • Optional Hi-Res Graphics 

Okidata 82A List $649 $480 

Okidata 83A List $995 $745 

Tractor Option $65 




Our People, Our Product: 
Both Are Specialized. 

Red Baron is an organization of compu- 
ter printer specialists. They know the 
capabilities of each printer, and how to 
match one to your exact need. Call for 
expert consultation today! 



Here's How To Order 

Phone orders are welcome; same-day ship- 
ment on orders placed before 11:00 a.m. Free 
use of MasterCard and Visa. COD's accepted. 
Personal checks require 2 weeks clearance. 
Manufacturer's warranty included on all 
equipment. Prices subject to revision. 

Call For Free Catalog: 

1-800-854-8275 



CA, AK, HI (714) 630-3322 



Member Better Business Bureau 




1100N.TUSTIN 
ANAHEIM, CA 92806 



©1982 Red Baron Computer Products 



NEW PRODUCTS 



Edited by Steven Frann 



"A.C.E. Smartmodem software features 

the ability to write your messages 

during the day and send them at night." 



A.C.E. Smartmodem 
Software 

You can receive and transmit ASCII 
files from your completely unattended 
computer system with the Automated 
Communication Exchange Smart- 
modem software. This software fea- 
tures the ability to write your mes- 
sages during the day and send them at 
night when the telephone rates are 
lowest and computer systems are 
least busy. You can set the A.C.E. soft- 
ware to communicate with many differ- 
ent types of computer systems. 

The A.C.E. software has host and 
terminal capabilities to support the 
auto dial and auto answer features of 
the Hayes Stack Smartmodem. The 
software supports uploading and 
downloading from host and terminal 
modes. This eliminates the need for 
any alien terminal programs and 
makes the A.C.E. program a stand- 
alone datacomm system. 

The software is written exclusively 
for the Hayes Stack Smartmodem and 
48K Models I and III with disk. The 
A.C.E. Smartmodem software retails 
for$79. For additional information con- 
tact A.C.E. Computer Products, 1640 




A.C.E. Smartmodem software 

N.W. 3rd St., Deerfield Beach, FL 
33441, (305) 427-1257. For orders only 
call 1-(800)-327-2283. 
Reader Service ^550 



Goodies for Your 
Cassette System 

LIICOS, Level II Cassette Operating Sys- 
tem ($34.95), provides up to 17 times faster 
operating throughput for Basic data files. It 
adds new and modified commands to Level 
II Basic (DEFM OPEN# PRINT# CLOSE). 

Textl, a 16K Level II word processor 
($44.95), provides 192 lines (4-8) pages 
of in-memory text editing. It features full 
cursor control, imbedded printer control, 
compressed data storage, insert, delete 
and move lines, insert and delete charac- 
ters, restart procedure, variable line size, 
and more. 

BAUD20 is a set of high speed (2000 
baud) tape routines for the Model I Level II 
computer. These routines are RAM resi- 
dent and require no modification or addi- 



tion to the hardware. Memory requirement 
is about 130 bytes. They are an optional 
part of the LIICOS and Textl systems for 
$10 or you may purchase them as a stand- 
alone system for use in Assembly lan- 
guage programs or in standard Basic pro- 
grams via USR calls. Price for the stand- 
alone package is $19.95. 

For additional information contact Can- 
ty and Associates, 8909 Bellington Road, 
Pensacola, FL 32504. 

Reader Service ^579 



CP/M 2.2 Technical Support 

Digital Research's Technical Support 
group has compiled a set of CP/M 2.2 
patches and application notes. The notes 



include information on "using PIP with 
XSUB," "auto loading programs," "making 
delete (rubout) work like backspace," 
"improving the Control-S function," and 
"nested submit files." 

Copies of the notes are available to 
registered CP/M users who write to CP/M 
2.2 Application Notes, Technical Support, 
Digital Research, P.O. Box 579, Pacific 
Grove, CA 93950. Requests must be written 
and include the user's CP/M License 
Number. CP/M users who have not sent in 
their registration cards can include them. 

Reader Service ^-566 



Circus Adventure 

Circus Adventure is a game written espe- 
cially for children. The player moves 
through various locations at the circus to 
find the popcorn stand. On the way he 
meets many characters or gets to special 
places. Surprises are scattered along the 
route. The game includes graphics and 
songs throughout. The average playing 
time is 10 minutes and every player even- 
tually wins. 

Circus Adventure provides a positive ap- 
proach to introducing children to comput- 
ers. No "instant death" or horrible happen- 
ings are in the game. 

Priced at $10, Circus Adventure is avail- 
able for 16K Color Computers from Com- 
puter Island, 227 Hampton Green, Staten 
Island, NY 10312. 

Reader Service ^591 



Disk Fixer 

Disk is a disk examination and modifi- 
cation utility program for the Model I. This 
program allows access to any data on a 
TRSDOS compatible disk by either the 
filespec or track and sector access meth- 
ods. A full screen editor allows you to 
display and edit the disk data in either 
ASCII or hex formats. The program is com- 
pletely menu driven. It is written in Z80 
Assembly language for the fastest possi- 
ble execution. 

The program lets you build and main- 
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tain test files during the debugging phase 
of program development, examine dam- 
aged disk files, and even make repairs to 
damaged disk directories. 

Disk is available from Clockwork Soft- 
ware, P.O. Box 704, Colorado Springs, CO 
80901, for $25, shipping and handling in- 
cluded. 

Reader Service ^583 



Computerized Encyclopedia 

Moses Engineering's 48 cassette Com- 
puterized Encyclopedia for TRS-80 Color 
Computers (16K) actively involve you in the 
learning process. Sight, sound, the written 
word and your responses increase learning 
rates over conventional encyclopedias. 
The computer checks if you have learned 
the message and lets you know if you 
have it right. 

Each cassette is an 8K computer program 
written in Basic so that most users can ap- 
ply them to classroom as well as home uses. 

The encyclopedia cover more than 500 
topics including aardvark, abacus, account- 
ing, algebra, biology, physics, optics, and 
states. 

The encyclopedia is $200 postpaid. For a 
sample send $4 for cassette 1 to Moses En- 
gineering, Rt. 7, Greenville, SC 29609. 

Reader Service ^-578 



Echo-80 Speech 
Synthesizer 

The Echo-80 speech synthesizer for the 
Models I and III uses a combination of 
phoneme synthesis and LPC technology, 
pioneered by Texas Instruments. It offers an 
unlimited vocabulary. 

The Textalker speech generator, stan- 
dard with the Echo-80 speech synthesizer, 
translates normal English text to speech 
automatically; the speakeasy phoneme 
generator, also supplied, allows the user 
to code words phonetically. 

Priced at $295, it is available from Street 
Electronics Corporation, 3152 E. La Palma 
Ave., Suite D, Anaheim, CA 92806, (714) 
632-9950. 

Reader Service ^577 



Datasaver Provides 
Backup Power 

Datasaver protects against unexpected 
power failures or surges that can cause 
many systems to fail. 




Cuesta Systems' Datasaver 



The 200-Watt Datasaver provides con- 
tinuously filtered ac power from a single 
US standard (NEMA 5-15R) output recep- 
tacle located on its rear panel. At full 
power, the unit supports most systems for 
2-5 minutes, with a range of 15-30 
minutes at half-power in blackout or 
brownout conditions. 

It can power any load up to 200 Watts, 
including units with switching, linear or 
ferroresonant power supplies. Its preci- 
sion 0.1 percent crystal frequency stan- 
dard allows real-time power sensing and 
prevents video jitter. 

The Datasaver includes a rechargeable 
sealed battery, automatic battery charger, 
solid state power inverter, AC line voltage 



monitor and cutout switch, front panel 
power status LED and an alarm buzzer to 
warn of line power losses. 

Datasaver is offered in two different 
models, for domestic ($695) and interna- 
tional ($730) use. For more information, 
contact Dave Dickey, President, Cuesta 
Systems Inc., 3440 Roberto Court, San 
Luis Obispo, CA 93401, (805) 541-4160. 

Reader Service ^572 



Bulk Disk Eraser 

The National Institute for Rehabilitation 
Engineering is offering a compact, reliable, 




Echo-80 
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Dynabyte Model 5605 



non-electric bulk disk eraser for 5 1 /4-inch 
and 8-inch disks. The non-breakable, long- 
lasting eraser consists of a wooden handle 
with an attached permanent magnet also 
of unbreakable material. Handicapped 
workers make the erasers in two sizes, 
one for 5 1 /4-inch disks and the other for 
8-inch disks. 

To obtain your non-electric disk eraser, 
send a tax-deductible $5 donation to NIRE, 
97 Decker Road, Butler, NJ 07405. Include 
your name and address and a note indicat- 
ing the correct eraser size. 

Reader Service ^571 



Model III Programming 
and Applications 

TRS-80 Model III: Programming and Ap- 
plications provides beginners with all the 
information they need to know about the 
Model III, from turning it on to program- 
ming. It offers a complete introduction to 
Basic, Level II Basic, and Disk Basic, plus 
a comprehensive range of practical ap- 
plications for a totally hands-on approach 
ideal for high school and college com- 
puter literacy courses. 

In addition the book offers extensive, 
practical real-life applications and dem- 
onstrates how to program for mailing and 
telephone lists, data filing, inventory, 
payroll, word processing and graphics. It 
also includes tutorial style questions in 
each section and surveys state-of-the-art 
software and peripheral devices. 

Priced at $12.95, it is available from 
Robert J. Brady Co., Bowie, MD 20715, 
1-(800)-638-0220. 

Reader Service ^585 



Multiuser Micro 

The 5605 multiuser microcomputer 
from Dynabyte is aimed at the small busi- 
ness marketplace. It supports up to eight 
users and 16 printers, and provides up to 
19MB of on-line storage integrated with 
an eight-inch disk drive (IBM-compatible). 

The 5605 combines the highest capaci- 
ty 5'/4-inch Winchester disk drive avail- 
able today in capacities of either 6, 12 or 
19MB, with eight-inch disk storage of .8 or 
1.6MB, depending on the single or double- 
sided version. 

The 5605 runs under CP/M, MP/M or the 
OASIS operating system. Languages in- 
clude Basic, Cobol, Fortran, Pascal and 
PL/I. A wide variety of applications pro- 
grams are also available. 

The 5605-A1 with 6MB of hard disk 
capacity has a domestic list price of 
$7295, while the 5605-B2 12MB version 
sells for $7995 and the 5605-C2 19MB for 
$8995. For more information contact 
Dynabyte, 521 Cottonwood Drive, 
Milpitas, CA 95035. 

Reader Service ^565 



/ Speak Basic 

I Speak Basic is a field-tested computer 
literacy course that requires no previous 
computer experience on the teacher's 
part. This machine-specific text in- 
troduces students to Basic language pro- 
gramming and the operation of a TRS-80 
microcomputer. 

/ Speak Basic has been designed to 
meet students' needs. The program's core 
is the Student Text which features learn- 
ing objectives for each unit, definitions 
and examples of key terms and assign- 



ments. The Teacher's Manual contains 
suggestions for implementing the course 
and annotations to aid the teacher in 
lesson planning. Answers to all exercises 
and quizzes are provided. The Exam Set 
on spirit duplicating masters checks stu- 
dent understanding and reinforces key 
concepts. 

The classroom version of / Speak Basic 
contains a Teacher's Manual, 20 Student 
Texts and one exam set and sells for 
$156.25. For more information and prices 
for individual texts contact Hayden Book 
Company Inc., 50 Essex St., Rochelle 
Park, NJ 07662, (800) 631-0856. 

Reader Service 1^552 



Your Family Tree 

Your Family Tree is a genealogy pro- 
gram for the Models I and III microcom- 
puters. 

It quickly and easily sets up a data base 
to hold pertinent information about each 
ancestor, including name, date and place 
of birth, marriage and death information, 
plus a comment line. Access to informa- 
tion in Your Family Tree is virtually 
unlimited, with full search capabilities on 
any key field using full or partial infor- 
mation. 

Your Family Tree is available on 
cassette (16K) or disk (32K) for $29.95. For 
more information contact Acorn Software 
Products Inc., 634 North Carolina Ave., 
S.E., Washington, DC 20003, (202) 
544-4259. 

Reader Service ^587 




440 • 80 Microcomputing, June/July 1982 



We're not soft on software 

Data resources continues it commitment to professional quality TRS-80® 
software with the Silver Edition Software Series. . . selected programs from 
talented and popular authors. 



New from Data Resources 

On-Line ordering System 

Data Resources Corporation 
now sponsors an electronic 
message system with on-line 
electronic ordering, Forum - 
80 #2™ of Denver, Colorado 
is available 24 hours daily at 
303/399-8858 providing ac- 
cess to latest information 
concerning specials, prices, 
and products for the TRS-80 
disk user, 

Enter the (L)OCAL features 
list to place orders, ask ques- 
tions, give feedback about 
products and services. In ad- 
dition, you will find some 
great entertainment, down- 
loading and information files. 



ANSWER $249.00 

By NABS 

Answer. . .a new type of information or- 
ganizer. Utilizing the directory principle, 
Answer solves information problems by 
creating simple forms enabling you to put 
information where it should be or in many 
different places at the same time. 
Answer. . Jets you organize almost any 
type of information in many different se- 
quences and lets each information group 
grow to almost any size. It is able to 
connect the information on hundreds of 
diskettes. You can solve many problems 
yourself. . .without programming skills. 

• Split screen design 

• Multiple records on screen 

• On-screen form creation 

• Multi-level menu driven 

• Compound data base 

• Variable length random access 

• 25 Key fields plus, . . 

• Supports 1-4 diskette drives 

• Interactive editing 

• Record lock-out 

• All keys equal. 



INTERACTIVE BUSINESS 
SYSTEM INVENTORY CONTROL 

By Tom Williams 

The interactive system for inventory control 
offers the small manufacturing business 
savings in the thousands of dollars in re- 
duced staff and accounting costs. Here's 
how it works, , . 

When an invoice is typed: 

• the customer's name and both ad- 
dresses are obtained from the CUSTOM- 
ER LIST file. 

• the company data is obtained from 
the COMPANY DATA file. 

• the product data is retrieved from the 
INVENTORY CONTROL file, 

• the INVENTORY CONTROL DATA file is 
updated by the invoice. 

• the SALES DATA file is updated by the 
invoice. 

• the invoice is automatically entered in 
the ACCOUNTS RECEIVABLE file. 

The results are: the invoice is typed, cus- 
tomer data is gathered, items purchased 
are listed, multiples extended, invoice to- 
talled, discounts computed, shipping costs 
added, interest added for late payers and 
data is entered in inventory control, sales 
data file and in accounts receivable. . .in 
about 50 seconds withoul mathematical 
or posting error. 
For Model I or III $500.00 

B.T. ENTERPRISES 
UNITERM/80 

By Pete Roberts 

This is the state-of-the-art in communica- 
tions software. It configures itself for either 
Model I or Model III and can be used with 
any standard modem, both RS-232 and 
Bus-Decoding. Especially designed to use 
the extended commands in NEWDOS/80, 
but fully compatible with all major DOS 
systems. 
For Model I and III $89.00 

THE FLOPPY DOCTOR 

By Dave Stambaugh 
FLOPPY DISK/MEMORY DIAGNOSTIC pro- 
grams are designed to thoroughly check 
out the two most trouble prone sections of 
the TRS-80, the disk system (controller and 
drives) and the memory arrays. 

MODEL I $24.95 

MODEL III $29.95 

SPECIAL 

AIDS III Super systems 

AIDS III & CALCS III & MERGE III 

MODEL I or III $99.95 

AIDS III & CALCS IV & MERGE III 

MODEL I or III $109.95 



MODEL 1 

DOUBLE DENSITY PACKAGE 

Newdos/80 Version 2.0 

with the LNDOUBLER $219.95 

with the LNDOUBLER 5/8 $249.95 

Dosplus Version 3.4 

with LNDOUBLER $169.95 

with LNDOUBLER 5/8 $199.95 

Everything you need to convert your TRS- 
80 Model 1. to run double density. Com- 
plete with software, hardware, and instruc- 
tions, installs in minutes with no soldering, 
wiring or cutting. 

LNDOUBLER alone $139.95 

LNDOUBLER 5/8 $169,95 

The LNDOUBLER is the most reliable double 
density modification known to Data Re- 
sources for the Model 1, The 5/8 version 
albws mixing and matching 5%" drives 
and 8" drives. 

NEWDOS/80 Version 2.0 
for MODEL I and III 

The hottest Disk Operating System is now 
available in its latest version. This isthe ONE 
from Apparat. Inc., the people whose sys- 
tems have made the TRS-80 the reliable 
computer $149,00 

DOSPLUS 

For MODEL 1 $99.95 

DOSPLUS gives you more of what you buy 
an operating system for. Speed and relia- 
bility without sacrificing simplicity and 
power. If you need extra power without 
extra wait, then you need DOSPLUS! 



8 



Data 
Resources 

304 Elati 

Denver, CO 80223 
(303) 698-1263 -15 



To order call toll free. 

(800) 525-8394 

Mastercard and Visa welcome 
Checks - COD - Money Orders also 

accepted 
Orders shipped UPS free. 

Colorado residents add 6V2 per 

cent sales tax 
Attractive discounts to dealers 



- 1982 Data Resources Corp. 

TRS-80 IS A TRADEMARK OF TANDY 
CORP. 



Prices in effect June 1 to Jury 1, 1982 
and subject to changes. 



it 



You Don't Have to be 
to Give Your TRS-80 

Just Pick Up 

WINCHESTER 

TRS 

ADD 6.3 MEG TO 38 

VR Data has grown with the 
microcomputer industry for over 
ten years. 

We've based our success on 
producing quality products, always 
on the leading edge of the 
technological revolution. 
Our designs are tested, re-tested, 
and "burned in." We are so sure of 
our quality control, we offer you a 
120 day warranty including full 
coverage of parts and labor. 



Ii 






Warren G. Rosenkranz 

President VR Data Corporation 

since 1972 




master charge 



data 



777 Henderson Boulevard N-B 
Folcrofi, PA 19032 (215) 461-5300 



ALL VR DATA PRODUCTS CARRY A 120-DAY 

WARRANTY INCLUDING PARTS & LABOR 

Published prices reflect cash discount. All prices are subject to 
change without notice. TRS-80 and TRSDOS are trademarks of 
Tandy Corp. DISK III is a trademark of VR Data Corp. 

All VR Data products are available through computer stores— Ask for them by name. 
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Call Toil-Free 

800-345-81 02 

in PA 215-461-5300 

8:30AM-7PM E.S.T. Mon.-Fri., Sat. 10AM-3PM 
CABLE "VRDATA" TELEX 845-124 

Phone or write to order direct, or for name of your 
nearest dealer. 

If you don't see it advertised call us and ask for it. 



a Genius, or Croesus, 
Additional Capabilities, 
the Phone* warren rosenkranz, 



PRESIDENT OF VR DATA 



HARD DISK FOR 
-80™ 

MEGTOYOURTRS-80 

VR DATA WINCHESTER HD 
SUBSYSTEM FEATURES: 

• TRSDOS Compatible Operating System 

• State-of-the-Art Circuitry 

• Full Calibration, Test and Burn-in 

• Up to 4 drive configuration 

• Heavy duty Power supplies 

• Warranty— 120 days — parts & labor 

• 115/230 VAC, 50/60 Hz. 

6.3 MEGABYTE WINCHESTER 
(external) HARD DISK SUBSYSTEM 
With Chassis, ^AQAP 
PS, DOSPLUS JpfcOwO 

Optional Winchester 
Subsystem Configurations: 

9.5 MEGABYTE $3695 



19.0 MEGABYTE 
2x6.3 meg drives 
2 x 9.5 meg drives 
2x 19.0 meg drives 
MODI Adaptor 
IBM-PC Adaptor 



MODEL III 
COMMUNICATIONS 



$4295 
$4695 
$5395 
$6795 
$250 
$250 



VR-RS232C $90.00 
Direct Replacement For 
R.S. RS232, Fully Tested 
& Burned-ln, Easy 
Installation, 120 Day 
Warranty. Programmable 
Pinout, Prototype Area 



D-CON $299 

Integral Modem, 

NEEDS NO RS232— Direct 

Connect, Programmable 

Dialing, AUTO 

ANSWER/ORIGINATE, 

Easy Installation 



DISK III 

100% Compatible 

COMPARE AND SAVE 

Model III Disks 

Complete Business System includes: 
48K TRS-80™ Model III, Disk III™ 
-2 Drive System, 
TRSDOS and Manual 



DISK III Single drive assy.' 

DISK III Two drive assy. 

DISK III Assy, w/out drives 

TRSDOS™ & Manual 

DOSPLUS 

LDOS 

External drives (3/4) 

40tk 2 sided floppy (optional) 
80tk 1 sided floppy (optional) 
80tk 2 sided floppy (optional) 



$1882 

$599 

$864.00 

$435.00 

$21.90 

$149.00 

$129.00 

$275.00 

add $120.00 
add $120.00 
add $240.00 



'DISK III single drive assembly includes: one 40 track 5Vt" double 
density drive, power supply, controller, mounting hardware, 
applicable cables, and manual. 

VR Data's DISK III features: 

• Completely compatible with TRSDOS 

• State-of-the-art circuitry 

• Fully tested, calibrated & burned-in 

• Up to 4 drive configuration 

• Warranty 120 days— 100% parts and labor 

• Installation with simple hand tools 

• Optional 80 tk and 2 sided drives 

• READ 40— Pgm. to read 40 tk. Diskettes on 
80 tk. Drives $25.00 



All VR Data products are available through computer stores— Ask for them by name. 



MODEL l/lll 








Other Products 


Peripherals 




External Drive 




Epson MX-80 w/GRAPHTR AX 


$475.00 


w/PS & ENC $275 


DISK & MYSTERIES BOOK $22.50 
BASIC & MYSTERIES BOOK 29.95 


Epson MX-80FT 
Epson MX- 100 


575.00 
750.00 




NEC Ribbons (min. 6) 5.95 


CENTRONICS 704 


1749.00 


Fully Compatible, 120 day warranty, 


C Itoh Ribbons 5.95 


CITOHF-1040cps 


1695.00 


Easy installation 


Epson Ribbons— MX-80 12.50 


Tractor 


200.00 


80 tk or 2 sided $395.00 


LDOS Operating System 129.00 


Printer cables 


25.00 


80tk&2sided $525.00 


DOSPLUS Operating System 149.00 


LEXICON MODEM 


125.00 



80 Microcomputing, June/July 1982 • 443 



NEW PRO! 




Percom Hard Disk System 



DECO Winchester Disk Sub-System 



Percom Hard Disk System 

Percom Data Company is now offering 
a 5'/4-inch Winchester disk system that 
may be interfaced directly to the Model III. 

The system— dubbed the PHD because 
of its smart controller— is ready now in 5 
and 10-megabyte versions. 

Prices start at $2495 for a complete 
system which includes one Winchester 
drive, the smart microprocessor con- 
troller, the system power supply and an 
enclosure. 

An optional double-density floppy disk 
controller is availabie for floppy disk 
backup. 

For more information contact Percom 
Data Company Inc., 11220 Pagemill Road, 
Dallas, TX 75243, (214) 340-7081. 

Reader Service ^563 



Business Manager's Guide 
to Successful Computers 

The non-technical business manager 
can learn about computers with The 
Business Guide to Successful and Prof- 
itable Computers, a three-volume ref- 
erence set written in layman's terms. It 
provides business managers with the 
tools for successfully selecting, imple- 
menting and managing a computer. All 
three volumes, priced at $49.95, provide 
managers with a low risk, objective 
learning environment. 

This Guide presents a comprehensive 
view of computers, complete from a basic 
introduction to computer concepts, all the 
way to managing the computer after in- 
stallation. Secondly, a case study is used 
throughout so the business manager can 



see the techniques and concepts dis- 
cussed in action. He can then adapt them 
to his particular situation. Thirdly, the 
business user's viewpoint is maintained 
throughout the three volumes. The vol- 
umes describe the effect of each step, 
based on the potential benefit or risk it 
can bring to the business. 

For more information, contact: 
ProCompIt, 300 East Huntland Drive, 
Suite 116, Austin, TX 78752, (512)451-5660. 

Reader Service ^560 



C Compiler 

Intersoft Unlimited's new small C Com- 
piler (V2.5) features conditional compila- 
tion, assignment operators, conditional 
assignments, the comma operator, dy- 
namic storage allocation, argv and argc, 
complete command line parsing, com- 
plete I/O redirection, and improved error 
messages. It produces Assembly code as 
output to allow for modifications (if re- 
quired) to time critical processes. 

The C Compiler is for use with 48K, one 
disk drive Model I or III computers. Priced 
at $100, it is available from Intersoft 
Unlimited, Box 383, Station C, Kitchener- 
Waterloo, Ontario, Canada N2G 3Y9. 

Reader Service ^553 



Winchester Disk 
Sub-System 

DECO Computer Products Inc. is making 
available a Winchester Disk Sub-System 
with removable cartridge and fixed media 
disks for the Models I. II and III. The sub- 



system integrates the Data Peripherals 
Lynx Drive, and eight-inch, 10.6 megabyte 
(formatted) ANSI accepted removable car- 
tridge with Quantum's 2000 series of fixed 
media drives. This combination provides 
on-line storage capabilities with built-in, re- 
movable back-up. Storage capacities of 
10.6-137.8 megabytes are available in vari- 
ous increments. 

The basic sub-system provides a Shu- 
gart Associates Standard Interface. The 
sub-systems available for the TRS-80 com- 
puters include the necessary software and 
hardware interfaces. 

Pricing for the sub-systems starts at 
$4,875 with OEM and dealer discounts 
available. For more information contact 
Jim Fluck, DECO Computer Products Inc., 
780 Trimble Road. Suite 207. San Jose. CA 
95131,(408)262-1594. 

Reader Service ^576 



Super Operating Systems 

PENDOS and DOSMOD are TRSDOS 
2.3 operating system enhancement pro- 
grams. These programs virtually eliminate 
typing when working in the DOS environ- 
ment. With these programs, you can copy, 
kill, list or print any non-passworded file in 
your system without typing a single com- 
mand or filespec. However, you must type 
passwords to access passworded files. 

With PENDOS you select the desired 
DOS commands or filespecs with a light 
pen by touching the spot of light on the 
display corresponding to the function 
desired. With DOSMOD you select the 
commands or filespecs by positioning a 
blinking cursor adjacent to the desired 
function and pressing the Enter key. 
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These programs were designed as new 
overlays to DOS as opposed to high 
memory resident routines. This avoids un- 
wanted interaction with other programs. 
These programs will not conflict with any 
other programs that start at 5200H or 
higher. They will work with all memory 
sizes of TRS-80S. 

These programs are available from 
Clockwork Software, P.O. Box 704, Col- 
orado Springs, CO 80901 , for $25 shipping 
and handling included. The light pen re- 
quired for operation of PENDOS is also 
available for $25. 

Reader Service ^558 



Pocketlnfo 

Pocketlnfo Corp. is making available a 
catalog of pocket computer programs for 
the Radio Shack, Sharp PC-1211 and Casio 
FX-702P pocket computers. These pro- 
grams are for a variety of applications in- 
cluding creative financing, investment 
guide for common stocks and options, 
small business sales and inventory control, 
decision making tools, game scoring, and 
copyfitting estimation. 

The catalogued programs are profes- 
sionally written and well documented. 
Pocketlnfo evaluates all programs prior to 
inclusion in the catalog. A telephone hot 
line for questions is available. 

For additional information contact Pock- 
etlnfo Corp., 7795 S.W. 184th St., Beaver- 
ton, OR 97007, (503) 649-8145. 

Reader Service ^575 



Hi-Resolution Plotting 

The Grafpac-80 brings high-resolution 
graphics to the Model I and III running 
under CP/M or TRSDOS. High level com- 
mands include: circle, ellipse, plot absolute 
and relative, move absolute and relative, 
pen up/down, character string plotting with 
rotation, size control, and left or right justi- 
fication, grid drawing, as well as two and 
3D line drawing modes to owners of x,y 
plotters or Epson MX-80s with Graftrax. 

Grafpac-80 does not reside in memory 
with the user program, but instead, passes 
commands and data via disk files thereby 
giving all of memory to the user program. 
Ready to use programs are provided for pie 
and bar chart generation as well as stan- 
dard graphs. These programs take their in- 
put from either disk data files or the system 
console. Programming examples are pro- 
vided in Basic, Pascal, Fortran, and Assem- 
bly language. Several map, picture, and 
math-function files are also provided. 




Sweet Talker 



Grafpac-80 requires 48K and is priced at 
$29.95 for TRSDOS and $49.95 for CP/M. 
For details contact M.E.S.O, Parkhurst 
Drive, Salisbury, MD 21801, (301) 742-7333. 

Reader Service ^581 



Super Color Writer 

The Super Color Writer is a word pro- 
cessing system written in machine lan- 
guage for the Color Computer. The system 
works with any printer including the LP VII 
and VIII, and gives the user complete con- 
trol of all print parameters and printer func- 
tions. 

The Super Color Writer features a video 
text window, phosphor green screen ap- 
pearance, choice of display colors, key- 
beep, 20 programmable keys, left and right 
justification, and the ability to embed con- 
trol codes within justified text. 

The Super Color Writer is available in 
three versions: tape for $49.95, ROMPAK 
for $74.95 and disk for $99.95. All versions 
work in 16K and 32K computers. The ROM- 
PAK works in 4K computers as well. 

The Super Color Writer is available 
through Nelson Software Systems, P.O. 
Box 19096, Minneapolis, MN 55419. 

Reader Service ^590 



Sweet Talker 

Sweet Talker provides a simple means 
of adding speech to a computer. It 
features the Votrax SC-01A phonetic 



speech synthesizer chip which requires 
less than 100 bits per second for con- 
tinuous speech. The Sweet Talker speaks 
64 phonemes with four levels of inflection 
and includes an onboard audio amplifier 
and volume control. An optional ($35) soft- 
ware package contains a 6502 based text- 
to-speech algorithm with patches to Basic 
or machine language programs, allowing 
any word or phrase that is printed to be 
spoken. 

Model ST-01 ($139) interfaces to the 
TRS-80 computer. For more information 
and installation requirements contact 
Micromint Inc., 917 Midway, Woodmere, 
NY 11598,(516)374-6793. 

Reader Service ^561 



Fixed Assets System 

Occupational Computing Company's 
Fixed Assets System for the Model II 
allows five methods of depreciation, in- 
cluding the new accelerated cost recovery 
system (ACRS) contained in the Economic 
Recovery Tax Act of 1981. It records and 
produces three sets of depreciation for- 
mats (federal tax, state tax, and financial 
statements purposes), handles 13 ac- 
counting periods, tracks investment tax 
credits and bonus depreciation. 

OCC Fixed Assets System will prepare 
the following reports: asset file listing in 
three formats, fixed asset analysis by lo- 
cation, fixed asset analysis by type, 
fixed asset depreciation computation 
and trial update, lifetime depreciation 
calculations, type file listing, location 
code listing, override file listing. 
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OCC Fixed Assets System automatical- 
ly interfaces to OCC General Ledger by 
creating necessary journal entries. 

The system sells for $495. For more in- 
formation contact Occupational Com- 
puting Company Inc., 22311 Ventura Blvd., 
Suite 123, Woodland Hills, CA91364, (213) 
999-1919. 

Reader Service ^557 



Resume Referral Service 
Using Voice Synthesis 

Softwork Voyce provides pushbutton 
telephone accessible placement, match- 
ing and forwarding of software profes- 
sional's resumes using synthesized 
speech technology. The robot creates a 
prospective employee's resume accord- 
ing to his pushbutton responses to the 
robot's questions free of charge. Like- 
wise, employers can specify their unique 
requirements for programmers, technical 
writers, computer operators, and DP man- 
agers for part time, full time, temporary, or 
freelance (consultants). Both employers 
and employees can call the robot at (617) 
497-2323. 

For more information contact Softwork 
Voyce, PO Box 800, Cambridge, MA 02139, 
(617)497-2322. 

Reader Service ^-562 



Compu-Log 

Compu-Log is a fully computerized log- 
ging system for the amateur radio oper- 
ator. It provides a printed, scored and 
duped log, complete with dupe sheet. You 
can print confirmation of contacts on ad- 
dress labels in alphabetical order by call 
sign for attachment to your QSL cards. In 
addition, you can print many valuable con- 
test and operator statistics including 
number of contacts each hour on each 
band, and total contacts for each country 
on each band. For multi-operator stations, 
Compu-Log gives you a breakdown of the 
total operating time, indicating number of 
contacts, duplicates and contact rate for 
each operator on each band, and it prints 
cumulative totals. 

Compu-Log is available for the Model I 
with 48K, at least one disk drive, and the 
Epson MX-80 printer. Modified versions 
for other printers and the TRS-80 Model III 
can be created. 

Versions of Compu-Log for the CQ 
World Wide DX Contest and ARRL DX con- 
test are available now. Other versions for 
the CQ WPX and IARU Radiosport con- 
tests will follow shortly. 



Compu-Log is available for $69.95 per 
package from Contest Software, Peter 
Chamalian, W1RM, Savarese Lane, Burl- 
ington, CT 06013. 

Reader Service ^-559 



Windham Newsletter 

Windham Software Inc., manufacturer of 
microcomputer software for the medical 
and dental fields, is issuing a monthly 
newsletter to keep system users up to date 
and answer their questions. It also pro- 
vides information for potential buyers. The 
four page newsletter, edited by John R. 
Hayes, M.D., president of Windham, is rou- 
tinely sent to purchasers of the MOS-2 
medical system or the DOS-2 dental pack- 
age, both designed to be used with Model II 
computers. 

For more information write Windham 
Software, 29/31 Ivanhill St., Willimantic, CT. 

Reader Service ^569 




Hypergate Centurion 

Hypergate Centurion 
and Hypergate Patrol 

Hypergate Centurion is a sophisti- 
cated, real-time simulation requiring 
learned mental skills of decision and 
judgement. It features fast real-time ac- 
tion with efficient machine code, a cast of 
50 different objects, dazzling explosion 
scenes, action sounds and graphics, four 
skill levels, from trainee to master, five 
quarrelsome alliances and a detailed 
32-page instruction manual. 

Hypergate Patrol is a one player, stop 
action strategy simulation, written in 
Basic. It uses a machine language sub- 
routine for the explosion scenes and 
sound effects. It features action sounds 
and graphics, four weapon types and nu- 



merous command options and many com- 
bat and navigational aids. 

These games are compatible with 16K 
Model I and III microcomputers. Disk com- 
patible versions are also available. Both 
games are sold as a set on one cassette 
tape for $39.95. They may be purchased at 
software retail stores or from Synergistic 
Solar Inc., P.O. Box 560595, Miami, FL 
33156. 



Hobbyist's Guide to 

Computer Speech 

Recognition and Synthesis 

Any hobbyist or experimenter can give 
his personal computer a voice, teach it how 
to use it, and get it to recognize and act on 
voice commands. Teaching Your Computer 
to Talk gives you the information you need 
to know to do this. Readers need to know 
only how to operate and program a small 
computer. The manual begins with the very 
basics of speech fundamentals and fol- 
lows with interfacing, talking data bases, 
suppliers and practical applications. 

The book is priced at $15.95 for the hard- 
bound edition and $8.95 for paperback. 
You can obtain more information by con- 
tacting TAB Books Inc., Blue Ridge Sum- 
mit, PA 17214, (714)794-2191. 

Reader Service ^-588 



Super Business Data Base 

Super, a new business data base for 
CP/M and all TRS-80s, features fast set- 
up, transaction posting, stored 
arithmetic, calculated fields, multi-disk 
operation, full disk sort on up to 40 fields, 
label printing, and user-defined reports. 
Also you can reformat and transfer data 
between data bases. 

Production input eliminates repetitive 
keying. A universal selection routine com- 
pares fields, finds key words and selects 
ranges. Special features support inven- 
tory and complex accounting applica- 
tions. Priced at $250 for the TRS-80 ver- 
sions and $300 for the CP/M version, 
Super is available from the Institute for 
Scientific Analysis Inc., P.O. Box 7186, 
Wilmington, DE 19803, (215) 358-3735. 

Reader Service .^589 



Basic/Z 

Basic/Z is a hardware independent, 
native code compiler for the CP/M 
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Your best clients count on you for their 
best tax alternatives. 

Month in and month out, not just 
during tax season, our TAXPLAN 
software package for the TRS-80 * 
makes those time-consuming, repetitive 
computations a snap. It's the most 
comprehensive and sophisticated tax 
estimator ever offered. 

FIVE YEAR TAX PLANNING 

You can enter or change one or more 
figures in seconds, literally. And your tax 
strategy for a full five years can include: 

• Rate schedule tax 

• Income averaging 

• Alternative tax 

• Minimum/maximum tax 

• Alternative minimum tax 

• Self-employment tax 



If you are an accountant, tax preparer, 
attorney, investor, loan specialist, or just 
a businessman who wants to see his tax 
options, your answer is TAXPLAN. From 
the company that has developed the only 
tax preparation software that really 
works: Contract Services Associates. 

TAXPLAN is ready to run on your 
TRS-80 Models I, II, or III, for a modest 
$249.95. [Only $149.95 to registered 
users of our full tax system.] 

Don't wait. Contact us today for the 
outstanding TAXPLAN software package. 

Contract Services Associates 

706 South Euclid, Anaheim, CA 92802, 
Telephone: [714] 635-4055 

-"-TRS-80 is a trademark a< Tandy Corp. 
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operating system. It features absolute 
cursor addressing (for the screen and 
printer), reverse video, blinking fields, 
erase to end-line and end-screen, clear 
screen, and more. 

Basic/Z supports sequential files with 
read/write capability allowing you to ex- 
tend or truncate the file without having to 
copy the entire file. It also provides two 
forms of random files for indexed or ran- 
dom access or both. This package also in- 
cludes a full function program editor, with 
advanced features such as global search 
and change, 15 local edit commands, and 
complete syntax testing as you type. 

Basic/Z requires CP/M Rev. 2.x and a 
console device with an addressable cur- 
sor. Price for the system including the 
Run/Z run-time package is $345. Price for 
the run-time package alone is $65. For 
more information contact System/Z Inc., 
P.O. Box 11, Richton Park, IL 60471, (312) 
481-8085. 

Reader Service ^582 



Video Text Editor 

MR EDit, a video text editor for CP/M and 
MP/M users, offers many advanced fea- 
tures, including: Cursor movement by char- 
acter, word, line and screen; deletion by 
character, word or line in any direction; ex- 
tensive search and replace capabilities; 
paste buffer manipulation commands; and 
user-defined command keys. 

MR EDit will run on a 20K transient pro- 
gram area CP/M or MP/M system which has 
a CRT with at least 12 lines of 64 or more 
characters. 

MR EDit is available on either 8-inch 
single density or popular 5 1 /4-inch soft sec- 
tored floppy disks. The price is $90 includ- 
ing the user's manual. The manual alone is 
priced at $12.50 and is refundable upon 
order. 

For more information contact Micro Re- 
sources Corporation, 6922 Harding Road, 
Suite 117B, Nashville, TN 37221. 

Reader Service ^592 



Dairy Cattle 
Least-Cost Ration Program 

With the Dairy Cattle Least-Cost Ration 
Program the dairyman can formulate 
least-cost rations for any type of dairy 
animal. A ration is selected based on 
weight (900-1550 lbs.) and milk produc- 
tion (18-78 lbs.), or on class of nonlac- 
tating animal. The program contains all 
221 feeds, 26 nutrients, and nine rations 
listed in the 1978 "Nutrient Requirements 



of Dairy Cattle," and contains 84 blank 
places for adding feeds and 28 places for 
adding nutrients, at the user's discretion. 
The least-cost formulation is based on the 
ration and a feed list which may contain 
up to 50 feeds with their restrictions (max- 
ima and minima) and can easily be 
changed to suit the user. 

Dairy Cattle Least-Cost Ration Program 
comes with a 30-day money-back guaran- 
tee. It is priced at $249.95 for the Models I 
and III versions and $295.00 for the CP/M 
version, and is available from Agricultural 
Software Consultants, 1706 Santa Fe, 
Kingsville, TX, (512) 595-1937. 

Reader Service ^584 



General 
Accounting Systems 

Small Business Systems Group Inc. has 
completed a major new release (Version 
5.0) of its General Accounting Package for 
TRS-80 Models I, II and III. The package in- 
cludes general ledger, accounts payable, 
accounts receivable, payroll, order entry 
and inventory control. 

Using some or all of these modules, the 
user may configure his own system. The 
SBSG CONFIG program supports any com- 
bination of disks in single or double den- 
sity, including hard disks for up to eight 
drives (0-7). This feature is very useful on 
systems where the disk address is above 3 
or when there are different drive sizes in- 
cluding double density. Additionally, the 
user may define the degree of coordination 
and control the number of records and file 
placement. Release 5.0 for floppy systems 
provides for up to 1500 records in any file 
with inventory sizes up to 32766 records. 

The Model I and Model III versions are 
the same. If you buy a Model I version of the 
General Accounting system and later up- 
grade to a Model III, the same programs 
and data will work on your Model III. 

Version 6.0 of the General Accounting 
system is for hard disk systems only. This 
version will support up to 10,000 records in 
all systems except Inventory, where you 
can have up to 32,766 records (about 
8,000K bytes). It is available in compiled Mi- 
crosoft Basic and you can purchase the 
source code separately from SBSG. 

The Corvus Version 6.0-C supports up to 
eight users with file lock. Multiuser re- 
quires the Corvus Multiplexer (Constella- 
tion) and 2-8 Model I and III computers. 
TRS-80 Model II Multiuser versions will be 
available sometime late this summer. 

All of the user-configurable modules are 
now available on the Model II as TRSDOS 
2.0 data disks. Model I systems are distrib- 
uted on 35-track TRSDOS 2.3 data disks. 



Model III systems are distributed on 
TRSDOS 1.2 data disks. Corvus hard disk 
versions are distributed on NEWDOS80 
Version 2.0 data disks. MTI hard disk ver- 
sions are distributed on DOSPLUS data 
disks. 

Price for each module for the Model II 
floppy versions is $295. Model l/lll floppy 
versions are $195 with Inventory priced at 
$225. Model l/lll hard disk versions are 
priced at $325. For more information con- 
tact Small Business Systems Group, 6 
Carlisle Road, Westford, MA 01886, (617) 
692-3800. 

Reader Service ^593 



MicroLib File Librarian 

MicroLib, a CP/M and MP/M disk file li- 
brarian, allows the user to store many disk 
files into a single larger file. It reduces the 
amount of space required to hold disk-resi- 
dent files, while still providing almost im- 
mediate access to the files. 

The system provides users with two lev- 
els of security for files placed in the library: 
password protection and password plus 
data encryption. 

MicroLib maintains a 50-character de- 
scription with each file saved in the library. 
The library directory commands display 
this description and print it on the various 
reports. 

Users can establish relationships be- 
tween groups of files, then process an en- 
tire group with a single command. An op- 
tional feature date stamps entries as you 
add them to a library and each time you 
process them, thus providing even more 
user control. 

MicroLib's comprehensive reports de- 
scribe the contents of a library, displaying 
all information stored in the library direc- 
tory in a professional format. 

MicroLib retails for $295. For more infor- 
mation contact Advanced Micro Tech- 
niques, 1291 E. Hillsdale Blvd., Suite 209, 
Foster City, CA 94404, (415) 349-9336. 

Reader Service ^580 



OmniForth for Model III 

OmniForth, a high-level computer lan- 
guage based on fig-Forth and the 79 
Standards, is now available to run on the 
TRS-80 Model III. 

OmniForth is a flexible tool that gives 
the user total control of his computer, en- 
abling rapid system design and application 
development. It combines structured pro- 
gramming, 31 character - names, virtual 
memory, stack organization, compiler, as- 
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sembler and file system into an extensible 
macro-like language. 

OmniForth contains the interactive 
OmniForth compiler, Z80 assembler, file 
system and full screen video editor, and re- 
quires 32K and one disk drive. 

The package comes on disk for $130. For 
more information contact Interactive Com- 
puter Systems Inc., 6403 DiMarco Road, 
T ampa, FL 33614, (813) 884-5270. 

Reader Service .^594 



Depreciation Analysis 

Realty Software's enhanced version of 
the disk based Depreciation Analysis now 
includes an Accelerated Recovery System 
(ACRS). It will handle 3, 5, 10 and 15 year 
ACRS property types and compare the 
ACRS deductions to the alternative 
straight line depreciation. 

The printed output shows each year's 
deduction for the ACRS method and the 
straight line method with the accumulat- 
ed totals from previous years for each 
method. This allows a complete analysis 
of both choices. 

Priced at $75, this system is available 
for 48K Model I and Ills from Realty Soft- 
ware Company, 1 1 16 E 8th St., Manhattan 
Beach, CA 90266, (213) 372-9419. 

Reader Service ^573 



Microcomputer 
Programming for Everyone 

Personal Pearl makes microcomputer 
programming available to almost every- 
one. It enables users with no technical 
training or computer experience to de- 
scribe their requirements visually and in 
English to the computer. Personal Pearl 
then automatically generates applica- 
tions according to end user requirements. 

With this product users can generate 
their own library of horizontal and per- 
sonal applications, no longer dependent 
on computer software technicians or on 
standard packaged programs. 

Personal Pearl retails for $295 and will 
be used interchangeably on all microcom- 
puters. For additional information contact 
Rita Miles, Relational Systems Interna- 
tional Corp., P.O. Box 13850, Salem, OR 
97309, (503) 363-8929. 

Reader Service ^-586 



Office Manager 

Dental Office Management I for the 
Models I and III is designed for the single 



practitioner or small group dental office 
practice. The system prepares daily ap- 
pointment logs, daily cash journals, 
monthly patient bills, ADA claim forms, 
accounts receivable reporting and ac- 
count collections activity. Practitioners 
can designate their own recall schedule 
for automatic notices to patients or sug- 
gested checkup schedules. 

The system requires 48K RAM with 2-4 
disk drives and a 130-column printer. The 
system is available from more than 850 
Charles Mann and Associates dealers 
worldwide for $859.95. Preview documen- 
tation is available separately for $50. 

For additional information and dealer 
location information contact Charles 
Mann and Associates, Microcomputer 
Division, 55722 Santa Fe Trail, Yucca 
Valley, CA 92284, (714) 365-9718. 

Reader Service ^564 



Automatic Graphing 
of Functions 

Automatic Graphing of Functions is a 
software package which graphs equa- 
tions used in math, science, and bus- 
iness. It plots formulas in the form Y - f(X) 
or Y = Y + f(X). It graphs discontinuous 
functions and plots simultaneous equa- 
tions on one graph. 

Key in your formula and the graph ap- 
pears quickly on the screen display, with X 
and Y axis positioned automatically for 
the highest resolution. You can send the 
graph to a printer with the push of a key, if 
you desire. 

The program is for use on a 16K Level II 
Model I or III. Cassette tape and 
operator's manual sell for $19.95 (add $2 
for postage and handling). You can trans- 
fer the program to disk. For more informa- 
tion contact David Modny, 4144 N. Via 
Villas, Tucson, AZ 85719. 



Five-Year Tax Planning 
Software Package 

Taxplan!, an income tax computation 
program, is available forthe Models I, II and 
III. This package makes tax computations 
for any or all of the five years, 1981-1985. 
You can use it not only to compute the ba- 
sic income tax from income, adjustments, 
filing status, and so on, but you can also 
explore such options as income averaging, 
the maximum tax on personal service in- 
come, and the computation of minimum 
tax for individuals. 

The price for the package, including in- 
structions, is $249.95. Registered users of 



Contract Services' Professional Income 
Tax System may buy this supplemental 
program for $149.95. For more informa- 
tion contact Contract Services Associates, 
706 S. Euclid, Anaheim, CA 92802, 
(714)635-4055. 

Reader Service ^568 




Money Manager 

Money Manager is a menu-driven per- 
sonal finance management program for 
the Model I and III with at least 32K and 
one disk drive. It helps keep track of your 
income and expenditures and provides an 
easy method of budget allocation. 

Money Manager can store information 
for up to 100 checkbook entries for a given 
month; with 48K and more than one disk 
drive, it can accommodate up to 250 en- 
tries per month. Each check writing year 
has its own disk. 

You can create as many as 99 expense 
categories, reconcile the checkbook with 
the bank statement, and keep track of tax 
deductible and non-tax deductible ex- 
penses. Checks payable to charge card 
companies and other lump payments may 
be broken up and placed into the proper 
individual categories. Program options 
are implemented with full 80-column 
printer capabilities. 

Money Manager is available on a Model 
I disk for $39.95. For more information 
contact Acorn Software Products Inc., 634 
North Carolina Ave., S.E., Washington, DC 
20003, (202) 544-4259. 

Reader Service ^555 



Personal Computer 
and Peripheral Switching 

The EIA 2 to 1 manual switch box is 
used with nine-line RS-232 devices. It can 
connect two Model lis or Ills to a single 
serial printer, modem, plotter, or system 
or two peripherals to a single terminal. 
This model has two 25 pin D style female 
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ADVANCED BAUDOT RADIOTELETYPE 

FORTHETRS-80 MODELS I and III 
Disassembled Handbook - Volume 5 

—Knowledge ot assembler is NOT required 

— For both BASIC newcomers any-advanced assembly 
language programmers Model 1-3 

— Load handle, call. QTH. rig. CQ, etc .. from BASIC to 
disk /CMD ONE TiME ONLY 

—includes BASIC load pgm lor newcomers 
—60, 66, 75. and 100 speed Baudot RTTY 
—Type-ahead in BOTH receive & transmit 
—21 prepared messages + 5 input messages 
— Automatic Morse code ID with your call 
—Store 25K bytes receive message automatically 
retransmission- if desired 

— Edit above similar to Pencil 

— 5 Chapters for new BASIC programmers 

—5 Chapters for advanced assembly programmers 

— Requires 48K + PORT zero decoder + TU 
—No RS-232C interface is required 

— Newcomers SHOULD order disk & note Model' 

VOLUME 5: - $20 ppd - WITH DISK $49 ppd 
[US lundi] add $8.50 oversea* airmail 

German - French - Japanese language editions 

RICHCRAFT ENGINEERING LTD. 

#1 Wahmeda Industrial Park 
Chautauqua, New York 14722 "' JUJ 

COD orders— US only (716) 753-2654 



TRS-80 DISK and TAPE USERSIII 

Protect your investment in disks and tapes! 

END loading problems. One TOOL does it ALL 1 

Tape Reproduction System 

Tape or Disk Utility for Model I or III 

• Read TAPE and/or DISK 

• Write TAPE and/or DISK 

• Verify TAPE written will load 

• ANY TRS-80 protocol TAPE 

• Identifies BASIC, SYSTEM, EDTASM 

• Change program name as desired 

• Select tape speed H/L (Mod III) 

• Select tape port 0/1 (Mod I) 

• OFFSET load addresses 

• UNOFFSET load addresses if offset 

• Displays operational STATUS plus 

. Diskette directory (0-3) 
Load Map (start-end addresses) 

. NAME, LENGTH, FORMAT of data 
START, END, EXECUTE addresses 

• Automatic protocol conversion 

• SINGLE disk drive copy (Mod I) 

• Archives on TAPE for DISK or TAPE 

• Run TAPE programs from DISK 

• 14 Menu-driven features in all! 

• DISK features require TRSDUM 

TRSTUM-16K tape systems ONLY $16.95 

TRSDUM-1 drive TRSDOS systems ONLY $17.95 

Specify Model I or III - add $1.00 postage and handling 
Send check, money order or SASE to: 

CREi Microtools 

Software M Tools for the 80s .«, 

14835 N. First Avenue ^ 41, 

Phoenix, AZ 85023 
TRS-80 & TRSDOS - trademarks of Tandy Corp 



MANUFACTURING CONTROL SYSTEMS 



MICS module ~ Manufacturing Inventory Control 
15 reports for inventory, purchasing, "and stock- 
room control. "Reserved" parts feature. 

BOMP module Bill of Materials Processor, 
lor "complex product" control o£ inventory. 

SHOC module Manufacturing Shop Order Control 
Order scheduling and backlog/shipment reporting. 

LABP module- Labor Collection/Performance Reptg 
Daily, weekly,- and monthly labo.r reporting by 
employee, job and overhead accounts, and depart- 
ment and operation. Actual job costing reports. 

JCST module- Manufacturing job cost reporting 
Job status and completion reporting with perfor- 
mance to standards. Variance reporting. Overhead 
determination monthly and year-to-date. 

All modules for Models I and III, 32K minimum 
systems. Master menu driven - full operator 
prompted. Expandable to fit your growth needs. 

Model I modules fro.r> $295, Model III from $345 

Send for catalog of ELTEC business modules 

ELTECH Associates 

Specialists in manufacturing business systems 
2466 Moreno Drive, Los Angeles, Ca 90039 

(213) 663-0347 --344 



iLemonAid News 
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i T i 'Mf ■ TAKE L0ADS 

/As v i >*W OFF YOUR MIND! 

New Mod LLQ $18.99 ppd 
Orig. Mod LL $12.99 ppd 

MORE Features to Take the CLOAD Oil Your Mind 1 
Now the lemoiiAid is easier to use a quick set-up switch 
lor mulish pre recorded tapes AND a 'loud'' output jack with 
BUILT-IN volume adjust: use speaker or earphone to Pre- 
position tapes precisely. AND hear saves/loads automatically. 
OR listen to games or other computer sound WITHOUT a 
separate amplifier' 

AND like the original LemonAid ends SYSTEM and 
CLOADing woes lor TRS-80 - model t AND low-speed model 3 
Install in seconds Plugs in No rewiring No tricky CTR 
volume AutoMAGIC power AND great lor lape speedups like 
KWICOS 1- too' 

Our GUARANTEE. The LemonAid will oulload ANY loader 
al ANY price or your money back. NOA Use with CTR80 80A 



Tl.i 



bed above] S18 99 postpaid" " 
aoer leader! $12 99 postpaid"" 
1' Order by Model From 



New Model LLQ [as des 

Model U. [Original., me 

We Ship in A Hu 

LEMONS TECH SERVICES 

325 N. Highway 65 P O Box 429 
'fl^BB Buffalo. MO 65622 |417| 345-7643 

visa- ••«« 



KWICOS (FULL SYSTEM): 
+ FASTER SAVE/LOAD "KWIK" FORMAT ! 

2X-6X MOD I, 2250 BAUD MOD III. 
+ NO MOOS OR ADD-ONS REQUIRED. 
+ VISUAL GUIDE FOR EASY VOLUME SET. 
+ WRITE, READ, VERIFY, SEARCH, CATALOG « 

TEST-READ BASIC * MACHINE CODE PGMS. 
+ "CHAIN'" LOAD BASIC PROGRAMS. 
■*■'. ALLOWS LONG TITLES AND PASSWORDS. 
+ NO GARBAGE-LOADS OR LOCK-UPS. 

♦ DIVULGES LENGTHS OF BASIC PROGRAMS. 

♦ BREAK KEY ENABLED DURING SAVE/LOAD. 

♦ ADJUSTABLE DEBOUNCE & LIST SPEED. 
+ MOTOR ON/OFF BY KEYBOARD COMMANDS. 
■♦■ BUILT-IN "BACKUP" TO COPY KWICOS. 

♦ UNCOMPLICATED, EASY TO USE. 

-1- MOD I: OK WITH LemonAid Loader ." 
-1- MOD III: COMMAND CONTROL OF BREAK, 
X/O ROUTING , CLOCK , CASSETTE HI/LO. 
CASSETTE for 4k-48k (Specify Model). ..*24 . ppd. 



KWIKIT (MINI-SYSTEM): 
*- HANDLES BASIC PROGRAMS ONLY . 
♦ DOUBLE-SPEED MOD 172200 BAUD MOD III. 
+ WORKS EVEN WITH X2X MOD IN CPU. 

+ USES ONLY BBO BYTES OF MEMORY. 

+ LOAD, VERIFY, CATALOCi, SEARCH. . . 

•*- ALSO MANY OTHER KWICOS ADVANTAGES. 

CASSETTE FOR 4k-4Sk (Specify Model)...* 9.SO ppd. 
(KEYBOARD DEBOUNCE. ..ADD « 2.) ___ 

/^359 



KWIK SoFtwa.r-e Dept M 

BOX 328 BOLIVAR, 1VIO 6b6 13 

Phone (417)326-7154 • TM Lemons Tech Service* 
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NEW PRODUCTS 




connectors and one male which is the 
common. Price is $145. 
TheEIASto 1 is similar to the 2 to 1. It 

can connect five terminals to a single seri- 
al peripheral using nine-line RS-232 sig- 
nals. It also uses five 25 pin D style female 
connectors and one male which is the 
common. Price is $225. 

The Color 2 to 1 is a manual switch box 
for use with the Model I and the Color 
Computer. Its connectors are compatible 
with the Model I's and Color Computer's 
serial port. The Color 2 to 1 can connect 
two Model Is or Color Computers to a 
single serial device, such as a modem or 
printer. Price is $69.95. 

The Parallel 2 to 1 model is for use with 
parallel printers and can connect two 
TRS-80 Model Ms or Ills to a single printer. 
The Parallel 2 to 1 is a manual switch box 
which uses two 36-pin female cinch style 
connectors and one male as the common. 
You can use it with the Epson, Okidata, 
Centronics, and many other printers 
which use the Centronics standard. Price 
is $185. 

The System Expander, an automatic 
multiplexer, is for use with nine-line 
RS-232 devices. It can automatically con- 
nect eight Model lis or Ills, one at a time, 
to a single serial modem or system having 
an RS-232 port. The System Expander has 
a unique printer option, which allows the 
terminals to drive a serial printer during 
the transmission or reception of data. 
Price is $1795. 

For more information contact Switch 
and Mux Inc., 10 Oakridge Ave., Merri- 
mack, NH 03054, (603) 424-4161. 
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WordStar Training Guide 

The WordStar Training Guide provides 
step-by-step instructions for using Word- 
Star and its optional companion pro- 
grams MailMerge and SpellStar. It is divid- 
ed into three tabbed sections: a three- 
hour Short Course, a 4-5 hour Intermedi- 
ate Course, and an eight-hour Extended 
Course. Like the previous manual, it is in- 
tended for first-time as well as veteran 
WordStar users. 

The 50-page 8V2 by 12 inch typeset spi- 
ral-bound book has a self-supported easel 
backing for stand-up use at the computer 
operator's terminal. 

The guide is included in WordStar prod- 
uct packages at no additional charge. In- 
dividual copies have a suggested retail 
price of $20. Contact Micropro Interna- 
tional Corporation. 1299 4th St., San Rafa- 
el, CA 94901, (415) 499-0919, for additional 
information. 
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HOW TO USE YOUR EPSON 

WITHOUT WASTING 

COMPUTER 





Your computer is capable of sending data 
at thousands of characters per second but 
the Epson can only print 80 characters per 
second. 

This means your computer is forced to 
wait for the printer to finish one line before it 
can send the next. A waste of valuable time. 

THE KEW MICROBUFFER™ 
ACCEPTS DATA AS FAST AS 
YOUR COMPUTER CAN SEND IT. 

Microbuffer stores the data in its own 
memory buffer and then takes control of 
the printer. This frees your computer for 
more productive functions. 

PARALLEL OR SERIAL. 

Microbuffer model MBP-16K is a 
Centronics-compatible parallel interface 
with 16,384 bytes of on-board RAM for 
data buffering. 

The MBS-8K is a full-featured RS-232C 
serial interface with both hardware and 
software (X-On/X-Off) handshaking, baud 
rates from 300 to 19,000 and an 8,192 byte 
RAM buffer. 

SIMPLY PLUG IT IN. 

Either model fits the existing auxiliary 
interface connector inside the Epson MX-80, 
MX-80 F/T or MX-100 without modification, 
and is compatible with standard Epson 
cables and printer control software, 
including GRAFTRAX-80. 

JUST $159.00* 

When you think how much time Microbuffer 
will save, can you afford not to have one? 
Call us for your nearest dealer. 




31245 




PRACTICAL PERIPHERALS. INC. 

iRIVE, WESTLAKE VILLAGE, CA 91362 • (213) 991-8200 



^11 







Frustrating isn't it! No matter how 
much you speed up your program 
it still seems to take forever to save 
data onto a cassette. Wouldn't it 
be great if someone could design a 
mass storage system with the speed 
of a disk, but at half the cost? 
Exotron did, the Exatron Stringy 
Floppy (ESF) . 

Totally self-contained, the ESF 
is an extremely fast, reliable, and 
economical alternative to cassette 
c.r alsV. storage of programs or 
data. All of the ESF's operations 
are ucder the computer's control, 
with no tuttons, switches, knobs or 
levers to adjust or forget. 

The ESF uses a miniature tape 
cartridge, about -he size of a busi- 
ness card, callea a wafer. The 
transport mechankm uses a direct 
drive motor with o.-ly one moving 
part. Designed to re*d and write 




digital data only, the ESF suffers 
from none of the drawbacks of 
cassettes - without the expense of 
disks. 

Several versions of the ESF are 
available, fur the TRS-80, Apple, 
PET, OS1 and an RS 232 unit. 
Even the slowest of the units is 15 
times faster than a cassette, and all 
are as reliable as disk drives - in 
fact a lot of users say they are more 
reliable! 




excellence in electronics 

exatron 



To get further information about 
the ESF give Exatron a call on 
their Hot Line 800-538 8. 
(inside California 408-737 71 

If you can't w 
take advantage of their 30 day 
money- back mtee, yo 

nothing to lose but time! 

181 Commercial Street 
Sunnyvale. CA 94086 



TRS-80, /' npfe ,nd PET ve trademarks of Tandy, Apple and Commodore r<> 




